home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1989 February / Ahoy_Magazine_89-02_1989_Double_L.d64 / BSAVE (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  288b  |  11 lines
  1. 100 rem *** all purpose bsave ***
  2. 110 ds=52224:de=ds+858:rem start and end+1
  3. 120 f$="mdos52224":rem your name here
  4. 130 ad=ds:gosub190:sl=lb:sh=hb
  5. 140 ad=de:gosub190:el=lb:eh=hb
  6. 150 sys57812f$,8,1
  7. 160 poke193,sl:poke194,sh:poke174,el:poke175,eh
  8. 170 sys62954:rem call kernal save
  9. 180 end
  10. 190 hb=int(ad/256):lb=ad-256*hb:return
  11.