From b000fd83c5bc3fab7944c40655f4050b27bb4f4f Mon Sep 17 00:00:00 2001 From: Derek Stevens Date: Fri, 8 Oct 2021 15:49:55 -0600 Subject: [PATCH] highlight entire row in cartridge select --- uxn-client/xrxs.tal | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) diff --git a/uxn-client/xrxs.tal b/uxn-client/xrxs.tal index 6df1e5e..5c6051e 100644 --- a/uxn-client/xrxs.tal +++ b/uxn-client/xrxs.tal @@ -412,6 +412,24 @@ 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 ( -> ) #0040 .Screen/x DEO2 @@ -440,10 +458,11 @@ RTN .Screen/x DEI2 .Screen/y DEI2 ;get-entry-color JSR2 ] ;draw-string JSR2 + ;finish-line JSR2 #0040 .Screen/x DEO2 + INC-Y &no-draw .list-offset LDZ INC .list-offset STZ - INC-Y #20 #00 &word_clr EQUk ,&end-clr JCN #00 OVR SWP DUP ROT ;word ADD2 STA