; ; SYSLIB Module Name: SPRINT ; Author: Richard Conn ; SYSLIB Version Number: 2.0 ; Module Version Number: 1.0 ; Module Entry Points: ; PRINT ; Module External References: ; PSTR ; ; ; PRINT -- ; PRINT STRING PTED TO BY RET ADR UNTIL BINARY 0 ENCOUNTERED ; AFFECT NO REGISTERS OR FLAGS ; EXT PSTR PRINT:: XTHL ; HL=ADR, OLD HL ON STACK CALL PSTR ; PRINT STRING PTED TO BY HL XTHL ; RESTORE HL AND NEW RET ADR RET END