~rabbits/oekaki

6b0b4942d987f70ce92e1c4e47416070cb653c5d — neauoire 6 months ago c6151c5
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