10 RESTORE:READA:BO=PEEK(66)*256+PEEK(65)+3:DV=PEEK(186):IFDV<8THENDV=8
20 CE=BO+3:BL=BO+6:CO=BO+9:SW=BO+12:C2=BO+15:DY=BO+18:POKE53265,11:SYSBO:PRINT"";
50 POKE53265,27:SYSCE,15,"[211] [201] [199] [206] [201] [198] [201] [195] [193]":SYSCE,17,"[194]Y [202]EFF [202]ONES
70 [158]CE,19,"(LEN) 1997 BY MID$&ASC (null)UBLISHING
80 SYSCE,20,"[212]HIS [208]ROGRAM [201]SN'T [208]UBLIC [196]OMAIN
5000 [129]I[178]217[164]242:[151]I,[194](I)[176]128:[130]:[158]DY,"SYSK MAIN",DV
6000 [131]0