home *** CD-ROM | disk | FTP | other *** search
- 1 ]SA
- 5 PRINT "[147]":PRINT:PRINT:PRINT " S.A.M. DEMONSTRATION PROGRAM":PRINT:PRINT:PRINT
- 6 PRINT "1. INTRODUCTION:[146]";:PRINT:PRINT
- 8 PRINT "2. KNOBS DEMO:[146]";:PRINT:PRINT
- 9 PRINT "3. S.A.M. SINGS:[146]";:PRINT:PRINT
- 10 PRINT "4. BACK TO BASIC:[146]";:PRINT:PRINT
- 20 GET A$:IF A$="" THEN 20
- 21 IF A$="1" THEN 1000
- 22 IF A$="2" THEN 100
- 23 IF A$="3" THEN 2000
- 24 IF A$="4" THEN PRINT"[147]":END
- 25 GOTO 20
- 100 ]PI64:]SP72
- 105 POKE 53265,0
- 110 SAY "/HEH4LOW DHEHR. YUW4 NOW MIY4Y, AY4 AEM SAE5M,"
- 120 SAY "DHAH SAO4FTWEHR MAW5TH"
- 126 SAY "FOHR YOHR KAA4MIXDOH6R SIH4KSTIYFOH6R KUMPYUW4TER."
- 130 SAY "AY4 KUHD AO4LWEYZ DUW LAA3TS AHV AHMEY4ZIHNX THIHNXGZ."
- 140 ]SP35:SAY "AY5 KUHD TAO5K VEH4RIY KWIH4KLIY WHEHN AY WAA4NTIHD."
- 150 ]PI64:]SP140:SAY "AE4ND AY KUHD TAO4K VEH3RIY SLOW4LIY TUW."
- 160 ]SP72:]PI30:SAY "AY5 KUHD SPIY5K IHNAH VEH3RIY /HAY5 VOYS."
- 166 ]PI169:SAY "AE4ND AY KUHD SPIY5K RIY3L LOW."
- 180 ]PI64:SAY "BAHT NAW4 AY KAEN DUW5 SAH4MPTHIHNX IY5VUN MOH4R AHMEY3ZIHNX."
- 185 ]KNOB110,160:SAY "AY4 KAEN CHEY4NJ MAY VOY5S KUMPLIY3TLIY.Q."
- 188 SAY "AY4 KAEN BIY5 AH LIH4TUL EH5LF /HUW TAO5KS LAYK DHIH5S. OH3R."
- 190 ]KN190,190:]PI60:]SP92
- 192 SAY "AY5 KAEN BIHKAH5M AH STREY4NJ EY4LIYUN."
- 194 SAY "YUW5 KAEN YUW4Z DHIHS VOY5S IHN AH SPEY4S GEY5M."
- 199 ]KN110,105:]SP82:]PI72
- 200 SAY "OHR /HAW5 AHBAW5T DHIH3S STAH4FIY LIH5TUL KEH4RIXKTER."
- 205 SAY "EY SIH4LIY VOY5S FOHR AH KUMPYUW4TER."
- 210 ]PI32:]KN145,145
- 212 SAY "AY5 KAEN TAO5K LAYK AH LIH5TUL OH5LD LEY5DIY."
- 214 SAY "NAAT MEH5NIY KUMPYUW5TERZ KAEN DUW DHIH4S - SWIY5TIY."
- 216 ]SP72:]PI64:]KN128,128
- 218 SAY "AE4ND AEZ AH MAE5TER AHV FAE4KT,"
- 220 SAY "AY4 KAEN BIYKAH5M DHAX LEY4TIXST MUW4VIY /HIY4ROW - AEND SEH8EY4,"
- 230 ]KN150,200:]PI58:]SP120
- 240 SAY "IY4IY6 TTIY6 -FOW5N /HOW5MM. IY4IY6 TTIY6 - FOW5N /HOW5MM."
- 250 ]KN128,128:]SP72:]PI64
- 260 SAY "DHEH4RZ NOW4 TEH5LIHNX WHAH5T SAE5M WIHL DUW NEH5KST."
- 300 POKE 53265,27
- 310 GOTO 5
- 1000 POKE 53265,0
- 1100 ]PI64: ]SP74
- 1110 SAY "/HEHLOW3 EH5VRIXWAHN. IHT SHUH4R IHZ NAY3S - TAX BIY /HIY4R TUH7DEY."
- 1120 SAY "AY3 AEM SAE4M -"
- 1125 SAY "DHAX BRAE4ND NUW5 VOY4S FOHR DHAX KAA4MIXDOH6R"
- 1126 SAY "SIH4KSTIYFOH6R KUMPYUW4TER."
- 1130 SAY "AY4 AEM DHAX MOW5ST VER4SIXTUL -"
- 1132 SAY "AH5NDERSTAE4NDIXBUL SPIY5CH SIH3NTHAXSAY7ZER"
- 1133 SAY "AAN DHAX MAA3RKIXT."
- 1140 SAY "AE4AE7ND- AY4 AEM DHAX LOHOW4EHST PRAY4ST- AHV DHEHM AO4UL."
- 1150 SAY "BAH6T WHAH4T KAEN YUW DUW3 WHIHTH MIYIY."
- 1155 SAY "WAY7 YUW3 KAEN PUH5T MIY-IH5NTUX YOHR OW7N PROH3GRAEMZ."
- 1160 SAY "/HAW4 WUHD YUW4 LAYK YOHR BIH3ZNIXS SAO5FTWEHR TUX SEY-"
- 1166 SAY "PLIY4Z EH5NTER DHIH4S WIY6KS PER3CHAHSIXZ."
- 1180 SAY "OH3ER- IHMAE3JIXN AEN EHDVEH4NCHER GEY6M DHAET DAH6Z DHIH4S."
- 1190 SAY "DHIY EH3LF WAHZ KAE3PCHERD-BAY DHAX JAY3IXNT."
- 1194 SAY "/HIY BIHGAE5N TUX KRAA3IY-AEND /HIY SEH4D."
- 1200 ]PI31:]SP66+6
- 1202 SAY "OH5OW7 NAX5OW. PLIY5Z DOWNT /HER5T MIY-MIH6STER JAYIXNT?"
- 1205 ]PI64:]SP76
- 1210 SAY "BAH6T DHAX JAY4IXNT WAHZ VEH3RIY MIY6N-"
- 1212 SAY "AEND /HIY4 OW3NLIY SEHD-"
- 1215 ]PI120:]SP80:SAY "/HOW2- /HOW4- /HOW."
- 1220 ]PI64:]SP72
- 1225 SAY "DHEH5R IHZ NOW LIH3MIXT-TUX DHAX PAA4SAXBUL AE5PLIXKEY3SHUNZ-"
- 1228 SAY "AHV SPIY4CH IHN YOH7R PROH3GRAEMZ."
- 1230 SAY "AO3LSOW7W3- AY4 AEM VEH3RIY IY4ZIY TUX YUW4Z."
- 1233 SAY "EH2NIYWAH6N KAEN AE5DSPIY5CH-TUX6 AH BEY4SIHKQPROH4GRAEM."
- 1240 SAY "AY4 KAEN IY3VIXN TAOK VEH4RIY KWIH4KLIY."
- 1244 SAY "LIH4SUN TUX6 DHIH3S WAHN."
- 1246 ]SP30
- 1248 SAY "PIY4TER PAY3PER- PIH4KT AH PEH4K AHV PIH4KULD PEH4PERZ."
- 1250 ]SP28
- 1252 SAY "/HAW3 MEHNIY PEH4KS AHV PIH4KULD PEH4PERZ-DIHD PIY4TER PAY3PER PIH6K."
- 1255 ]SP100
- 1260 SAY "QQQQ WWAW7IY1IY3IY. DHAE3T WHAHZ AH TAH4FIY."
- 1265 ]SP72:SAY "EH2NIYWEY6- YUW4 GEHT DHIY AYDIY5AH."
- 1268 SAY "SAE3M IHZ DHIY MOW3STEHKSAY4TIHNX NUW4 PRAA4DAHKT - AHV DHIHS YIY4R."
- 1280 SAY "SOH3OW7-/HAW4AHBAW3T IHT. WOH3NT YUW PLIY2Z TEY6KMIY /HOW6M?"
- 1284 SAY "Q SAE4M IHZ /HIY3R TUX STEY4IY."
- 1288 SAY "THAE2NXKS FOHR LIH4SUNIHNX EHVRIXBAH5DIY."
- 1290 SAY "AY /HOW3P YUW EHNJOY4D-MAYLIH4TUL TAOK."
- 1300 POKE 53265,27
- 1400 GOTO 5
- 2000 RESTORE
- 2010 AU=47994:POKE AU,234:POKE AU+1,234:POKE AU+2,234
- 2015 POKE 53265,0
- 2018 ]SP49
- 2020 FOR Z=1 TO 101:READ P,S$
- 2030 POKE 39439,P:SAY S$:NEXT Z
- 2040 POKE AU,157:POKE AU+1,0:POKE AU+2,168
- 2045 POKE 53265,27
- 2050 GOTO 5
- 2101 DATA 64,OHOHOH
- 2102 DATA 76,OHOHOH
- 2103 DATA 96,SEHEHEHEHEHEHEHEHEHEY
- 2104 DATA 76,KAEAEAEAEAEAEAEAEAEN
- 2105 DATA 64,YUXUXUXUXUXUXW
- 2106 DATA 48,SIYIYIYIYIYIYIYIYIYIYIYIYIYIYIYIYIYIY
- 2107 DATA 38,BAAAAAY
- 2108 DATA 42,DHAAAXAXAXAX
- 2109 DATA 48,DAOAOAOAOAOAOAONZ
- 2110 DATA 76,ERERERERERERER
- 2111 DATA 68,LIYIYIYIYIYIYIYIYIY
- 2112 DATA 64,LAAAAAAAAAAAAAAAAAAAAAAAAAYT
- 2113 DATA 64,WHAHAHAHT
- 2114 DATA 64,SOHOHUW
- 2115 DATA 38,PRAAAAAAAAAAAAAAAAUWD
- 2116 DATA 42,LIYIYIY
- 2117 DATA 48,WIYIYIYIYIYIYIYIYIY
- 2118 DATA 51,/HEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEYLD
- 2119 DATA 56,AEAEAEAET
- 2120 DATA 51,DHAAAXAXAXAX
- 2121 DATA 48,TWAAAAAAAAAAAAAAIY
- 2122 DATA 48,LAAAAAAAAAAAAIYTS
- 2123 DATA 64,LAEAEAEAEAEAEAEAEAEST
- 2124 DATA 76,GLIYIYIYIYIYIYIYIYIYM
- 2125 DATA 96,MIHIHIHIHIHIHIHIHIHIHNX
- 2126 DATA 64,/HUXUXUXUXUXUXUXUXUXUXWZ
- 2127 DATA 76,BRAOAOAOD
- 2128 DATA 96,STRAAAAAAAAAAAAIYPS
- 2129 DATA 76,AEAEAEAEAEAEAEAEAEAEND
- 2130 DATA 64,BRAAAAAAAAAAAAAAIYT
- 2131 DATA 48,STAAAAAAAAAAAAAAAAAAAAAAAAAARZ
- 2132 DATA 38,THRUXUXW
- 2133 DATA 42,DHAAAXAXAXAX
- 2134 DATA 48,PEHEHEHEHEHEHEHEHEHEHR
- 2135 DATA 76,RIXIXIXIXIXIXIXIXIXIXIXIXL
- 2136 DATA 68,LAHAHAHAHAHAHAHAHAHS
- 2137 DATA 64,FAAAAAAAAAAAAAAAAAAAAAAAAAAIYT
- 2138 DATA 64,OHOHOHR
- 2139 DATA 64,DHAAAXAXAXAX
- 2140 DATA 38,RAEAEAEAEAEAEAEAEAEAEAEAEM
- 2141 DATA 42,PAAAARTS
- 2142 DATA 48,WIYIYIYIYIYIYIYIYIY
- 2143 DATA 51,WAAAAAAAAAAAAAAAAAAAAAAAAAACHD
- 2144 DATA 56,WERER
- 2145 DATA 51,SOHOHW
- 2146 DATA 48,GAEAEAEAEAEAEAEAEAEAEL
- 2147 DATA 48,LIXIXIXIXIXIXIXIXIXIXIXIXIXNT
- 2148 DATA 64,LIYIYIYIYIYIYIYIYIY
- 2149 DATA 76,STRIYIYIYIYIYIYIYIYIYM
- 2150 DATA 96,MIHIHIHIHIHIHIHIHIHNX
- 2151 DATA 38,AEAEAEAEAEND
- 2152 DATA 38,DHAAAXAXAXAX
- 2153 DATA 38,RAAAAAAAAAAAAK
- 2154 DATA 36,KIXIXIXIXIXIXIXIXIXIXIXTS
- 2155 DATA 32,REHEHEHEHEHEHEHEHEHD
- 2156 DATA 32,GLEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHERER
- 2157 DATA 36,DHAAAXAXAXAX
- 2158 DATA 38,BAAAAMZ
- 2159 DATA 42,BERERERERERERST
- 2160 DATA 38,TIHIHIHIHIHIHIHIHIHNX
- 2161 DATA 36,IHIHIHIHIHIHIHIHIHIHN
- 2162 DATA 36,EHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEYR
- 2163 DATA 36,GEHEHEHEYV
- 2164 DATA 38,PRUXUXUXUXUXUXUXUXUXUXUXUXWF
- 2165 DATA 42,THRUXUXW
- 2166 DATA 48,DHAAAXAXAX
- 2167 DATA 51,NAAAAAAAAAAAAAAAAAAAAAAAYIYT
- 2168 DATA 56,DHAEAEAEAET
- 2169 DATA 51,AAAAAAUWR
- 2180 DATA 48,FLAEAEAEAEAEAEAEAEAEG
- 2181 DATA 76,WAHAHAHAHAHAHAHAHAHZ
- 2182 DATA 68,STIHIHIHIHIHIHIHIHIHL
- 2183 DATA 64,DHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHEHR
- 2184 DATA 64,OHOHOHOHOHOHOW
- 2185 DATA 48,SEHEHEHEHEHEHEHEHEHEY
- 2186 DATA 48,DAHAHAHAHAHAHAHAHAHZ
- 2187 DATA 48,DHAEAEAE
- 2188 DATA 51,AEAEAET
- 2189 DATA 56,STAAAAAAAAAAAAR
- 2190 DATA 56,SPEHEHEHEHEHEHEHEHEHIYNX
- 2191 DATA 56,GAXAXAXAXAXAXAXAXAXAXAXAXLD
- 2192 DATA 42,BAEAEAEAEAEAEAEAEAEN
- 2193 DATA 36,NERER
- 2194 DATA 38,ERERER
- 2195 DATA 42,YEHEHEH
- 2196 DATA 48,EHEHEHEHT
- 2197 DATA 48,WEHEHEHEHEHEHEHEHEHEHEH
- 2198 DATA 51,EHEHEHEHEHEHEHIYIYIYV
- 2199 DATA 64,OHOHOHR
- 2200 DATA 64,DHAAAXAXAXAX
- 2201 DATA 48,LAEAEAEAEAEAEAEAEAEAEAEAE
- 2202 DATA 42,AEAEAEND
- 2203 DATA 38,AHAHAHV
- 2204 DATA 36,DHAAAXAXAXAX
- 2205 DATA 32,FRIYIYIYIYIYIYIYIYIYIYIYIYIYIYIYIYIYIY
- 2206 DATA 48,AEAEAEND
- 2208 DATA 42,DHAAAXAXAXAX
- 2209 DATA 38,/HOHOHOHOHOHOHOHOHOWM
- 2210 DATA 36,AHAHAHAHV
- 2211 DATA 42,DHAAAXAXAXAXAXAXAXAXAXAXAXAXAX
- 2212 DATA 48,BREHEHEHEHEHEHEHEHEHEHIYIYIYV
-