sw: shave two bytes off

2021-02-21 00:57:18 -05:00 · 2021-02-21 00:57:18 -05:00 · 98b2178304
parent 62edc0c5b8
commit 98b2178304
1 changed files with 2 additions and 2 deletions
--- a/textmode/mousetext/sw.bas
+++ b/textmode/mousetext/sw.bas
@ -3,6 +3,6 @@
 3FORI=0TO1:COLOR=6-I:FORJ=0TO1
 4HLIN8,10AT6+J*10+I:HLIN7,11AT8+J*6+I:HLIN6,12AT10+J*2+I:NEXTJ,I
 6VTAB6:HTAB11:?"()"
-7FORX=12TO36:POKE1064+X,90:POKE1065+X,91:POKE1066+X,95
-8FORI=1TO200:NEXT:VTAB9:HTABX+1:?"   ":NEXT
+7FORX=13TO37:POKE1063+X,90:POKE1064+X,91:POKE1065+X,95
+8FORI=1TO200:NEXT:VTAB9:HTABX:?"   ":NEXT
 9GOTO7