62000 DV=PEEK(186):IFDV<8THENDV=8
62010 PRINT"[147]":POKE53280,0:POKE53281,0:POKE211,0:POKE214,08:SYS58732
62020 A$="[219][219][219][219][219][219][219]"
62030 P$="[204] [207] [193] [196] [211] [212] [193] [210]   [204] [201] [194] [210] [193] [210] [217]":AU$="[214]ERSION 7 BY [202]EFF [202]ONES"
62035 F$="LIBRARY 101-X
62040 [153]"OR=======LIST=======PRINT#========POKE========PRINT#======^
62050 PRINT"[171][219][219][219][219][219][219][155]"A$"[152]"A$"[219][151]"A$"[219][152]"A$"[179]
62060 [153]"-(null)(null)(null)(null)(null)LIST"A$"PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST<
62070 PRINT"[171][219][219][219][219][155]"A$"[152]"A$"[219][151]"A$"[219][152]"A$"[219][155][219][179]
62080 [153]"-(null)(null)(null)LIST"A$"PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST(null)(null)<
62090 PRINT"[171][219][219][155]"A$"[152]"A$"[219][151]"A$"[219][152]"A$"[219][155][219][219][219][179]
62100 [153]"-(null)LIST"A$"PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST(null)(null)(null)(null)<
62110 PRINT"[171][155]"A$"[152]"A$"[219][151]"A$"[219][152]"A$"[219][155][219][219][219][219][219][179]
62120 [153]"LIST-(null)(null)(null)(null)(null)(null)PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST(null)(null)(null)(null)(null)(null)<
62130 PRINT"[155][171][219][219][219][219][219][152]"A$"[219][151]"A$"[219][152]"A$"[219][155]"A$"[179]
62140 [153]"LIST-(null)(null)(null)(null)PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST"A$"(null)<
62150 PRINT"[155][171][219][219][219][152]"A$"[219][151]"A$"[219][152]"A$"[219][155]"A$"[219][219][179]
62160 [153]"LIST-(null)(null)PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST"A$"(null)(null)(null)<
62170 PRINT"[155][171][219][152]"A$"[219][151]"A$"[219][152]"A$"[219][155]"A$"[219][219][219][219][179]
62180 [153]"PRINT#-"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST"A$"(null)(null)(null)(null)(null)<"
62190 [153]"PRINT#-"A$"POKE"A$"(null)PRINT#"A$"(null)LIST"A$"(null)(null)(null)(null)(null)(null)<"
62200 [153]"LIST/>>>>>>POKE>>>>>>>>PRINT#>>>>>>>>LIST>>>>>>>>>>>>>>EXP"
62210 [151]211,0:[151]214,10:[158]58732:X[178]2:[141]62230:[141]62280
62220 [151]211,0:[151]214,15:[158]58732:X[178]5:[141]62230:[137]62300
62230 [141]62260:[153]"-(null)(null)>>>LIST>>>>>>>>>>>>>>>>>>>>>>>>>>>>>LIST
62240 FORI=1TOX:GOSUB62260:PRINT"[171][219][179][159]                                [146][151][171]":NEXT
62250 GOSUB62260:PRINT"[171][219][219][151][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][178][219]":RETURN
62260 POKE646,1:IFX>2THENPOKE646,15
62270 RETURN
62280 POKE214,11:POKE211,20-LEN(P$)/2:SYS58732:PRINT"[159]"P$
62290 PRINTSPC(20-LEN(AU$)/2)""AU$:RETURN
62300 POKE214,15:POKE211,0:SYS58732:
62310 PRINT"[159]([195]) 1997 [202] & [198] [208]UBLISHING, [201]NC.
62320 [153]"OPEN(null)HIS IS THE COPYRIGHTED WORK OF
62330 PRINT"[159][202] & [198] [208]UBLISHING, [201]NC. [201]T IS NOT
62340 [153]"OPENSHAREWARE OR PUBLIC DOMAIN.
62350 PRINT"[159]1-800-594-3370 OR 1-318-221-8718
62360 [129]I[178]DV[164]DV:[160]2:[159]2,I,2:[160]2:[139]ST[167]62380
62370 [160]15:[159]15,I,15,"R0:"[170]F$[170]"="[170]F$:[132]15,ER:[160]15:[139]ER[178]63[167]62390
62380 [130]:[153]""F$" NOT FOUND!":[151]186,8:[128]
62390 Q$[178][199](34):[151]646,[194](53281):[153]"";
62400 [153]"P(null)2048,0:P(null)44,8:P(null)43,1:P(null)56,160:P(null)55,0:CLR:L(null)"Q$F$Q$","I
62410 [153]"R(null):";:[151]631,13:[151]632,145:[151]633,145:[151]634,145
62420 [151]635,145:[151]636,13:[151]198,6