adding the mattgonlol
This commit is contained in:
parent
b68fcfc77c
commit
5bef96236f
21
mattgonlol.ld
Normal file
21
mattgonlol.ld
Normal 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)
|
||||
}
|
Loading…
Reference in New Issue
Block a user