1 DV=PEEK(186):IFDV<8THENDV=8
5 POKE32767,13:POKE53371,0
10 POKE53281,0:POKE53280,0:PRINT"[147][159]":POKE53272,22:GOSUB1000
11 POKE788,49:TQ=TI:POKE198,0
12 SYS57812"MULTI LS SPR",DV,0:POKE780,0:POKE781,0:POKE782,192:SYS65493
13 SYS57812"UNPACKER.89",DV,0:POKE780,0:POKE781,0:POKE782,201:SYS65493
14 SYS57812"INTRO.SHP",DV,0:POKE780,0:POKE781,0:POKE782,32:SYS65493
16 GETA$:IFA$=""AND(TI<TQ+250)THEN16
17 POKE251,32:POKE252,224:POKE253,204
18 POKE53280,0:SYS51456:SYS51459
19 L$="12345678"
21 V=53248
40 TQ=TI:J=0:POKE53370,0
41 J=1-J:FORI=0TO7:POKEV+39+I,7-6*J:NEXT
70 GETA$:IFA$=""AND(TI<TQ+250)THEN41
80 POKE198,0:POKE53371,0
82 POKEV+21,0
90 POKE157,0:LOAD"PRESENTER",DV
1000 POKE214,11:PRINT:PRINTTAB(12)"[204][207][193][196]ING [204][207][193][196][211][212][193][210][144]";:RETURN
10000 D=PEEK(186):N$="0:STAR":OPEN15,D,15,"S"+N$:CLOSE15:SAVEN$,D:END