home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.barnyard.co.uk
/
2015.02.ftp.barnyard.co.uk.tar
/
ftp.barnyard.co.uk
/
cpm
/
walnut-creek-CDROM
/
ZSYS
/
SIMTEL20
/
SYSLIB
/
SLIB3.LBR
/
SPRINT.Z80
< prev
next >
Wrap
Text File
|
2000-06-30
|
512b
|
23 lines
;
; SYSLIB Module Name: SPRINT
; Author: Richard Conn
; SYSLIB Version Number: 3.6
; Module Version Number: 1.1
public print
;
; PRINT --
; PRINT STRING PTED TO BY RET ADR UNTIL BINARY 0 ENCOUNTERED
; AFFECT NO REGISTERS OR FLAGS
;
EXT PSTR
PRINT:
EX (SP),HL ; HL=ADR, OLD HL ON STACK
CALL PSTR ; PRINT STRING PTED TO BY HL
EX (SP),HL ; RESTORE HL AND NEW RET ADR
RET
END