cleanup
This commit is contained in:
@@ -1,8 +1,6 @@
|
|||||||
|
|
||||||
.export _cpeekchar
|
.export _cpeekchar
|
||||||
.export _cpeekcharxy
|
|
||||||
|
|
||||||
.import _gotoxy
|
|
||||||
.import mul40
|
.import mul40
|
||||||
.importzp ptr4
|
.importzp ptr4
|
||||||
|
|
||||||
@@ -10,10 +8,6 @@
|
|||||||
|
|
||||||
.segment "CODE"
|
.segment "CODE"
|
||||||
|
|
||||||
_cpeekcharxy:
|
|
||||||
|
|
||||||
jsr _gotoxy ; Set cursor
|
|
||||||
|
|
||||||
_cpeekchar:
|
_cpeekchar:
|
||||||
|
|
||||||
lda ROWCRS
|
lda ROWCRS
|
||||||
@@ -31,7 +25,7 @@ _cpeekchar:
|
|||||||
|
|
||||||
;; convert to asc
|
;; convert to asc
|
||||||
|
|
||||||
;; ugly hack here to make tetris fx work :=P
|
;; FIXME: ugly hack here to make tetris fx work :=P
|
||||||
lda #' '
|
lda #' '
|
||||||
cpx #0
|
cpx #0
|
||||||
beq @l
|
beq @l
|
||||||
|
|||||||
@@ -1,12 +1,7 @@
|
|||||||
|
|
||||||
.include "atmos.inc"
|
.include "atmos.inc"
|
||||||
|
|
||||||
.import _gotoxy
|
.export _cpeekchar
|
||||||
.export _cpeekchar,_cpeekcharxy
|
|
||||||
|
|
||||||
_cpeekcharxy:
|
|
||||||
|
|
||||||
jsr _gotoxy ; Will pop x parameter
|
|
||||||
|
|
||||||
_cpeekchar:
|
_cpeekchar:
|
||||||
|
|
||||||
|
|||||||
@@ -1,18 +1,12 @@
|
|||||||
|
|
||||||
.export _cpeekchar
|
.export _cpeekchar
|
||||||
.export _cpeekcharxy
|
|
||||||
|
|
||||||
.import _gotoxy
|
|
||||||
.import ppubuf_waitempty
|
.import ppubuf_waitempty
|
||||||
|
|
||||||
.include "nes.inc"
|
.include "nes.inc"
|
||||||
|
|
||||||
.segment "CODE"
|
.segment "CODE"
|
||||||
|
|
||||||
_cpeekcharxy:
|
|
||||||
|
|
||||||
jsr _gotoxy ; Set cursor
|
|
||||||
|
|
||||||
_cpeekchar:
|
_cpeekchar:
|
||||||
|
|
||||||
; wait until all console data has been written
|
; wait until all console data has been written
|
||||||
|
|||||||
Reference in New Issue
Block a user