10 POKE55,0:POKE56,52:CLR
15 DV=PEEK(186):IFDV<8THENDV=8
20 PRINT"[147][159]":POKE53280,0:POKE53281,0:GOSUB100
30 SYS57812"COMIC MEISTER",DV,0:POKE780,.:POKE781,.:POKE782,192:SYS65493
35 SYS57812"F.COMIC",DV,0:POKE780,.:POKE781,.:POKE782,56:SYS65493
40 SYS57812"COMIC.SPR",DV,0:POKE780,.:POKE781,.:POKE782,52:SYS65493
45 SYS57812"COMIC SCREEN1",DV,0:POKE780,.:POKE781,.:POKE782,232:SYS65493
50 SYS57812"COMIC SCREEN2",DV,0:POKE780,.:POKE781,.:POKE782,240:SYS65493
55 SYS57812"COMIC SCREEN3",DV,0:POKE780,.:POKE781,.:POKE782,224:SYS65493
60 PRINT"[144]LOAD"CHR$(34)"COMIC COLLECTOR"CHR$(34)","DV
70 PRINT"RUN"
80 POKE631,13:POKE632,13:POKE198,2:END
100 POKE214,8:PRINT
110 PRINT"[154][176][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][178][178][178][178][178][174][157][148][178]"
120 FORI=.TO12:PRINT"[171][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][179][157][148][219]":NEXT
130 PRINT"[154][173][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][189][157][148][177]"
140 POKE214,10:PRINT
150 PRINT"[155][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160]"
160 FORI=.TO9:PRINT"[155][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][146][219]":NEXT
170 PRINT"[219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219][219]"
200 POKE214,11:PRINT
210 FORI=.TO8:READA$:PRINTTAB(20-LEN(A$)/2)"[155]"A$:NEXT
220 PRINTTAB(13)"[204][160][207][160][193][160][196][160][201][160][206][160][199][160]. . ."
230 RETURN
10000 DATA"[193] N T H O N Y  [210] O S E ' S"
10010 DATA"[195][160][207][160][205][160][201][160][195][160][160][195][160][207][160][204][160][204][160][197][160][195][160][212][160][207][160][210]",
10020 DATA"([195]) 1996 BY [202] & [198] [208]UBLISHING, [201]NC.",
10030 DATA"[212]HIS PROGRAM IS NOT SHAREWARE
10040 [131]"OR IN THE (null)UBLIC STR$OMAIN.",
10050 [131]"1-800-594-3370 OR 1-318-221-8718"