5 POKE53280,0:POKE53281,0:PRINT"[147]":POKE214,11:PRINT:POKE53272,22
6 PRINTTAB(10)"[204]OADING [207][210][195][200][201][196][211][144]"
10 D=PEEK(186):IFD<8THEND=8
20 NU=2:POKE828,NU
30 FORX=1TONU:READNV:POKE828+X,NV:NEXT
40 A$="VIEWER.PKD":PRINT"L[207]A$,D":PRINT"RUN"
45 POKE198,2:POKE631,13:POKE632,13:END
100 DATA32,45
10000 D=PEEK(186):N$="B.ORCHIDS
10001 [159]1,D,15,"I0":[160]1:[159]1,D,15,"S0:"[170]N$:[160]1:[148]N$,D:[128]