home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / cpm / utils / asmutl / asmlib.lbr / PSTR.AZM / PSTR.ASM
Encoding:
Assembly Source File  |  1991-06-25  |  640 b   |  27 lines
  1. ;----------------------------------------------------------------
  2. ;        This is a module in the ASMLIB library
  3. ;
  4. ; Print a string of chracters B long. The character is in the 
  5. ; accumulator and is printed across the line. This makes doing 
  6. ; borders or boxes quite easy.
  7. ;
  8. ;            Written         R.C.H.     16/8/83
  9. ;            Last Update    R.C.H.       22/10/83
  10. ;----------------------------------------------------------------
  11. ;
  12.     name    'pstr'
  13. ;
  14.     public    pstr
  15.     extrn    dispatch
  16.     maclib    z80
  17. ;
  18. pstr:
  19.     push    psw
  20. pstr2:
  21.     call    dispatch        ; print the character
  22.     djnz    pstr2            ; do till done
  23.     pop    psw
  24.     ret
  25. ;
  26.     end
  27.