Sad Turtle Happy Turtle

No preview image

1 collaborator

Daniel Kim (Author)

WHAT IS IT?

This section could give a general understanding of what the model is trying to show or explain.

HOW IT WORKS

This section could explain what rules the agents use to create the overall behavior of the model.

HOW TO USE IT

This section could explain how to use the model, including a description of each of the items in the interface tab.

THINGS TO NOTICE

This section could give some ideas of things for the user to notice while running the model.

THINGS TO TRY

This section could give some ideas of things for the user to try to do (move sliders, switches, etc.) with the model.

EXTENDING THE MODEL

This section could give some ideas of things to add or change in the procedures tab to make the model more complicated, detailed, accurate, etc.

NETLOGO FEATURES

This section could point out any especially interesting or unusual features of NetLogo that the model makes use of, particularly in the Procedures tab. It might also point out places where workarounds were needed because of missing features.

RELATED MODELS

This section could give the names of models in the NetLogo Models Library or elsewhere which are of related interest.

CREDITS AND REFERENCES

This section could contain a reference to the model's URL on the web if it has one, as well as any other necessary credits or references.

Comments and Questions

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

Click to Run Model

breed [sadturtles sadturtle] ;; sad turtles walk down
breed [happyturtles happyturtle] ;; happy turtles walk up

to setup1
  clear-all
  create-turtles 100
  ask turtles [ setxy random-xcor random-ycor ]
end 

to setup2
  clear-all
  create-turtles 100
  ask turtles [ 
    right random 360
    forward random 100
    right random 360
  ]
end 

to colorpatches
  ask turtle 1 [
    hide-turtle
    right random 360
    forward 1
    if pcolor = black [
      set pcolor orange
    ]
  ]
end 

to chasemouse
  ask turtles [
    facexy mouse-xcor mouse-ycor
    forward 1
  ]
end 

to breedsetup
  
  clear-all  
  ask patches [set pcolor blue - 2]

  let cloudx random-xcor 
  let cloudy random-ycor
  
  create-sadturtles 30
  ask sadturtles [ 
    set shape "turtle"
    set color black + random 2 + 1
    set size random 2 + 1
    setxy cloudx cloudy
    right random 360
    forward random 7
    right random 360
    forward random 7
    facexy xcor ycor - 1
  ]
  
  create-happyturtles 30
  ask happyturtles [
    set shape "turtle"
    set color yellow + random 2 + 1
    set size random 2 + 1
    setxy cloudx cloudy
    right random 360
    forward random 7
    right random 360
    forward random 7
    facexy xcor ycor + 1
  ]
end 

to updownturtle
  ask sadturtles [set ycor ycor - 1]
  ask happyturtles [set ycor ycor + 1]
end

There is only one version of this model, created over 14 years ago by Daniel Kim.

Attached files

No files

This model does not have any ancestors.

This model does not have any descendants.

NetLogo