6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2026-04-21 09:17:52 +00:00
Code Issues Projects Releases Wiki Activity

cleanup

Browse Source
This commit is contained in:
mrdudz
2022-07-24 04:59:45 +02:00
parent 193b7b9ee7
commit 10c2ce205b
3 changed files with 58 additions and 75 deletions
Download Patch File Download Diff File Expand all files Collapse all files
libsrc/nes/cpeekchar.s
+17 -23
View File
@@ -1,40 +1,34 @@
.export _cpeekchar
.export _cpeekcharxy
.export _cpeekchar
.import _gotoxy
.import ppubuf_waitempty
.import ppubuf_waitempty
.include "nes.inc"
.include "nes.inc"
.segment "CODE"
_cpeekcharxy:
jsr _gotoxy ; Set cursor
.segment "CODE"
_cpeekchar:
; wait until all console data has been written
jsr ppubuf_waitempty
; wait until all console data has been written
jsr ppubuf_waitempty
ldy SCREEN_PTR+1
ldx SCREEN_PTR
ldy SCREEN_PTR+1
ldx SCREEN_PTR
; waiting for vblank is incredibly slow ://
vwait:
; lda $2002 ;wait
; bpl vwait
; lda $2002 ;wait
; bpl vwait
lda #0
sty $2006
lda #0
sty $2006
stx $2006
ldy $2007 ; first read is invalid
ldy $2007 ; get data
ldy $2007 ; first read is invalid
ldy $2007 ; get data
sta $2006
sta $2006
tya
and #$7f ; ?!?!
rts
and #$7f ; ?!?!
rts