cc65/libsrc/telestrat/cgetc.s

mirror of https://github.com/cc65/cc65.git synced 2024-09-29 17:56:21 +00:00
;
; jede jede@oric.org 2017-10-01
;
    .export    _cgetc
   
    .include   "telestrat.inc"

.proc _cgetc
loop:   
        BRK_TELEMON XRD0
        bcs     loop
        rts
.endproc
telestrat : cgetc add for conio 2017-10-01 21:23:03 +00:00			`;`
			`; jede jede@oric.org 2017-10-01`
			`;`
			`.export _cgetc`

			`.include "telestrat.inc"`

			`.proc _cgetc`
			`loop:`
			`BRK_TELEMON XRD0`
optimize 2017-10-02 10:20:52 +00:00			`bcs loop`
telestrat : cgetc add for conio 2017-10-01 21:23:03 +00:00			`rts`
			`.endproc`