From 6b0b4942d987f70ce92e1c4e47416070cb653c5d Mon Sep 17 00:00:00 2001
From: neauoire <aliceffekt@gmail.com>
Date: Tue, 22 Aug 2023 11:25:03 -0700
Subject: [PATCH] faster spray

---
 src/oekaki.tal | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/oekaki.tal b/src/oekaki.tal
index 7c29ffc..c61ff67 100644
--- a/src/oekaki.tal
+++ b/src/oekaki.tal
@@ -664,9 +664,10 @@
 	POP2 POP2 JMP2r
 
 @update-spray ( -- )
+	prng ,&seed STR2
 	#0800
 	&l ( -- )
-		( patt ) prng prng AND2 AND
+		( patt ) prng [ LIT2 &seed $2 ] AND2 AND
 		( save ) OVR #00 SWP ;patts-icns/spray ADD2 STA
 		INC GTHk ?&l
 	POP2
-- 
2.45.2