1 ]SA
5 PRINT "{clear}":PRINT:PRINT:PRINT "    S.A.M. DEMONSTRATION PROGRAM":PRINT:PRINT:PRINT
6 PRINT "{rvrs on}1.  INTRODUCTION:{rvrs off}";:PRINT:PRINT
8 PRINT "{rvrs on}2.  KNOBS DEMO:{rvrs off}";:PRINT:PRINT
9 PRINT "{rvrs on}3.  S.A.M. SINGS:{rvrs off}";:PRINT:PRINT
10 PRINT "{rvrs on}4.  BACK TO BASIC:{rvrs off}";: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"{clear}":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
