Code Sketch

cleari()
setSpeed(superFast)
setBackground(red)
setPenColor(cm.white)

setPosition(0, 50)
repeatFor(rangeTo(1, 50)) { a =>
    repeat(60) {
        forward(a)
        right(50 * 2 + 120)
    }
    right(90)
}

setPosition(100, 150)
repeatFor(rangeTo(1, 30)) { a =>
    repeat(60) {
        forward(a)
        right(50 * 2 + 60)
    }
    right(90)
}
setPosition(150, 0)
repeatFor(rangeTo(1, 30)) { a =>
    repeat(60) {
        forward(a)
        right(50 * 2 + 60)
    }
    right(90)
}
setPosition(-100, -80)
repeatFor(rangeTo(1, 30)) { a =>
    repeat(60) {
        forward(a)
        right(50 * 2 + 60)
    }
    right(90)
}
setPosition(-150, 100)
repeatFor(rangeTo(1, 30)) { a =>
    repeat(60) {
        forward(a)
        right(50 * 2 + 60)
    }
    right(90)
}