Infectious disease outbreak (COVID-19)-transmission and mortality

;;
;; This model is developed by Dr. Lin Xiang at the University of Kentucky. Contact: lin.xiang@uky.edu
;;
;; If you see this page rather than a "download" button when downloading the model, click the "download" icon
;; in your browser to download this model file.
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


turtles-own [day]
Patches-own [ ]
Globals [watching LM max-daily-cases]

to setup
  clear-all
  setup-turtles
  setup-patches
  set LM 0
  reset-ticks
end 

to setup-turtles
  create-turtles Population-size
  [set color 68
    set size 1.25
    set shape "person-1"
    set day 0
    setxy random-xcor random-ycor
  ]
end 

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

to go

  if ticks >= days [stop]
  move
  transmission
  sickness
  find-max-daily-cases
  tick
end 

to move
  ask turtles
  [right random 360 forward mobility]
end 

to add-an-infected-person
  create-turtles 1
  [set color orange
    set size 1.25
    set shape "person-1"
    setxy random-xcor random-ycor
  ]
end 

to transmission
  ask turtles with [color = orange]
  [
    let healthy-person one-of other turtles in-radius 1.5 with [color = 68]
    if healthy-person != nobody
    [ask healthy-person [
      if random 100 < Transmission-rate
      [set color orange]]]
  ]
end 

to sickness
  ask turtles with [color = orange]
  [set day day + 1
    if day >= 15
    [ifelse random 100 < mortality
      [ set LM LM + 1 die  ]
      [set color blue] ]
  ]
end 

to watch-an-infected-person
  watch one-of turtles with [color = orange]
end 

to find-max-daily-cases
  if count turtles with [color = orange ] > max-daily-cases        ;Count the infectious. If it is greater than the current record of max daily cases
  [set max-daily-cases count turtles with [color = orange ]]       ;update the max daily case
end