1 2 3 4 5 6 7 8 9 10 11 12 13
# Rulitos restaurar levantarpluma avanzar 50 bajarpluma repetir 4 [ para x = 1 a 100 [ avanzar 10 derecha 100 - x ] ]