commit 220983d69488c433198a65e87880d6cfa6467f5b parent c9b691448b6119250ebc10b181eda8cb6b7dc472 Author: Devine Lu Linvega <aliceffekt@gmail.com> Date: Sun, 24 Mar 2024 10:36:25 -0700 (snake) Faster tail drawing Diffstat:
| M | projects/examples/demos/snake.tal | | | 8 | ++++---- |
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/projects/examples/demos/snake.tal b/projects/examples/demos/snake.tal @@ -110,12 +110,12 @@ STH ( | draw tail ) ;snake-icns .Screen/addr DEO2 - .snake/length LDZ #00 + .snake/tail .snake/length LDZ DUP ADD OVR ADD SWP &>loop ( -- ) - DUPk ADD .snake/tail ADD LDZ #0005 SFT2 .Screen/x DEO2 - DUPk ADD .snake/tail ADD INC LDZ #0005 SFT2 .Screen/y DEO2 + LDZk #0005 SFT2 .Screen/x DEO2 + INCk LDZ #0005 SFT2 .Screen/y DEO2 STHkr .Screen/sprite DEO - INC GTHk ?&>loop + INC INC GTHk ?&>loop POP2 ( | draw head ) .snake/x LDZ #0005 SFT2 .Screen/x DEO2