9 lines
314 B
Text
9 lines
314 B
Text
S ← 60
|
|
Pt ← 0.01
|
|
Pf ← 0.0005
|
|
˙⊞(<Pt⋅⋅⚂)⇡S
|
|
Ns ← [¯1_¯1 ¯1_0 ¯1_1 0_¯1 0_1 1_¯1 1_0 1_1]
|
|
NsOnFire ← ↯∞_S≡(/+=2⬚0⊡+Ns¤)⊙¤♭₂˙⊞⊟⇡S
|
|
[⍥(≡₀⨬(<Pt⋅⚂|⨬(+1<Pf⚂|2)>0|⋅0)⟜⊸NsOnFire)200]
|
|
⊢≡₁⨬(0_0_0|0_1_0|1_0_0)
|
|
≡(▽⟜≡▽3) # Upscale
|