all repos — xrxs @ 417c1dd1378a550e05f093457bf847912539ac68

experimental networked application/game server with 9p 

test cartlist lengths and document limitations and alternative method for scrollbar rendering
Iris Lightshard nilix@nilfm.cc
PGP Signature 
-----BEGIN PGP SIGNATURE-----

iQIzBAABCAAdFiEEkFh6dA+k/6CXFXU4O3+8IhROY5gFAmFjpiMACgkQO3+8IhRO
Y5jfrA/+PWeE86vBpGkVLJudLgbys6P77ohRCNLfayrnQLkpWXTiLIBAM9LohmtN
YQQQW1WCOigFdq5hLEHPqK4UCjN4AVsSjcfWSuJdz5dstXBMT3686fzzoZysIkaS
JP9el+TfXPCJ6Ko0Pwj2URbbDuQfdOyKa0iNlp2LipOLCndC8T4JWvIw+PaSSwZU
Uxkvbbt5ubKOFqTxM8wuYsWQkI6+nLX3uH3mGfu8RFpmjxoQkFcWJ3ypNbkR1cjF
g9mVPfTzSkV8lWftBrvDgHteV+X2yr22ouElAjFAZNGRgfWo9FP1/Yj45Q1GtVAg
1efoYiwwW3JIvqkH3yP434WxxIUadj+RO/49WGZIpGAy7FU9bWTxGuw+7/1HUuI+
swqlp3KqOIYkhpanhBmRngpg3ihgUG7tb78bwZCDY0NyUpgI2R5HX2VGPW0xCqf8
CRMu6PgpqfHLiQNWZMb7VIj3O/aWrz5cRQOf6LN3xNJ6rJqWu4AJJVR35RC78Rtf
WhfKn3BFfaatiDpNqVHu3m0iIe74anNmGcK+PMYWkMnmC3CGTifU70TOz3lQc199
wmW6osHj8ZnsxP6xm8YrIcrqfAmjCp3uBKk2sgYlscmNY7MakEgetSFq917MRHYi
2dwubj2RZ0AKOfYgefnGCtzQjHVRWoGnDRHr1OeXkK6Fxn0MGvo=
=Zo9u
-----END PGP SIGNATURE-----
commit

417c1dd1378a550e05f093457bf847912539ac68

parent

bd123b825a2ae358a3b684efc7e1b5200aff059f

2 files changed, 30 insertions(+), 4 deletions(-)

jump to
M uxn-client/n/carts → uxn-client/n/carts 
@@ -34,3 +34,26 @@ and bizniss
 and buznets
 and whimsy
 and also combs
+noodle
+orca
+left
+ustrat
+katbug
+soul grind
+hyperkaos
+niju
+pokiminz
+yeet
+funk
+what
+is
+this
+bizzzz
+eele
+blunt
+junt
+hanf
+yank
+yunt
+yeet
+eee
M uxn-client/xrxs.tal → uxn-client/xrxs.tal 
@@ -548,6 +548,10 @@ #02
 
 RTN
 
+( this scrollbar breaks down with about 2x as many cartridges as the scren
+  has room for. A better method would be keeping track of the height, step,
+  and position )
+
 @draw-scrollbar ( -> )
 
   .Screen/width DEI2 #0048 SUB2 .Screen/x DEO2

@@ -571,18 +575,17 @@
   &start-loop
   #0028 .Screen/y DEO2
   ( store the number of carts per tile of the scroll bar )
-  .ncarts LDZ .list-height LDZ SUB .list-height LDZ MOD INC
-  STH
+  .ncarts LDZ .list-height LDZ DIV STH
   
   .list-height LDZ #00
   &while EQUk ,&end JCN
     ( trough top ) 
-    DUP INC .list-top LDZ GTH ,&handle JCN
+    DUP INC STHrk MUL .list-top LDZ GTH ,&handle JCN
       INC
       INC-Y
       ,&while JMP
     &handle
-    DUP .list-top LDZ .list-height LDZ ADD STHrk SUB LTH #00 EQU ,&trough-bottom JCN
+    DUP INC INC STHrk .ncarts LDZ [ .list-top LDZ .list-height LDZ ADD ] SUB MUL ADD .list-height LDZ GTH ,&trough-bottom JCN
       ;scrollbar .Screen/addr DEO2
       #81 .Screen/sprite DEO
     &trough-bottom