kturtle/data/squaresss.logo

   1 # draw many squares
   2
   3 learn square X [
   4   repeat 4 [
   5     forward X
   6     turnleft 90
   7   ]
   8 ]
   9
  10 reset
  11 canvassize 400, 400
  12 go 150,200
  13 penwidth 5
  14 hide
  15
  16 repeat 12 [
  17   penup
  18   forward 30
  19   pendown
  20   square 80
  21   turnright 30
  22 ]