home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Mint / pcosbind.zoo / source.zoo / flopwr.s < prev    next >
Text File  |  1992-06-12  |  332b  |  21 lines
  1.     .TEXT
  2.  
  3.           .globl Flopwr
  4. Flopwr:
  5.     move.l    A2,-(A7)
  6.     move.w    $000C(A7),-(A7)
  7.     move.w    $000C(A7),-(A7)
  8.     move.w    $000C(A7),-(A7)
  9.     move.w    D2,-(A7)
  10.     move.w    D1,-(A7)
  11.     move.l    D0,-(A7)
  12.     move.l    A0,-(A7)
  13.     move.w    #$0009,-(A7)
  14.     trap    #14
  15.     lea.l     $0014(A7),A7
  16.     movea.l   (A7)+,A2
  17.     rts
  18.  
  19.     .END
  20.  
  21.