home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 4 #2 / Commodore_Disk_User_Vol.4_2_1990_-.d64 / savev1.0.asm < prev    next >
Encoding:
Assembly Source File  |  1990-01-01  |  1005 b   |  69 lines
  1. E
  2. _ nEW SAVE ROUTINE. sAVES THE START ADDRESS, THE END ADDRESS
  3. _ AND THE EXECUTE ADDRESS FOR THE LOADER.
  4. _ nOTE THAT S "NAME",8,START,END
  5. _ TRANSFERS INFORMATION FROM ADDRESS START TO END - 1. IE THE BYTE AT END
  6. _ ADDRESS ISN'T GIVEN. THEREFORE THE LOADER HAS TO COPE WITH THE FACT THAT
  7. _ THE LENGTH IS TRUELY END-START, NOT END-START+1.
  8.  
  9. SAVEVEC= $332
  10. EXECADD= $FA
  11. TEXTOUT = $FF7D
  12.  
  13. _ sTART OF THE CODE, INITIALISE THE SAVE ROUTINE
  14.  
  15. ORG $1300
  16.  ACTIV
  17.  DEACTIV
  18. ACTIVEQU *
  19.  #>SAVEROUT
  20. {CBM-P} SAVEVEC
  21.  #<SAVEROUT
  22. {CBM-P} SAVEVEC+1
  23.  TEXTOUT
  24. DB 13,"NEW SAVE ROUTINE INSTALLED",13,0
  25. {CBM-N}
  26.  
  27. _ dEACTIVATE THE SAVE ROUTINE
  28.  
  29. DEACTIVEQU *
  30.  #$4E
  31. {CBM-P} SAVEVEC
  32.  #$F5
  33. {CBM-P} SAVEVEC+1
  34.  TEXTOUT
  35. DB 13,"SAVE ROUTINE DEACTIVATED",13,0
  36. {CBM-N}
  37.  
  38. _ hERE IS THE ACTUAL SAVE ROUTINE
  39.  
  40. SAVEROUTEQU *
  41.  $B7
  42.  SAVE1
  43.  $F691
  44. SAVE1EQU *
  45.  #$61
  46. {CBM-P} $B9
  47.  $F0CB
  48.  $F5BC
  49.  $BA
  50.  $E33E
  51.  $B9
  52.  $E4D2
  53.  #0
  54.  $ED51
  55.  $E503
  56.  $AD
  57.  $E503
  58.  $AE
  59.  $E503
  60.  $AF
  61.  $E503
  62.  EXECADD
  63.  $E503
  64.  EXECADD+1
  65.  $E503
  66.  $F586 
  67.  
  68.  
  69.