1 DV=PEEK(186):IFDV<8THENDV=8
5 POKE32767,13:POKE53371,0
6 POKE65534,1:REM S-KEY ON
10 POKE53281,0:POKE53280,0:PRINT"[147][159]":IFPEEK(653)=0THENGOSUB100
11 T=5*60+TI
12 IFT>TITHEN12
13 LOAD"WORM.PKD",DV
100 PRINT"[158][147]        [215]ELCOME TO [204][207][193][196][211][212][193][210] 222
105 [129]I[178]0[164]9:[135]B$(I):[130]
110 [151]214,1:[153]
120 [129]I[178]0[164]9:[153]
130 [153][163]20[171](([195](B$(I))[173]2)))B$(I)
140 [130]:[143]:PRINT"":STOP
150 [142]
300 [131]"(null)HE (null)(null)ATNSTR$(null)(null)ATN(null) (null)ORMHOLE
301 DATA"[198]OUND IN THE [205]ANDELBROT [211]ET
303 [131]"LISTBY
304 DATA"[196]AVE [205]OORMAN "
305 DATA"
306 [131]"LIST(null)HE MUSIC IS "
307 [131]"(null)ONATA
308 DATA"[155]BY [199]EORGE [200]ANDEL
309 [131]"LIST(null)RANSCRIBED TO THE LEN-64
310 DATA"[155]BY [196]AVE [205]ARQUIS
9999 [128]
10000 DV[178][194](186):[159]15,DV,15,"S0:STAR":[160]15:[148]"STAR",DV:[128]
60000 [137]10000