Fixed bugs; and, improved the efficiency of some pce library functions.
This commit is contained in:
committed by
Oliver Schmidt
parent
959eff34a3
commit
39694d0aaa
@@ -4,16 +4,15 @@
|
||||
.include "pce.inc"
|
||||
.include "extzp.inc"
|
||||
|
||||
PLOT:
|
||||
bcs @getpos
|
||||
PLOT: bcs @getpos
|
||||
|
||||
tya
|
||||
;clc ; already cleared
|
||||
adc _plotlo,x
|
||||
adc plotlo,x
|
||||
sta SCREEN_PTR
|
||||
|
||||
lda _plothi,x
|
||||
adc #0
|
||||
cla
|
||||
adc plothi,x
|
||||
sta SCREEN_PTR+1
|
||||
@getpos:
|
||||
ldx CURS_Y
|
||||
@@ -22,18 +21,10 @@ PLOT:
|
||||
|
||||
.rodata
|
||||
|
||||
_plotlo:
|
||||
.repeat screenrows,line
|
||||
plotlo: .repeat screenrows,line
|
||||
.byte <($0000+(line*$80))
|
||||
.endrepeat
|
||||
|
||||
_plothi:
|
||||
.repeat screenrows,line
|
||||
plothi: .repeat screenrows,line
|
||||
.byte >($0000+(line*$80))
|
||||
.endrepeat
|
||||
|
||||
;-------------------------------------------------------------------------------
|
||||
; force the init constructor to be imported
|
||||
|
||||
.import initconio
|
||||
conio_init = initconio
|
||||
|
||||
Reference in New Issue
Block a user