highlight entire row in cartridge select
This commit is contained in:
parent
88b6eb83de
commit
b000fd83c5
1 changed files with 20 additions and 1 deletions
|
@ -412,6 +412,24 @@ RTN
|
||||||
|
|
||||||
RTN
|
RTN
|
||||||
|
|
||||||
|
@finish-line ( -> )
|
||||||
|
|
||||||
|
;get-entry-color JSR2 #02 EQU ,&end JCN
|
||||||
|
|
||||||
|
&while
|
||||||
|
.Screen/x DEI2
|
||||||
|
.Screen/width DEI2 #0040 SUB2
|
||||||
|
|
||||||
|
EQU2 ,&end JCN
|
||||||
|
#0c .Screen/sprite DEO
|
||||||
|
INC-X
|
||||||
|
|
||||||
|
,&while JMP &end
|
||||||
|
|
||||||
|
RTN
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
@render-cart-list ( -> )
|
@render-cart-list ( -> )
|
||||||
|
|
||||||
#0040 .Screen/x DEO2
|
#0040 .Screen/x DEO2
|
||||||
|
@ -440,10 +458,11 @@ RTN
|
||||||
.Screen/x DEI2
|
.Screen/x DEI2
|
||||||
.Screen/y DEI2
|
.Screen/y DEI2
|
||||||
;get-entry-color JSR2 ] ;draw-string JSR2
|
;get-entry-color JSR2 ] ;draw-string JSR2
|
||||||
|
;finish-line JSR2
|
||||||
#0040 .Screen/x DEO2
|
#0040 .Screen/x DEO2
|
||||||
|
INC-Y
|
||||||
&no-draw
|
&no-draw
|
||||||
.list-offset LDZ INC .list-offset STZ
|
.list-offset LDZ INC .list-offset STZ
|
||||||
INC-Y
|
|
||||||
|
|
||||||
#20 #00 &word_clr EQUk ,&end-clr JCN
|
#20 #00 &word_clr EQUk ,&end-clr JCN
|
||||||
#00 OVR SWP DUP ROT ;word ADD2 STA
|
#00 OVR SWP DUP ROT ;word ADD2 STA
|
||||||
|
|
Loading…
Reference in a new issue