~rabbits/nasu

029e9c9258294918c7957e3b9d079f8e44ba4505 — neauoire 1 year, 6 months ago 197a7a8
Fixed overflow in GET-POSITION
1 files changed, 1 insertions(+), 1 deletions(-)

M src/main.tal
M src/main.tal => src/main.tal +1 -1
@@ 68,7 68,7 @@
%BANK-TEMP { #4000 }

%GET-COLOR     { .settings/color LDZ STHk 2/ + DEI #01 STHr #01 AND - 4* SFT #0f AND }
%GET-POSITION  { .settings/focus LDZ2 BANK -- DUP2 2// WIDTH 100MOD2 SWP2 200// 8** }
%GET-POSITION  { .settings/focus LDZ2 BANK -- DUP2 2// 100MOD2 SWP2 WIDTH 2** DIV2 8** }
%ADD-POSITIONS { ROT2 ++ ROT2 ROT2 ++ SWP2 }
%RELEASE-MOUSE { #00 .Mouse/state DEO }
%RESET-SELECTION { .selection/x1 LDZ2 .selection/x2 STZ2 }