fix playhead drawing
This commit is contained in:
parent
3239b1cae2
commit
051479be07
4
main.usm
4
main.usm
|
@ -305,11 +305,13 @@ RTN
|
||||||
.Draw/playhead-y LDZ2 .Screen/y DEO2
|
.Draw/playhead-y LDZ2 .Screen/y DEO2
|
||||||
.Draw/playhead-x LDZ2 .Screen/x DEO2
|
.Draw/playhead-x LDZ2 .Screen/x DEO2
|
||||||
#20 .Screen/color DEO
|
#20 .Screen/color DEO
|
||||||
|
.Playback/position LDZ2 #0000 EQU2 ,&end JCN
|
||||||
( draw new playhead )
|
( draw new playhead )
|
||||||
.Draw/pattern-y LDZ2 .Playback/position LDZ2 #0001 SUB2 #0004 MUL2 ADD2 #0008 SUB2 DUP2 .Draw/playhead-y STZ2
|
.Draw/pattern-y LDZ2 .Playback/position LDZ2 #0004 MUL2 ADD2 #000b SUB2 DUP2 .Draw/playhead-y STZ2
|
||||||
.Screen/y DEO2
|
.Screen/y DEO2
|
||||||
;playhead_icon .Screen/addr DEO2
|
;playhead_icon .Screen/addr DEO2
|
||||||
#21 .Screen/color DEO
|
#21 .Screen/color DEO
|
||||||
|
&end
|
||||||
RTN
|
RTN
|
||||||
|
|
||||||
@draw
|
@draw
|
||||||
|
|
Reference in New Issue