home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / zsys / simtel20 / syslib / slib2.lbr / SLPRINT.Z80 < prev    next >
Encoding:
Text File  |  1986-02-06  |  512 b   |  23 lines
  1. ;
  2. ; SYSLIB Module Name:  SLPRINT
  3. ; Author:  Richard Conn
  4. ; SYSLIB Version Number:  3.6
  5. ; Module Version Number:  1.1
  6.  
  7.     public    lprint
  8.  
  9. ;
  10. ;  LPRINT -- 
  11. ;    PRINT STRING PTED TO BY RET ADR UNTIL BINARY 0 ENCOUNTERED ON LST:
  12. ;    AFFECT NO REGISTERS OR FLAGS
  13. ;
  14.     EXT    LPSTR
  15.  
  16. LPRINT:
  17.     EX    (SP),HL        ; HL=ADR, OLD HL ON STACK
  18.     CALL    LPSTR        ; PRINT STRING PTED TO BY HL
  19.     EX    (SP),HL        ; RESTORE HL AND NEW RET ADR
  20.     RET
  21.  
  22.     END
  23.