define go(i) {
  if (i-50) {
    repeat(4) {
      split { forward(i/10) go(i*2/5) }
      right(90)
    }
  }
}

pen(1)
go(1000)