home *** CD-ROM | disk | FTP | other *** search
/ ftp.whtech.com / ftp.whtech.com.tar / ftp.whtech.com / club100 / eme / comrom.100 < prev    next >
Text File  |  2006-10-19  |  628b  |  17 lines
  1. 0 'COMROM.100       (c)1989 Wilson Van Alst
  2. 1 'v1.0          All rights reserved
  3. 2 'Loader for COMROM.CO, program that
  4. 3 ' loads COM: images into XTRAM
  5. 5 'Distributed by EME Systems under license from the author.
  6. 10 CS=0:FOR AD= 64704 TO 64750 
  7. 15 READ D%:POKE AD,D%:CS=CS+D%
  8. 20 NEXT AD
  9. 25 IF CS<>6019 THEN BEEP :PRINT"Typo in data!!?":END
  10. 30 SAVEM"COMROM",64704,64750,64704
  11. 50 DATA 33,233,252,55,205,230,23,33,0,0
  12. 51 DATA 17,0,128,205,126,109,216,194,148,20
  13. 52 DATA 79,243,62,1,211,232,113,151,211,232
  14. 53 DATA 251,149,204,118,118,35,223,194,205,252,201
  15. 54 DATA 56,56,78,49,68,0
  16. 55 REM line 54 sets stats: 88N1D
  17.