@@ 109,31 109,21 @@
|0000
@state
- &timer $1
- &blink $1
- &changed $1
+ &timer $1 &blink $1 &changed $1
@settings
- &depth $1
- &color $1
- &blending $1
- &ratio $1
- &tool $1
- &focus $2
- &zoom $1
+ &depth $1 &color $1 &blending $1 &ratio $1 &tool $1 &focus $2 &zoom $1
+@cursor
+ &x $2 &y $2 &last $1
@selection
&x1 $1 &y1 $1
&x2 $1 &y2 $1
@path
- &length $1
- &name $20
+ &length $1 &name $20
@frame
&x1 $2 &y1 $2
&x2 $2 &y2 $2
&width $2 &height $2
-@cursor
- &x $2 &y $2 &last $1
-@rect [ &x1 $2 &y1 $2 &x2 $2 &y2 $2 ]
( interface )
@toolview [ &x1 $2 &y1 $2 &x2 $2 &y2 $2 ]
@colorview [ &x1 $2 &y1 $2 &x2 $2 &y2 $2 ]
@@ 237,14 227,14 @@ BRK
@on-frame-trap ( -> )
- ( incr ) .state/timer LDZ INC DUP .state/timer STZ
+ .state/timer LDZ INC
+ DUP 8MOD ,&no-blink JCN
+ .state/blink LDZ #00 =
+ DUP 8* INC ;draw-filepath JSR2
+ .state/blink STZ
+ &no-blink
+ .state/timer STZ
- #08 ! ,&no-toggle JCN
- .state/blink TOGGLE
- #01 .state/blink LDZ 8* + ;draw-filepath JSR2
- #00 .state/timer STZ
- &no-toggle
-
BRK
@on-transfer ( -> )