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
/
SLIB1.LBR
/
SBOUT.Z80
< prev
next >
Wrap
Text File
|
2000-06-30
|
512b
|
29 lines
;
; SYSLIB Module Name: BOUT
; Author: Richard Conn
; SYSLIB Version Number: 3.6
; Module Version Number: 1.1
public bout
BDOS EQU 5
;
; OUTPUT CHAR IN A VIA BDOS CALL
; AFFECT NO REGS
;
BOUT:
PUSH HL ; SAVE REGS
PUSH DE
PUSH BC
PUSH AF
LD C,2 ; PUT CHAR
LD E,A ; CHAR IN E
CALL BDOS
POP AF ; RESTORE REGS
POP BC
POP DE
POP HL
RET
END