1
0
mirror of https://github.com/cc65/cc65.git synced 2025-01-10 19:29:45 +00:00
cc65/libsrc/pce/kplot.s

31 lines
560 B
ArmAsm
Raw Normal View History

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