Warning, /education/kturtle/scripts/triangles.turtle is written in an unsupported language. File is not indexed.

0001 kturtle-script-v1.0
0002 @(reset)
0003 @(canvascolor) 0@(,) 0@(,) 0
0004 
0005 @(learn) triangle $size {
0006         @(repeat) 3 {
0007                 @(forward) $size
0008     @(turnleft) 120
0009   }
0010 }
0011 
0012 @(for) $r = 1 @(to) 12 {
0013   @(for) $n = 1 @(to) 12 {
0014                 $c = $n * $n * 1.7
0015                 @(pencolor) $c@(,) 256 - $c@(,) 256 - $r * 21 
0016     triangle 200 - $r * $r
0017     @(turnright) 30.25
0018   }
0019         @(turnright) 2
0020 }
0021 
0022 @(direction) 0