Browse Source

Improved blendview

main
neauoire 4 years ago
parent
commit
9b685a225e
  1. 21
      src/main.tal

21
src/main.tal

@ -120,7 +120,9 @@
@state
&timer $1 &blink $1 &changed $1
@settings
&depth $1 &color $1 &blend $1 &ratio $1 &tool $1 &focus $2 &zoom $1
&depth $1 &color $1 &blend $1
&ratio $1 &tool $1 &focus $2
&zoom $1
@cursor
&x $2 &y $2 &last $1
@selection
@ -500,7 +502,8 @@ BRK
( skip ) .Mouse/state DEI #00 ! BRK?
#01
.settings/focus LDZ2 BANK-SPRITESHEET -- 10// NIP
.Mouse/y DEI2 .nametable/y LDZ2 -- 8// 10**
.Mouse/x DEI2 .nametable/x LDZ2 -- 8// ++
BANK-NAMETABLE ++ STA
@ -621,24 +624,18 @@ BRK
.Mouse/x DEI2 .blendview/x1 LDZ2 -- 8// NIP
.Mouse/y DEI2 .blendview/y1 LDZ2 -- 8// NIP 4* +
DUP #0f > ,&no-set JCN
.settings/blend LDZ #b0 AND + .settings/blend STZ
;draw-blendview JSR2
;draw-preview JSR2
RELEASE-MOUSE BRK
DUP .settings/blend LDZ #b0 AND + .settings/blend STZ
&no-set
DUP #12 ! ,&no-hor JCN
.settings/blend LDZ #10 EOR .settings/blend STZ
;draw-blendview JSR2
;draw-preview JSR2
RELEASE-MOUSE POP BRK
&no-hor
DUP #13 ! ,&no-ver JCN
.settings/blend LDZ #20 EOR .settings/blend STZ
;draw-blendview JSR2
;draw-preview JSR2
RELEASE-MOUSE POP BRK
&no-ver
POP
;draw-blendview JSR2
;draw-preview JSR2
RELEASE-MOUSE
BRK

Loading…
Cancel
Save