home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / cpm / utils / asmutl / asmlib.lbr / STRBUF.AZM / STRBUF.ASM
Assembly Source File  |  1991-06-25  |  896b  |  37 lines
  1. ;----------------------------------------------------------------
  2. ;         This is a module in the ASMLIB library.
  3. ; 
  4. ; This module will move a string into a standard console
  5. ; buffer. This allows easy character movement. On entry DE ->
  6. ; the start of the string (character counter) and HL -> the 
  7. ; start of the console buffer.
  8. ;
  9. ;             Written        R.C.H.         1/10/83
  10. ;            Last Update    R.C.H.         1/10/83
  11. ;----------------------------------------------------------------
  12. ;
  13.     name    'strbuf'
  14.     public    strbuf
  15.     maclib    z80
  16. ;
  17. strbuf:
  18. ; Here DE -> string (source) , HL -> buffer (dest).
  19.     push    b            ; Save 
  20.     xchg
  21. ; HL -> string (source), DE -> buffer (dest).
  22.     mov    a,m            ; the size
  23.     ora    a            ; String size = 0 ??
  24.     jrz    strbufend
  25.     mov    c,a
  26.     mvi    b,00            ; Set up the move
  27.     inx    d            ; Index past the size byte
  28.     ldir                ; Move the data
  29. ;
  30. strbufend:
  31.     pop    b
  32.     ret
  33. ;
  34.     end
  35.  
  36.  
  37.