etc
/
uxn
mirror of https://git.sr.ht/~rabbits/uxn
0
1
Fork 0
Code Issues Projects Releases Wiki Activity

(life.tal) Merged LITs

This commit is contained in:
Devine Lu Linvega 2024-03-02 20:12:47 -08:00
parent 4885cbe23b
commit 537d9a8dbf
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
projects/examples/demos/life.tal
View File

@ -43,7 +43,7 @@
BRK BRK
@on-frame ( -> ) @on-frame ( -> )
.Mouse/state DEI #00 EQU ?{ BRK } [ LIT2 00 -Mouse/state ] DEI EQU ?{ BRK }
#0000 .world/count STZ2 #0000 .world/count STZ2
[ LIT &f $1 ] INCk ,&f STR [ LIT &f $1 ] INCk ,&f STR
( ) #03 AND #00 EQU ?{ BRK } ( ) #03 AND #00 EQU ?{ BRK }
@ -136,9 +136,9 @@
@<draw-grid> ( -- ) @<draw-grid> ( -- )
( draw cell count ) .anchor/x LDZ2 .Screen/x DEO2 ( draw cell count ) .anchor/x LDZ2 .Screen/x DEO2
.anchor/y2 LDZ2 #0008 ADD2 .Screen/y DEO2 .anchor/y2 LDZ2 #0008 ADD2 .Screen/y DEO2
#01 .Screen/auto DEO [ LIT2 01 -Screen/auto ] DEO
.world/count LDZ2 <draw-short> .world/count LDZ2 <draw-short>
#00 .Screen/auto DEO [ LIT2 00 -Screen/auto ] DEO
#4000 #4000
&ver ( -- ) &ver ( -- )
#00 OVRk ADD2 .anchor/y LDZ2 ADD2 .Screen/y DEO2 #00 OVRk ADD2 .anchor/y LDZ2 ADD2 .Screen/y DEO2