a bunch of simple conio fixes, makes a few more samples work
This commit is contained in:
24
libsrc/mega65/kbhit.s
Normal file
24
libsrc/mega65/kbhit.s
Normal file
@@ -0,0 +1,24 @@
|
||||
|
||||
|
||||
; FIXME: is $d610 mega65 specific?
|
||||
; FIXME: this should rather use the kernal (with keyboard buffer etc)
|
||||
|
||||
.export _cgetc
|
||||
_cgetc:
|
||||
|
||||
: lda $d610
|
||||
beq :-
|
||||
ldx #0
|
||||
stx $d610
|
||||
rts
|
||||
|
||||
.export _kbhit
|
||||
_kbhit:
|
||||
lda $d610
|
||||
beq :+
|
||||
|
||||
lda #1
|
||||
:
|
||||
ldx #0
|
||||
rts
|
||||
|
||||
Reference in New Issue
Block a user