10 REM   SCRAMBLER BOOT
20 POKE53281,0:POKE53280,6:PRINT""
30 :
40 PRINT"[147]"SPC(10)"[211][195][210][193][205][194][204][197][210][160][205][197][206][213]"
50 :
60 PRINT"     1 ==>  [196]EMONSTRATION #1"
62 PRINT"     2 ==>  [196]EMONSTRATION #2"
64 PRINT"     3 ==>  [210]ETURN TO [204]OADSTAR"
70 :
80 PRINT"[215]HICH?";
90 POKE198,0:WAIT198,1:GETA$:IFA$<>"1"ANDA$<>"2"ANDA$<>"3"THEN90
91 PRINTA$"[144]"
92 IFA$="1"THENF$="SCRAMBLER DEMO1"
94 IFA$="2"THENF$="SCRAMBLER DEMO2"
96 IFA$="3"THENF$="HELLO CONNECT":PRINT""
98 :
100 :
110 PRINT"LOAD"CHR$(34)F$CHR$(34)",8":PRINT"RUN"
120 POKE631,13:POKE632,13:POKE198,2:END