home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 4 / AACD04.ISO / AACD / Programming / powerd / lib / PowerD / SetEStr.ass < prev    next >
Encoding:
Text File  |  1999-09-22  |  171 b   |  13 lines
  1. ; (4,a7) - estr
  2. ; (8,a7) - length
  3.  
  4.     xdef    _SetEStr
  5.  
  6. _SetEStr    move.w    (10,a7),d0
  7.     move.l    (4,a7),a0
  8.     cmp.w    (-4,a0),d0
  9.     bhi.s    .end
  10.     move.w    d0,(-2,a0)
  11.     clr.b    (a0,d0.w)
  12. .end    rts
  13.