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

0001 kturtle-script-v1.0
0002 # draw many squares
0003 
0004 @(learn) square $x {
0005   @(repeat) 4 {
0006     @(forward) $x
0007     @(turnleft) 90
0008   }
0009 }
0010 
0011 @(reset)
0012 @(penup)
0013 @(go) 150@(,) 200
0014 @(pendown)
0015 @(penwidth) 5
0016 
0017 @(repeat) 12 {
0018   @(penup)
0019   @(forward) 30
0020   @(pendown)
0021   square 80
0022   @(turnright) 30
0023 }