cc65/libsrc/telestrat/cgetc.s

;
; 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 23:23:03 +02:00			`;`
			`; jede jede@oric.org 2017-10-01`
			`;`
			`.export _cgetc`

			`.include "telestrat.inc"`

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