сброс
рх 550,200
тп 1
цп 128,128,255
нпр 0
$x=0
повтори 10 {
$x=$x+50
иди $x,200
вп 200
}
нпр 90
$y=0
повтори 3 {
$y=$y+50
иди 0,$y
вп 550
}
тп 5
цп 255,0,0
нпр 0
иди 100,150
вп 100
лв 135
вп 70
нпр 90
иди 150,50
вп 50
пр 90
вп 50
пр 45
вп 70
лв 135
вп 50
нпр 90
иди 250,50
вп 50
пр 90
вп 100
пр 90
вп 50
иди 300,100
вп 50
нпр 0
иди 400,150
вп 100
нпр 180
иди 350,50
вп 50
лв 90
вп 50
нпр 90
иди 450,150
вп 50
лв 90
вп 50
лв 90
вп 50
пр 90
вп 50
пр 90
вп 50
сч