1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 06:31:31 +00:00
cc65/libsrc/pce/kplot.s

31 lines
560 B
ArmAsm
Raw Normal View History

2015-08-29 13:58:57 +00:00
.export PLOT
2015-08-29 13:58:57 +00:00
.include "pce.inc"
2015-09-19 13:37:39 +00:00
.include "extzp.inc"
PLOT: bcs @getpos
2015-08-29 13:58:57 +00:00
tya
2015-09-20 10:18:41 +00:00
;clc ; already cleared
adc plotlo,x
2015-08-29 13:58:57 +00:00
sta SCREEN_PTR
cla
adc plothi,x
2015-08-29 13:58:57 +00:00
sta SCREEN_PTR+1
@getpos:
2015-08-29 13:58:57 +00:00
ldx CURS_Y
ldy CURS_X
rts
2015-10-02 14:50:22 +00:00
.rodata
2015-09-04 12:14:17 +00:00
plotlo: .repeat screenrows,line
2015-08-29 13:58:57 +00:00
.byte <($0000+(line*$80))
.endrepeat
plothi: .repeat screenrows,line
2015-08-29 13:58:57 +00:00
.byte >($0000+(line*$80))
.endrepeat