3 IFS=1THEN5
4 S=1:LOAD"ROMUSIC",8,1
5 REM STAR MAIN DISK
6 POKE53269,.:POKE808,225:IFS%>.THEN11
7 POKE53281,.:POKE53280,.:PRINT"[147]         [208][204][197][193][211][197][160][212][213][210][206][160][214][207][204][213][205][197][160][207][206]"
8 PRINT"        [201]F YOU HAVE A [202]OYSTICK,"
9 PRINT"     PLUG IT INTO [195]ONTROL [208]ORT [207]NE."
10 IFS%=0THENS%=1:LOAD"LOADSTAR.SPR",8,1
11 IFS%=1THENS%=2:LOAD"MUSIC",8,1
12 IFS%=2THENS%=3:LOAD"CE3K.M",8,1
13 POKE49,255:POKE50,47:CLR:POKE51200,.
15 POKE53281,1:POKE53280,10
20 FORI=.TO7:READS:POKE2040+I,S:NEXT
21 DATA192,193,194,195,196,197,194,198
30 V=53248:O=1:B=255:T=2:SE=V+21:SC=V+39:YD=V+23
40 POKESE,.:POKEV+29,.:POKEV+23,.:POKEV+16,.
100 PRINT"[147][142][144]           [169]              [223]
110 [153]"          STEP      TOANDANDTO      (null)
120 PRINT"         [169]      [183][184][146][162][162][184][183]      [223]
130 [153]"        STEP         (null)RIGHT$         (null)
140 PRINT"       [169]          [221][221]          [223]
150 [153]"      STEP           /EXP           (null)
160 PRINT"      [152][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]
170 [153]
180 [129]I[178]1[164]1000:[130]:C[178]10
190 [151]49569,.:[151]49570,112:[158]49152:[129]I[178]1[164]500:[130]
300 [129]S[178].[164]7:[151]SC[170]S,C:[151]V[170]S[170]S,165:[151]V[170]S[170]S[170]O,114:[151]SE,[194](SE)[176]T[174]S
305 [135]X,C:[129]I[178]114[164]65[169][171](T[170]T):[151]V[170]S[170]S[170]O,I:[130]
310 [129]I[178]165[164]X[169][180](X[171]165)[172]T:[151]V[170]S[170]S,I:[130]:[151]SC[170]S,C:[151]53280,C:[130]
315 [131]74,2,101,8,127,7,152,5,180,3,206,14,230,6,255,4
400 [153]"          (null)TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANRIGHT$
410 PRINT"          [221] COPYRIGHT 1985 [221]
420 [153]"          MID$TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN(null)
425 IFPEEK(788)<>49THEN425
430 PRINT"[145][145][145][145][145][145]          [213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]
440 [153]"          (null) PUSH SPACE BAR (null)
450 PRINT"          [202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]
455 R[178]V[170]17:C[178]128:[134]C(9):[129]I[178].[164]9:[135]C(I):[130]:[151]V[170]32,.
456 [131]15,12,11,0,0,11,12,15,1,1
460 [143]
465 [161]A$:[139]A$[178]""[167]460
600 [151]V[170]21,.:[151]808,237
1000 [153]"LOAD";:[151]V[170]33,.:[151]V[170]31,.
1010 [153][163]13)"RIGHT$SSUE (null)UMBER 12":[153]
1020 [153][163]16);"(null)(null)ATNSTR$(null)(null)ATN(null)"
1030 [153][163]13)"(null).(null). PEEKOX 30007"
1040 [153][163]7)"(null)HREVEPORT, (null)ATN   71130-0007"
1050 [153][163]13)"(318) 868-7247"
1055 [153]:[153][163]11)"ATNCLOSE(null)ONTHLY (null)UBLICATION"
1060 [153][163]11)"TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB("
1070 [153][163]12)"(null)UBLISHERS: ATNL (null)EKOVIUS"
1080 :
1090 [153][163]13)"           MID$IM (null)ANGHAM":[153]
1095 [153]"      PEEKUSINESS (null)ANAGER: MID$UDI (null)ANGHAM":[153]
1100 [153][163]16)"VALDITOR: MID$IM (null)EILER"
1110 [153]"       (null)ANAGING VALDITOR: ATNLAN CHR$ARDNER"
1115 [153]"  LENONTRIBUTING VALDITORS: STR$ONNA (null)OODY"
1117 [153]"                        ATNL (null)OMMERVIK":[153]
1120 [153][163]11)"LENIRCULATION: (null)ARY MID$ORDAN"
1130 :
1140 [153][163]24)"(null)HONDA (null)EIMERS"
1145 [153][163]24)"ATNRLENE CHR$ATES"
1160 [153]
1170 [153][163]11)"<PRESS SPACE BAR>";
1180 [151]198,0:[146]198,1:[151]198,0
1190 [153]"LOAD(null)AUNCHING (null)ABLE OF LENONTENTS";
1200 S[178]54272:[129]I[178]0[164]24:[151]S[170]I,0:[130]
1205 [151]S[170]5,240:[151]S[170]6,253:[151]S,0:[151]S[170]1,4:[151]S[170]23,241:[151]S[170]24,31
1210 [151]S[170]4,129
1215 [151]597,0:[143] SET HIDE FLAG TO ZERO
1220 [153]"STOPLOAD"[199](34)"HELLO"[199](34)",8":[153]"RUN"
1230 [151] 631,13:[151]632,13:[151]198,2
1240 [128]