commit 1fdb91ecb8d4f8162ff60da57e28b5e90fd3f045
parent 204805b5860e595532f1e9e3098a0654eb1fb017
Author: Devine Lu Linvega <aliceffekt@gmail.com>
Date: Thu, 4 May 2023 17:15:27 -0700
(amiga.tal) Tiny refactoring
Diffstat:
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/projects/examples/demos/amiga.tal b/projects/examples/demos/amiga.tal
@@ -84,10 +84,9 @@ JMP2r
POP
.ball/vx LDZ2k STH2k ROT STZ2
.ball/x LDZ2k STH2r ADD2 check-flip-vx ROT STZ2
+ .timer LDZk INC DUP ROT STZ #06 EQU ?&pull
- .timer LDZ INC .timer STZ
- .timer LDZ #05 EQU ?&pull !&pass
-
+!&pass
&pull #00 .timer STZ .ball/vy LDZ2k INC2 STH2k ROT STZ2 !&end
&pass .ball/vy LDZ2k STH2k ROT STZ2 !&end
&end .ball/y LDZ2k STH2r ADD2 check-flip-vy ROT STZ2