From b43ed9766a7f97473fa23f768b96eaad41d96c90 Mon Sep 17 00:00:00 2001 From: Derek Stevens Date: Tue, 12 Oct 2021 01:03:51 -0600 Subject: [PATCH] only update scrollbar position if it will actually be drawn --- uxn-client/uxn-xrxs.sh | 11 +++++++---- uxn-client/xrxs.tal | 8 ++++---- 2 files changed, 11 insertions(+), 8 deletions(-) mode change 100644 => 100755 uxn-client/uxn-xrxs.sh diff --git a/uxn-client/uxn-xrxs.sh b/uxn-client/uxn-xrxs.sh old mode 100644 new mode 100755 index 860b83b..a686865 --- a/uxn-client/uxn-xrxs.sh +++ b/uxn-client/uxn-xrxs.sh @@ -1,8 +1,11 @@ #!/bin/sh -ADDR=localhost -PORT=2650 +ADDR=209.141.55.64 +PORT=5460 -9pfuse 'tcp!${ADDR}!${PORT}' ./n/ & +9pfuse "tcp!${ADDR}!${PORT}" ./n/ & sleep 1 uxnemu ./xrxs.rom -echo "logout" >> ./n/ctl \ No newline at end of file +if [ -e ./n/ctl ]; then + echo "logout" >> ./n/ctl +fi +fusermount -u ./n diff --git a/uxn-client/xrxs.tal b/uxn-client/xrxs.tal index 801d44d..185645f 100644 --- a/uxn-client/xrxs.tal +++ b/uxn-client/xrxs.tal @@ -626,16 +626,16 @@ BRK .ncarts LDZ .list-height LDZ LTH ,&no-scroll-up JCN .list-top LDZ #00 EQU ,&no-scroll-up JCN .list-top LDZ #01 SUB .list-top STZ + ;update-sb-pos JSR2 &no-scroll-up - ;update-sb-pos JSR2 RTN @try-scroll-down-mouse ( -> ) .ncarts LDZ .list-height LDZ LTH ,&no-scroll-down JCN .list-top LDZ .list-height LDZ ADD .ncarts LDZ #01 ADD EQU ,&no-scroll-down JCN .list-top LDZ INC .list-top STZ + ;update-sb-pos JSR2 &no-scroll-down - ;update-sb-pos JSR2 RTN @@ -644,8 +644,8 @@ RTN DUP .list-top LDZ NEQ ,&no-scroll-up JCN .list-top LDZ #00 EQU ,&no-scroll-up JCN .list-top LDZ #01 SUB .list-top STZ + ;update-sb-pos JSR2 &no-scroll-up - ;update-sb-pos JSR2 RTN @try-scroll-down ( -> ) @@ -653,8 +653,8 @@ RTN DUP .list-top LDZ .list-height LDZ ADD #01 SUB NEQ ,&no-scroll-down JCN .list-top LDZ .list-height LDZ ADD .ncarts LDZ #01 ADD EQU ,&no-scroll-down JCN .list-top LDZ INC .list-top STZ + ;update-sb-pos JSR2 &no-scroll-down - ;update-sb-pos JSR2 RTN @update-sb-pos ( -> )