d6
/
uxn-utils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(wireworld.tal) Optimizations

This commit is contained in:
Devine Lu Linvega 2023-06-07 19:18:21 -07:00
parent b616a2a44c
commit 17e12eb5c8
1 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
gui/wireworld/wireworld.tal
View File

@ -198,7 +198,7 @@ JMP2r
@redraw ( -- ) @redraw ( -- )
;cell-icn .Screen/addr DEO2 ;cell-icn .Screen/addr DEO2
#01 .Screen/auto DEO [ LIT2 01 -Screen/auto ] DEO
#0000 #0000
DUP2 .Screen/x DEO2 DUP2 .Screen/x DEO2
.Screen/y DEO2 .Screen/y DEO2
@ -218,16 +218,18 @@ JMP2r
@draw-ui ( -- ) @draw-ui ( -- )
( colors ) ( colors )
#01 .Screen/auto DEO [ LIT2 01 -Screen/auto ] DEO
#0010 DUP2 .Screen/x DEO2 .Screen/y DEO2 #0010
DUP2 .Screen/x DEO2
.Screen/y DEO2
;cell-icn .Screen/addr DEO2 ;cell-icn .Screen/addr DEO2
#01 .Screen/sprite DEO [ LIT2 01 -Screen/sprite ] DEO
#02 .Screen/sprite DEO [ LIT2 02 -Screen/sprite ] DEO
#03 .Screen/sprite DEO [ LIT2 03 -Screen/sprite ] DEO
( toggle ) ( toggle )
#0030 .Screen/x DEO2 #0030 .Screen/x DEO2
;toggle-icn #00 .timer/play LDZ #30 SFT2 ADD2 .Screen/addr DEO2 ;toggle-icn [ LIT2 00 -timer/play ] LDZ #30 SFT2 ADD2 .Screen/addr DEO2
#01 .Screen/sprite DEO [ LIT2 01 -Screen/sprite ] DEO
JMP2r JMP2r