Seven Segment Display

No preview image

1 collaborator

Default-person Gagana B (Author)
Add Collaborator

Close

Tags

(This model has yet to be categorized with any tags)
Add New Tag

Close

Visible to everyone | Changeable by the author
Model was written in NetLogo 5.1.0 • Viewed 292 times • Downloaded 37 times • Run 0 times
Download the 'Seven Segment Display' modelDownload this model • Embed this model

Do you have questions or comments about this model? Ask them here! (You'll first need to log in.)

WHAT IS IT?

This model attempts to mimic the seven segment display screens usually seen on calculators and other electronic devices and is extended to letters and numbers.

HOW IT WORKS

The agents can move only in straight lines and at 0, 180, 270, 90 degrees and slant lines are completely forbidden as per the rules of the display.

HOW TO USE IT

Click on the display button and watch the magic of the seven segments.

THINGS TO NOTICE

Notice that alphabets like K,M,N etc. are missing due to their inability to be expressed in the standard seven segment display.

EXTENDING THE MODEL

The model can be extended to other languages (although a lot of alphabets may not be possible) and to other number systems like Roman.

Comments and Questions

Please start the discussion about this model! (You'll first need to log in.)

Click to Run Model 

;;seven segment display
;;Project by Gagana B

to setup
  clear-all
  
  ;;A
  clear-all
  create-turtles 1
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "down"] 
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"] 
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"] 
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"] 
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"] 
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"] 
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"] 
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"] 
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"] 
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"] 
  ask turtle 0[forward 2.5]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"] 
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;B
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;C
  clear-all
  create-turtles 1
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;D
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;E
  clear-all
  create-turtles 1
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;F
  clear-all
  create-turtles 1
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;G
  clear-all
  create-turtles 1
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[die]

  ;;H
  clear-all
  create-turtles 1
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 4]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 3]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;I
  clear-all
  create-turtles 1
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;J
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2.5]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die] 
  
  ;;K
  ;;not possible
  
  ;;L
  clear-all
  create-turtles 1
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 6]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;M
  ;;not possible
    
  ;;N
  ;;not possible
  
  ;;O
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;P
  clear-all
  create-turtles 1
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;Q
  ;;not possible
  
  ;;R
  ;;not possible
  
  ;;S
  clear-all
  create-turtles 1
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;T
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2.5]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[die] 
  
  ;;U
  clear-all
  create-turtles 1
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;V
  ;;not possible
  
  ;;W
  ;;not possible
  
  ;;X
  ;;not possible
  
  ;;Y
  ;;not possible
  
  ;;Z
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;0
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;1
  clear-all
  create-turtles 1
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;2
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;3
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
   
  ;;4
  clear-all
  create-turtles 1
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 4]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;5
  clear-all
  create-turtles 1
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;6
  clear-all
  create-turtles 1
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;7
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;8
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
  
  ;;9
  clear-all
  create-turtles 1
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 0]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 3]
  ask turtle 0[set heading 90]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 2]
  ask turtle 0[set heading 180]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[set pen-mode "up"]
  ask turtle 0[forward 1]
  ask turtle 0[set heading 270]
  ask turtle 0[set pen-mode "down"]
  ask turtle 0[forward 2]
  ask turtle 0[die]
end

There is only one version of this model, created almost 11 years ago by Gagana B.

Attached files

No files

This model does not have any ancestors.

This model does not have any descendants.