home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / comdore / 64apps / fastdump.prg (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1987-07-18  |  1.3 KB  |  35 lines
  1. 10 INPUT"ôWHAT IS THE STARTING ADDRESS";L:LL=L
  2. 20 READ A:IFA<0 THEN40
  3. 30 CKSUM=CKSUM+A:POKE LL,A:LL=LL+1:GOTO20
  4. 40 IF CKSUM<> 33095 THEN PRINT "ôERROR IN DATA STATEMENTS":END
  5. 50 PRINT"ôHIRES DUMP INSTALLED":PRINT"SYS"L"TO ACTIVATE"
  6. 60 DATA 169,0,32,189,255,169,4,170
  7. 70 DATA 160,4,32,186,255,32,192,255,162
  8. 80 DATA 4,32,201,255,169,27,32,210
  9. 90 DATA 255,169,64,32,210,255,169,27
  10. 100 DATA 32,210,255,169,65,32,210,255
  11. 110 DATA 169,8,32,210,255,162,39,134
  12. 120 DATA 250,169,27,32,210,255,169,75
  13. 130 DATA 32,210,255,169,200,32,210,255
  14. 140 DATA 169,0,32,210,255,162,0,134
  15. 150 DATA 251,162,0,134,252,166,251,134
  16. 160 DATA 195,162,0,134,196,162,6,24
  17. 170 DATA 6,195,38,196,202,208,249,162
  18. 180 DATA 0,134,253,134,254,162,5,24
  19. 190 DATA 165,253,101,195,133,253,165,254
  20. 200 DATA 101,196,133,254,202,208,240,134
  21. 210 DATA 196,166,250,134,195,162,3,24
  22. 220 DATA 6,195,38,196,202,208,249,240
  23. 230 DATA 4,16,164,208,186,24,165,195
  24. 240 DATA 101,252,133,195,165,196,105,32
  25. 250 DATA 133,196,24,165,253,101,195,133
  26. 260 DATA 253,165,254,101,196,133,254,160
  27. 270 DATA 0,132,195,177,253,240,10,162
  28. 280 DATA 8,74,38,195,202,208,250,165
  29. 290 DATA 195,32,210,255,166,252,232,224
  30. 300 DATA 8,208,136,166,251,232,224,25
  31. 310 DATA 208,193,169,13,32,210,255,166
  32. 320 DATA 250,202,16,181,32,204,255
  33. 330 DATA 169,4,76,195,255,-1
  34. 8224                                                                                        
  35.