home *** CD-ROM | disk | FTP | other *** search
- 100 POKE53281,1:V$=CHR$(44)
- 110 PRINT "[147][144]THIS IS THE NEW VERSION OF ASCII DUMP"+V$+" AND IS DESIGNED TO MAKE";
- 120 PRINT " USING THE ASCII DUMP[146] UTILITY EASIER. THE INSERT UTILITY CAN NOW INSERT";
- 130 PRINT " ANY AMOUNT OF MATERIAL INTO ANY SIZE REGION. CERTAIN BUGS"+V$+" SUCH AS";
- 140 PRINT " JUMP MISSING ITS MARK"+V$+" HAVE BEEN REMOVED";
- 150 GOSUB1000
- 160 PRINT "THE PROGRAM IS NOW MENU DRIVEN. A QUESTION MARK ENTERED DURING ANY PAUSE ";
- 170 PRINT "IN THE DUMP"+V$+" OR AFTER THE MENU DISPLAY"+V$+"WILL";
- 180 PRINT " DISPLAY THE MENU AGAIN. "
- 190 PRINT " THE PROGRAM PAUSES WHENEVER THE ADDRESS OF THE MEMORY LOCATION IT IS";
- 200 PRINT " EXAMINING IS EVENLY DIVIDED BY 21. THIS USUALLY GIVES";
- 210 PRINT " A FULL SCREEN OF DATA."
- 220 GOSUB1000
- 230 PRINT " THE PROGRAM INTERCEPTS ALL THE UNIQUE C-64 COLOR CODES AND TRANSLATES";
- 240 PRINT " THEM INTO A DESCRIPTIVE STRING. THIS PREVENTS YOUR SCREEN FROM TURNING;
- 250 [153] " WHITE DURING THE DUMP. IT ALSO CHANGES THE BACKGROUND COLOR";
- 260 [153] " TO WHITE. THE PROGRAM ORIGINATED ON A VIC, AND THE COLOR COMBINATIONS";
- 270 [153] " WERE OPTIMIZED FOR THAT BACKGROUND."
- 280 [141]1000
- 290 [153] "THERE IS AN ASCII TYPING FEATUREWAIT BUILT INTO THE PROGRAM.";
- 300 [153] " YOU SELECT THE HEXADECIMAL ADDRESS YOU WANT TO START TYPING"[170]V$[170]" AND";
- 310 [153] " A QUESTION MARK APPEARS"[170]V$[170]" ASKING FOR STRING INPUT. TYPE THE STRING";
- 320 [153] " WITHOUT ANY COMMAS"[170]V$[170]" COLONS"[170]V$[170]" OR";
- 330 [153] " SEMI-COLONS. THEN TYPE RETURN. THAT'S ALL THERE IS TO IT.";
- 340 [141]1000
- 350 [153] " IMPORTANT! NOTE THAT THE OFFSET REQUESTED IN THE INSERT FUNCTION IS";
- 360 [153] " A DECIMALWAIT OFFSET"[170]V$[170]" WHEREAS ALL ADDRESSES REQUESTED IN THIS ";
- 370 [153] " PROGRAM ARE HEXADECIMALWAIT."
- 401 [153] " THIS PROGRAM WILL RUN ON AN EXPANDED VIC. REMOVE THE POKE IN THE";
- 402 [153] " FIRST LINE OF THE PROGRAM (100)."
- 403 [141]1000
- 410 [153] " PLEASE ADDRESS ANY COMMENTS"[170]V$[170]" HINTS"[170]V$[170]" ETC. TO DAVID MYERS"
- 420 [153] " C/O BIOCHEMISTRY DEPT."
- 430 [153] " RICE UNIV."
- 440 [153] " HOUSTON TX 77251"
- 450 [153]" THANK YOU"
- 460 [141]1000
- 999 [128]
- 1000 [153] [199](13)[170]"PRESS ANY KEY TO CONTINUE"
- 1010 [161]A$:[139]A$[178]""[167]1010
- 1020 [142]
-