Browse code
(wireworld.tal) Fixed mouse picking issue
neauoire authored on 07/06/2023 16:58:10
Showing 1 changed files
| ... | ... |
@@ -82,27 +82,24 @@ BRK |
| 82 | 82 |
|
| 83 | 83 |
@on-mouse-down ( -> ) |
| 84 | 84 |
|
| 85 |
+ .Mouse/y DEI2 #03 SFT2 NIP #02 NEQ ?&no-menu |
|
| 85 | 86 |
.Mouse/x DEI2 #03 SFT2 NIP |
| 86 |
- .Mouse/y DEI2 #03 SFT2 NIP |
|
| 87 |
- #0202 NEQ2k NIP2 ?&no-color1 |
|
| 87 |
+ DUP #02 NEQ ?&no-color1 |
|
| 88 | 88 |
#01 set-color |
| 89 |
- POP2 BRK |
|
| 90 | 89 |
&no-color1 |
| 91 |
- #0302 NEQ2k NIP2 ?&no-color2 |
|
| 90 |
+ DUP #03 NEQ ?&no-color2 |
|
| 92 | 91 |
#02 set-color |
| 93 |
- POP2 BRK |
|
| 94 | 92 |
&no-color2 |
| 95 |
- #0402 NEQ2k NIP2 ?&no-color3 |
|
| 93 |
+ DUP #04 NEQ ?&no-color3 |
|
| 96 | 94 |
#03 set-color |
| 97 |
- POP2 BRK |
|
| 98 | 95 |
&no-color3 |
| 99 |
- #0602 NEQ2k NIP2 ?&no-toggle |
|
| 96 |
+ DUP #06 NEQ ?&no-toggle |
|
| 100 | 97 |
.timer/play LDZk #00 EQU SWP STZ |
| 101 | 98 |
#00 .Mouse/state DEO |
| 102 | 99 |
draw-ui |
| 103 |
- POP2 BRK |
|
| 104 | 100 |
&no-toggle |
| 105 |
- POP2 |
|
| 101 |
+ POP |
|
| 102 |
+ &no-menu |
|
| 106 | 103 |
|
| 107 | 104 |
( color ) .color LDZ .Mouse/state DEI #01 GTH #00 EQU MUL |
| 108 | 105 |
( cell* ) .Mouse/x DEI2 #02 SFT2 NIP .Mouse/y DEI2 #02 SFT2 NIP |