1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 21:32:19 +00:00
cc65/libsrc/pet/kbsout.s

21 lines
361 B
ArmAsm
Raw Normal View History

;
; Ullrich von Bassewitz, 19.11.2002
;
; BSOUT/CHROUT replacement function for the PETs
;
.export BSOUT
.export CHROUT
.import checkst
.proc BSOUT
jsr $FFD2 ; Call Kernal function
jmp checkst ; Check status, return carry on error
.endproc
CHROUT := BSOUT