Pause during mouse-down

This commit is contained in:
Devine Lu Linvega 2023-06-07 18:48:25 -07:00
parent a9d4e30a0d
commit cfc7c0f928
1 changed files with 5 additions and 5 deletions

View File

@ -14,7 +14,7 @@
@color $1
@pointer &x $2 &y $2
@timer &frame $1 &play $1
@timer &play $1
(
@|vectors )
@ -44,13 +44,13 @@ BRK
@on-frame ( -> )
.Mouse/state DEI #00 EQU [ JMP BRK ]
.timer/play LDZ [ JMP BRK ]
( every 4th )
.timer/frame LDZk
[ LIT &f $1 ] INCk ,&f STR
#03 AND ?&no-run
run
&no-run
LDZk INC SWP STZ
run &no-run
BRK