summaryrefslogtreecommitdiffstats
path: root/tde-i18n-es/data/tdeedu/kturtle/triangulos.logo
blob: 8e148fb3fbe3ce9148875cf76211ed4c211827ec (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
# Dibujar triángulos en serie

restaurar 

aprender triangle X [ 
  repetir 3 [  
    avanzar X
    izquierda 120
  ]
]

para r = 1 a 30 [
  limpiar
  repetir 18 [
    triangle r*r*5
    dch 20
  ]
  esperar 1
]

esperar 3 
limpiar 

escribir "  Me cansé..."