63000 DV=PEEK(186):IFDV<8THENDV=8
63010 DELAY=116:POKE53280,0:POKE53281,0
63020 PRINT"[147]";
63030 FORI=8TO23:PRINT"[169][169][169][169][169][169][169][169][169][169][155][223][223][223][223][223][223][223][223][223][223][169][169][169][169][169][169][169][169][169][169][223][223][223][223][223][223][223][223][223][223]";:NEXT
63040 PRINT"":FORI=217TO242:POKEI,PEEK(I)OR128:NEXT
63050 POKE214,9:PRINT"[145]"TAB(2)"[153][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164]"
63060 FORI=1TO11:PRINTTAB(2)"[159]                                    [155][146][223]":NEXT
63070 PRINTTAB(2)"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][146][155][223]"
63080 PRINT"[155][169][169][169][169][169][169][169][151][223][223][223][223][223][223][223][223][223][223][169][169][169][169][169][169][169][169][169][169][155][223][223][223][223][223][223][223][223][223][223]"
63090 POKE214,10:PRINT"[145][159]";
63100 FORI=1TO11:READA$
63110 PRINTSPC(20-LEN(A$)/2)""A$:A$="":NEXT
63120 DELAY=DELAY+1:J=PEEK(56320)AND16:GETA$:IF(A$="")ANDJ<>0ANDDEL<116THEN63120
63130 A$="+50 DEMO"
63140 DATA"[194][160][193] [211] [201] [195] + 5 0[160] [160][196] [197] [205] [207]","BY [204]IGIA [204]ATINO"
63150 DATA"  ([195])1995 BY [211]OFTDISK [208]UBLISHING"
63160 DATA"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]
63170 [131]"   (null)HIS IS THE COPYRIGHTED WORK OF
63180 DATA"[211][207][198][212][196][201][211][203] [208][213][194][204][201][211][200][201][206][199], [206][207][212] INTENDED
63190 [131]"FOR DISTRIBUTION AS PUBLIC DOMAIN ","OR SHAREWARE.  ASCOR INFORMATION ON
63200 DATA"[204][207][193][196][211][212][193][210] AND [204][207][193][196][211][212][193][210] PRODUCTS,   "
63210 DATA"CALL [211][207][198][212][196][201][211][203] [195]USTOMER SERVICE AT"
63220 DATA"1-800-594-3370 OR 1-318-221-8718
63230 [129]I[178]DV[164]DV:[160]2:[159]2,I,2:[160]2:[139]ST[167]63250
63240 [160]15:[159]15,I,15,"R0:"[170]A$[170]"="[170]A$:[132]15,ER:[160]15:[139]ER[178]63[167]63260
63250 [130]:[153]""A$" NOT FOUND!":[151]186,8:[128]
63260 Q$[178][199](34):[151]646,[194](53281):[153]"";
63270 [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$A$Q$","I
63280 [153]"R(null):";:[151]631,13:[151]632,145:[151]633,145:[151]634,145
63290 [151]635,145:[151]636,13:[151]198,6