Dan Ros

• @mbedmicro
  to tri :size
  repeat 3 [fd :size rt 120]
  end #
• @mbedmicro square #
• @mbedmicro repeat 5 [ fd 10 square ] #
• @mbedmicro rt 180 fd 50
  repeat 3 [ tri 10 fd 10 ] #
• @mbedmicro tri 100 #
• @mbedmicro repeat 5 [ tri 200 fd 30 ] #
• @mbedmicro
  TO circle
  REPEAT 90 [FD 1 RT 4]
  END #
• @mbedmicro
  REPEAT 90
  [
  //"circle" function call
  circle
  FD 4 RT 4
  ] #
• @mbedmicro
  REPEAT 90 [ circle FD 4 RT 4 ] #
• @mbedmicro REPEAT 90 [ circle FD 4 RT 4 ] #
• @mbedmicro fd 200 #
• @mbedmicro repeat 30 [ tri 50 fd 10 ] #
• @mbedmicro REPEAT 30 [ circle FD 4 RT 4 ] #
• @mbedmicro
  to spiral :size :angle
  if :size > 100 [stop]
  forward :size
  right :angle
  spiral :size + 2 :angle
  end #
• @mbedmicro
  fd 50
  spiral [0 91] #
• @mbedmicro spiral 0 91 #
• @mbedmicro repeat 250 [ fd repcount rt 89 ] #
• @mbedmicro spiral 1 120 #
• @mbedmicro
  to tree :size
  if :size < 4 [stop]
  fd :size
  lt 20
  tree :size / 2
  rt 40
  tree :size / 2
  lt 20
  rt 180
  fd :size
  end #
• @mbedmicro tree 50 #

Powered by Twitter Tools.