From e618a8010a81e084e4ec43636f728fc3f978c804 Mon Sep 17 00:00:00 2001 From: d_m Date: Sun, 18 Aug 2024 23:33:48 -0400 Subject: [PATCH] improve cursor offsets --- kodiak.rom | Bin 18445 -> 18445 bytes kodiak.tal | 8 ++++---- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/kodiak.rom b/kodiak.rom index dc05fd393043f60bab5e8f82bf885352301df955..a25924e5ebb81f1af21722a641eb09e71843ffa7 100644 GIT binary patch delta 65 zcmeC3z}P#1aYHSS5sPJmhIzvSg9Qw%mJM3w3xw3f8yp+-r;Fz_OfpkzxM#S40it9I PkoN${W8J)-C(arG%+(e0 delta 65 zcmeC3z}P#1aYHSS5u0U$hIzvSg9QvgmX`SfAvN&^#|HiB;yDeI%+wn08Gv`g=0nMHj_y7O^ diff --git a/kodiak.tal b/kodiak.tal index 1ed8c50..fceeeb7 100644 --- a/kodiak.tal +++ b/kodiak.tal @@ -753,14 +753,14 @@ @clear-prev-mouse ( -> ) ;blank .Screen/addr DEO2 - .prev/mouse-x LDZ2 #0006 SUB2 .Screen/x DEO2 - .prev/mouse-y LDZ2 #0006 SUB2 .Screen/y DEO2 + .prev/mouse-x LDZ2 #0004 SUB2 .Screen/x DEO2 + .prev/mouse-y LDZ2 #0005 SUB2 .Screen/y DEO2 [ LIT2 12 -Screen/auto ] DEO #41 .Screen/sprite DEOk DEO JMP2r @draw-curr-mouse ( -> ) - .Mouse/x DEI2 DUP2 .prev/mouse-x STZ2 #0006 SUB2 .Screen/x DEO2 - .Mouse/y DEI2 DUP2 .prev/mouse-y STZ2 #0006 SUB2 .Screen/y DEO2 + .Mouse/x DEI2 DUP2 .prev/mouse-x STZ2 #0004 SUB2 .Screen/x DEO2 + .Mouse/y DEI2 DUP2 .prev/mouse-y STZ2 #0005 SUB2 .Screen/y DEO2 .dragging LDZ ?&skip ( | draw ) [ LIT2 16 -Screen/auto ] DEO