faster spray
1 files changed, 2 insertions(+), 1 deletions(-) M src/oekaki.tal
M src/oekaki.tal => src/oekaki.tal +2 -1
@@ 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