kturtle/data/trianglesss.logo


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

# draw triangle wheels

reset

learn triangle X [
  repeat 3 [  
    forward X
    turnleft 120
  ]
]

for r = 1 to 30 [
  clear
  repeat 18 [
    triangle r*r*5
    tr 20
  ]
  wait 1
]

wait 3
clear

print "  I'm tired..."