10 CLEAR 256,62560:PRINT "Standby..." 20 C$="0123456789ABCDEF" 30 OPEN "T$MP$$.DO" FOR OUTPUT AS 1 40 FOR I=0 TO 12:READ D$:PRINT #1,D$;:NEXT:CLOSE 60 OPEN "T$MP$$.DO" FOR INPUT AS 1:CLS:PRINT CHR$(27);"Vdoodles: "; 70 FOR I=62560 TO 62951 80 NH$=INPUT$(1,1):NL$=INPUT$(1,1):NH=INSTR(C$,NH$)-1:NL=INSTR(C$,NL$)-1:PRINT CHR$(225+RND(2)*30); 90 POKE I,NH*16+NL:NEXT:CLOSE:KILL"T$MP$$.DO":PRINT @120,CHR$(27);"W";CHR$(27);"JDone. New file is PIXTEL.CO":PRINT "Use PIXTEL.CO in place of TELCOM.":PRINT"Set STAT:xxxxE":SAVEM"PIXTEL.CO",62560,62951,62560:END 100 DATA 2AE2FA2277F42181F422E2FAAF32E9F532C8FAC34651C3F37F2A77F422E2FAF1 110 DATA C9F53AE9F5A7C2C9F43A46F6A7C29BF43AC8FA3CCA79F4F1C376F4F1F5E67FFE 120 DATA 47CAC0F4FE49C297F421D7F5F1AF3246F67EA7CA08F5E54FCD326EE123C3B1F4 130 DATA F13EFF32E9F5C308F5AF32E9F5F1E67FFE48CADDF4FE4DCAE9F4C376F4AF32E8 140 DATA F53EF732E7F5C3F3F43E8032E8F53E7032E7F5CD3744CDBA44AF3246F6210CF5 150 DATA 22E2FA3EFF32E6F5F1C3ED14E67FFE07C8FE1BC222F5F52181F422E2FACDAF44 160 DATA F1C9D620CA59F5DA61F5F5E53AE7F5FEF0D23BF53AE6F55FCD65F5E13AE7F53C 170 DATA 32E7F5FEF0C254F53AE8F517D254F53E7032E7F5F13DC22AF53AE6F5EEFF32E6 180 DATA F5F1C3ED143AE7F5214D76D632DA75F52323C36BF5E5F5CD5C76F3CD3B75F1C6 190 DATA 3257CD96F5E17DD60A6FCD3B757ACD96F5CD3C74FBC9F6C0CDABF57AF680CDAB 200 DATA F57AF640CDABF57AC3ABF5477B1778CDBBF51F4F1F5F78CDCBF5C9CD4875D3FE 210 DATA CD4875DBFFCD4875DBFFC9CD4875D3FECD487579D3FFC9235253342C43432C47 220 DATA 482C474D0D000000 230 WALLY HUBBARD 70346,1716 10/16/85