adding the mattgonlol

This commit is contained in:
Matt Nish-Lapidus 2024-06-18 16:33:06 -04:00
parent b68fcfc77c
commit 5bef96236f

21
mattgonlol.ld Normal file
View File

@ -0,0 +1,21 @@
fn ngon! (sides, size) -> repeat sides { fd!(size); lt!(inv(sides)) }
let cpal = [(100,255,100,100),(80,100,200,170)]
fn spingon! (sides, size, count) -> {
if eq? (count, 0) then {
"enough!"
} else {
rt!(inv(sides))
pencolor!(random(cpal))
ngon! (sides, size)
spingon! (sides, inc(size), dec(count))
}
}
& spingon!(8, 40, 50)
repeat 5 {
spingon!(8, 40, 50)
rt!(0.3)
}