home *** CD-ROM | disk | FTP | other *** search
/ Compendium Deluxe 1 / LSD Compendium Deluxe 1.iso / a / programming / assembly / mapsrc.lha / macros / writefile < prev   
Encoding:
Text File  |  1980-02-19  |  177 b   |  12 lines
  1.  
  2. writefile    macro            ;D0 = length A0 = source
  3.  
  4.     move.l d0,d3
  5.     move.l d0,d4
  6.     move.l a0,d2
  7.     move.l diskopt_currantfile(a5),d1
  8.     move.l dosbase(a5),a6
  9.     jsr -48(a6)
  10.     sub.l d0,d4
  11.     endm
  12.