Added day 3

2022-12-14 19:41:09 -08:00 · 2022-12-14 19:41:09 -08:00 · bce12147fb
parent 290797e785
commit bce12147fb
1 changed files with 39 additions and 0 deletions
--- a/ttc/day3.tal
+++ b/ttc/day3.tal
@ -0,0 +1,39 @@
+|00 @System &vector $2 &pad $6 &r $2 &g $2 &b $2
+|20 @Screen &vector $2 &width $2 &height $2 &auto $1 &pad $1 &x $2 &y $2 &addr $2 &pixel $1 &sprite $1
+
+|0000
+
+	@f $2
+
+|0100
+
+	#ff0f .System/r DEO2
+	#f0a0 .System/g DEO2
+	#f020 .System/b DEO2
+	( size )
+	#0100 .Screen/width DEO2
+	#0080 .Screen/height DEO2
+	( animate )
+	;on-frame .Screen/vector DEO2
+
+BRK
+
+@on-frame ( -> )
+
+	.Screen/height DEI2 #0000
+	&v
+		STHk
+		DUP2 .Screen/y DEO2
+		.Screen/width DEI2 #0000
+		&h
+			DUP2 .Screen/x DEO2
+			DUP STHkr ADD #1f AND .f LDZ ADD #03 SFT
+				.Screen/pixel DEO
+			INC2 GTH2k ,&h JCN
+		POP2 POP2 POPr
+		INC2 GTH2k ,&v JCN
+	POP2 POP2
+	.f LDZk INC SWP STZ
+
+BRK
+