home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 4 / AACD04.ISO / AACD / Programming / powerd / lib / PowerD / StringF.ass < prev    next >
Encoding:
Text File  |  1999-09-21  |  299 b   |  20 lines
  1. ; (4,a7)  - dst str
  2. ; (8,a7)  - format str
  3. ; (12,a7) - list
  4.  
  5.     xdef    _StringF
  6.  
  7. _StringF    movem.l    a2-a3/a6,-(a7)
  8.     movea.l    (4+12,a7),a3
  9.     movea.l    (8+12,a7),a0
  10.     lea    (12+12,a7),a1
  11.     lea    (copychar,pc),a2
  12.     movea.l    4.w,a6
  13.     jsr    (-522,a6)
  14.     move.l    a3,d0
  15.     movem.l    (a7)+,a2-a3/a6
  16.     rts
  17.  
  18. copychar    move.b    d0,(a3)+
  19.     rts
  20.