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-x LDZ2 .Screen/x DEO2
|
||||
#20 .Screen/color DEO
|
||||
.Playback/position LDZ2 #0000 EQU2 ,&end JCN
|
||||
( 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
|
||||
;playhead_icon .Screen/addr DEO2
|
||||
#21 .Screen/color DEO
|
||||
&end
|
||||
RTN
|
||||
|
||||
@draw
|
||||
|
|
Reference in New Issue