improve cursor offsets

This commit is contained in:
~d6 2024-08-18 23:33:48 -04:00
parent 8db2f9d4ac
commit e618a8010a
2 changed files with 4 additions and 4 deletions

Binary file not shown.

View File

@ -753,14 +753,14 @@
@clear-prev-mouse ( -> ) @clear-prev-mouse ( -> )
;blank .Screen/addr DEO2 ;blank .Screen/addr DEO2
.prev/mouse-x LDZ2 #0006 SUB2 .Screen/x DEO2 .prev/mouse-x LDZ2 #0004 SUB2 .Screen/x DEO2
.prev/mouse-y LDZ2 #0006 SUB2 .Screen/y DEO2 .prev/mouse-y LDZ2 #0005 SUB2 .Screen/y DEO2
[ LIT2 12 -Screen/auto ] DEO [ LIT2 12 -Screen/auto ] DEO
#41 .Screen/sprite DEOk DEO JMP2r #41 .Screen/sprite DEOk DEO JMP2r
@draw-curr-mouse ( -> ) @draw-curr-mouse ( -> )
.Mouse/x DEI2 DUP2 .prev/mouse-x STZ2 #0006 SUB2 .Screen/x DEO2 .Mouse/x DEI2 DUP2 .prev/mouse-x STZ2 #0004 SUB2 .Screen/x DEO2
.Mouse/y DEI2 DUP2 .prev/mouse-y STZ2 #0006 SUB2 .Screen/y DEO2 .Mouse/y DEI2 DUP2 .prev/mouse-y STZ2 #0005 SUB2 .Screen/y DEO2
.dragging LDZ ?&skip .dragging LDZ ?&skip
( | draw ) ( | draw )
[ LIT2 16 -Screen/auto ] DEO [ LIT2 16 -Screen/auto ] DEO