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)
}