Browse Source

Fixed overflow in GET-POSITION

main
neauoire 5 years ago
parent
commit
029e9c9258
  1. 2
      src/main.tal

2
src/main.tal

@ -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 }

Loading…
Cancel
Save