# Infection Sim Combine

No preview image

Model was written in NetLogo 5.2.1
•
Viewed 181 times
•
Downloaded 24 times
•
Run 0 times

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

## Comments and Questions

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

Click to Run Model

globals [ virus-score infect-var cure-var kill-num kill-var erad?] breed [infection infected] breed [people person] to setup clear-all create-infection 1 [set color red] ;;one infected person create-people 99 [set color cyan] ;;99 uninfected people ask infection [ setxy random-xcor random-ycor set shape "infected" set size 2 ] ask people [ setxy random-xcor random-ycor set shape "uninfected" set size 2 ] reset-ticks end to go if count infection < 101 [ move-infection ;;moves infected people 1 step in a random direction move-people ;;moves uninfected people 1 step in a random direction infect-people ;;if one of the uninfected people contact an infected person, turns infected set infect-var random (150 / infectability) if cureability != 0 [ set cure-var random (250 / Cureability) if virus-score > 23 [ ; cure-virus ] ] set kill-num mortality set kill-var random 5 if virus-score < 0 [ set virus-score 0 ] ; kill-peep ] cure-infected tick end to move-infection ask infection [ right random 360 forward 0.5 ] end to move-people ask people [ right random 40 forward 1 ] end to infect-people if (infect-var = 1) or (infect-var = 2) [ ask infection [ let uninfected one-of people-here if uninfected != nobody [ ask uninfected [die] hatch 1 ] ]] end to cure-infected if (cure-var = 1) [ ask infection [ let infectedPerson one-of infection if remainder ticks 28 = 0 and ticks != 0 [ ask infectedPerson [die] ] ] ask people [ if count people < 100 [ hatch 1 ] ] ] end

There is only one version of this model, created over 7 years ago by Andrew Motz.

## Attached files

No files