diff --git a/src/main.tal b/src/main.tal index 1ea1f37..35d42d5 100644 --- a/src/main.tal +++ b/src/main.tal @@ -953,7 +953,7 @@ RTN STH .Screen/y DEO2 .Screen/x DEO2 - #10 #00 + #10 #00 &loop DUP STHkr > #08 * TOS ;slider-icns ++ .Screen/addr DEO2 #02 .Screen/sprite DEO @@ -972,14 +972,14 @@ RTN .settings/focus LDZ2 BANK -- #02 ;draw-short JSR2 ( depth1 ) - #00 #04 + #04 #00 &loop .dataview/x1 LDZ2 .Screen/x DEO2 - OVR #08 * TOS .dataview/y1 LDZ2 ++ .Screen/y DEO2 - OVR #02 * TOS .settings/focus LDZ2 ++ LDA2 #03 ;draw-short JSR2 + DUP #08 * TOS .dataview/y1 LDZ2 ++ .Screen/y DEO2 + DUP #02 * TOS .settings/focus LDZ2 ++ LDA2 #03 ;draw-short JSR2 .dataview/x1 LDZ2 #0020 ++ .Screen/x DEO2 - OVR #02 * TOS .settings/focus LDZ2 ++ #0008 ++ LDA2 #03 ;draw-short JSR2 - INCR LTHk ,&loop JCN + DUP #02 * TOS .settings/focus LDZ2 ++ #0008 ++ LDA2 #03 ;draw-short JSR2 + #01 + GTHk ,&loop JCN POP2 RTN