MIHS-18 Period 5 Regan W

1 collaborator

Regan W (Author)

Tags

Model was written in NetLogo 3D 6.0.4 • Viewed 71 times • Downloaded 6 times • Run 0 times

Download the 'MIHS-18 Period 5 Regan W' model

Download this model • Embed this model

To embed this model in another Web site, use the following link:

  <iframe src="http://modelingcommons.org/browse/one_model/5834?embedded=true" />

Info
Discuss
Run in NetLogo Web
Code
History
Files
Family

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

## WHAT IS IT?

A Model showing a population of red bugs who reproduce fast, who only eat grass, be replaced with a population of blue bugs who can eat red and greed grass but reproduce slowly.

## HOW IT WORKS

The model starts off with a random number of red bugs and a random number of blue bugs are introduced.

## HOW TO USE IT

Press the 'setup' and then the 'go' button' when you want to move one tick forward.

## THINGS TO NOTICE

Depending on the number of starting bungs, the blue bug end number will be different

## THINGS TO TRY

Add more bugs if youd like, or more grass colours.

## EXTENDING THE MODEL

Many things could be added, the sky's the limit.

## RELATED MODELS

Sheep-Wolf-Predation and some similar sample models.

Comments and Questions

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

Click to Run Model

turtles-own [ energy ]

to setup
  clear-all
  setup-patches
  setup-red
  reset-ticks
end 

to go
  if ticks >= 12 [
    setup-blue]
   if ticks >= 500 [ stop ]
  move-turtles
  eat-grass
  check-death
  reproduce
  tick
end 

to move-turtles
  ask turtles [
    right random 360
    forward random 3
    set energy energy - 5
  ]
end 

to setup-patches
  ask patches [ set pcolor green]
end 

to setup-red
  create-turtles random 200 [setxy random-xcor random-ycor ]
  ask turtles [ set color yellow ]
end 

to setup-blue
  create-turtles random 20 [setxy random-xcor random-ycor ]
  ask turtles [ set color blue
  if pcolor = red[
    set energy energy + 5]
  ]
end 

to eat-grass
  ask turtles [
    if pcolor = green [
      set pcolor red
      set energy energy + 10

    ]
    if pcolor = red [
      set energy energy - 2
    ]
  ]
end 

to check-death
  ask turtles [
    if energy <= 0 [ die ]
  ]
end 

to reproduce
  ask turtles [
    if energy > 50 [
      set energy energy - 50
      hatch 1 [ set energy 50 ]
    ]
  ]
end

There is only one version of this model, created over 5 years ago by Regan W.

Attached files

File	Type	Description	Last updated
MIHS-18 Period 5 Regan W.png	preview	Preview for 'MIHS-18 Period 5 Regan W'	over 5 years ago, by Regan W	Download

This model does not have any ancestors.

This model does not have any descendants.

NetLogo