cleari()
setSpeed(superFast)
val cb = canvasBounds
val s = cm.radialGradient(0, 0, black, 24.100, red, true)
val clr = cm.radialMultipleGradient(0, 0, cb.height / 2, List(0, 0.7, 1), List(red, yellow, orange))
setBackground(clr)
setPenColor(s)
//setPenColor(black)
setPosition(0, 0)
right(35)
repeat(4){
right(110)
repeat(4){
right(90)
repeat(18){
right(100)
forward(100)
}
}
}