fix off-by-1 pixel error in list click routine

This commit is contained in:
Iris Lightshard 2023-03-20 23:37:02 -06:00
parent 91dd545b3d
commit f9ee51b9c9
Signed by: Iris Lightshard
GPG key ID: 3B7FBC22144E6398

View file

@ -319,7 +319,7 @@ JMP2r
( check bounds )
.Mouse/x DEI2 .Screen/width DEI2 #0008 SUB2 GTH2 ,&done JCN
.Mouse/y DEI2 ,&y LDR2 LTH2 ,&done JCN
.Mouse/y DEI2 ,&y LDR2 [ STHkr LB_HEIGHT LDZ #00 SWP #30 SFT2 ] ADD2 GTH2 ,&done JCN
.Mouse/y DEI2 ,&y LDR2 [ STHkr LB_HEIGHT LDZ #00 SWP #30 SFT2 ] ADD2 #0001 SUB2 GTH2 ,&done JCN
( check scrollwheel )
.Mouse/scrolly DEI2 #0000 EQU2 ,&no_scroll JCN