home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 12: Textmags & Docs / nf_archive_12.iso / MAGS / SOURCES / ATARI_SRC.ZIP / atari source / DSHJ2 / ROTATE.S < prev    next >
Encoding:
Text File  |  2001-02-10  |  451 b   |  20 lines
  1. *  Calls bigrot.s 
  2.  
  3.              .globl _rotate
  4.          .globl recrot
  5.  
  6. * a0 - address of buffer
  7. * a1 - 16 * DST form in even bytes
  8. * d0 - src width in even bytes
  9. * d1 - dest width in even bytes
  10. * d2 - # of multiples to use...see fastrot.s
  11. * src width must be greater than dest width
  12.  
  13. _rotate: move.l $4(a7),a0
  14.          move.l $8(a7),a1
  15.          move.w $C(a7),d0
  16.      move.w $E(a7),d1
  17.      move.w $10(a7),d2
  18.          jsr recrot
  19.          rts
  20.