change pos-y-dev to variable

This commit is contained in:
sejo 2021-07-13 19:40:35 -05:00
parent 2452ca30f3
commit 30fb962114
2 changed files with 9 additions and 9 deletions

View File

@ -39,7 +39,6 @@
%col-sep { #0024 } ( separation between byte columns )
%pos-y-dev { #0020 }
( variables )
@ -109,6 +108,7 @@ BRK
@pos-x-dev0 000c
@pos-x-dev1 005e
@pos-x-dev2 00af
@pos-y-dev 0020
@samples
:saw ( 0 )
@ -123,22 +123,22 @@ BRK
#02 ;update-dev JSR2
&draw-registers
;pos-x-dev0 LDA2 pos-y-dev #00
;pos-x-dev0 LDA2 ;pos-y-dev LDA2 #00
;draw-bytes JSR2
;pos-x-dev0 LDA2 col-sep ADD2 pos-y-dev #08
;pos-x-dev0 LDA2 col-sep ADD2 ;pos-y-dev LDA2 #08
;draw-bytes JSR2
;pos-x-dev1 LDA2 pos-y-dev #10
;pos-x-dev1 LDA2 ;pos-y-dev LDA2 #10
;draw-bytes JSR2
;pos-x-dev1 LDA2 col-sep ADD2 pos-y-dev #18
;pos-x-dev1 LDA2 col-sep ADD2 ;pos-y-dev LDA2 #18
;draw-bytes JSR2
;pos-x-dev2 LDA2 pos-y-dev #20
;pos-x-dev2 LDA2 ;pos-y-dev LDA2 #20
;draw-bytes JSR2
;pos-x-dev2 LDA2 col-sep ADD2 pos-y-dev #28
;pos-x-dev2 LDA2 col-sep ADD2 ;pos-y-dev LDA2 #28
;draw-bytes JSR2
( inc framecount )
@ -225,7 +225,7 @@ RTN
#00
&loop
STHk
#00 SWP #10 MUL pos-y-dev ADD2 STH2k .Screen/y DEO2
#00 SWP #10 MUL ;pos-y-dev LDA2 ADD2 STH2k .Screen/y DEO2
#20 .Screen/color DEO
STH2r #0008 ADD2 .Screen/y DEO2
#20 .Screen/color DEO
@ -235,7 +235,7 @@ RTN
POP
STHr ( recover beat )
#00 SWP #10 MUL pos-y-dev ADD2 STH2k .Screen/y DEO2
#00 SWP #10 MUL ;pos-y-dev LDA2 ADD2 STH2k .Screen/y DEO2
,&color LDR .Screen/color DEO
STH2r #0008 ADD2 .Screen/y DEO2
,&color LDR .Screen/color DEO

Binary file not shown.