Antibiotic resistance simple

turtles-own [ resistance ]

to setup
  clear-all
  create-turtles population [
    set shape "circle"
    set size 1
    setxy random-xcor random-ycor
    set resistance random resist
  ]
  reset-ticks
end 

to go
  ask turtles [
    if resistance > 7 [
      set color red ]
    reproduce
    death
  ]
  tick
end 

to reproduce
  if random-float 100 < rep-rate [
    hatch 1 [ rt random-float 360 fd 1 ]
  ]
end 

to death
  if random-float 100 < death-rate [
    die
  ]
end 

to add-dose
  if random-normal resistance 2 < dose-strength [
    die
  ]
end 

to-report mean-resistance
  report mean [resistance] of turtles
end