| ... | ... | @@ -55,9 +55,9 @@ Je vous laisse cela en exercice. |
|
|
|
Nous allons provoquer une épidémie parmi nos tortues et essayer de voir comment cela évolue. Une tortue va donc être, saine, infectée, ou remise. Elles vont se déplacer aléatoirement et avoir d'éventuels contacts.
|
|
|
|
|
|
|
|
```code
|
|
|
|
====================
|
|
|
|
; Nos pauvres tortues
|
|
|
|
;====================
|
|
|
|
;======================================
|
|
|
|
; Initialisation de nos pauvres tortues
|
|
|
|
;======================================
|
|
|
|
|
|
|
|
;
|
|
|
|
; Initialisation des tortues
|
| ... | ... | @@ -65,11 +65,52 @@ Nous allons provoquer une épidémie parmi nos tortues et essayer de voir commen |
|
|
|
; - position aléatoire
|
|
|
|
; - non infectée (blanche)
|
|
|
|
to initialisation-tortues
|
|
|
|
ct population-initiale [
|
|
|
|
create-turtles population-initiale [
|
|
|
|
set color white
|
|
|
|
set size 0.5
|
|
|
|
setxy random-pxcor random-pycor
|
|
|
|
]
|
|
|
|
end
|
|
|
|
|
|
|
|
;
|
|
|
|
; On tire au hasard nb-premiere-infectee tortues.
|
|
|
|
; Leur état change donc.
|
|
|
|
;
|
|
|
|
to souche-infection
|
|
|
|
ask n-of nb-premiere-infectee turtles [
|
|
|
|
set color red
|
|
|
|
]
|
|
|
|
end
|
|
|
|
|
|
|
|
to initialisation
|
|
|
|
ca
|
|
|
|
initialisation-tortues
|
|
|
|
souche-infection
|
|
|
|
reset-ticks
|
|
|
|
end
|
|
|
|
|
|
|
|
;==============
|
|
|
|
; La simulation
|
|
|
|
;==============
|
|
|
|
|
|
|
|
;
|
|
|
|
; Déplacement des tortues. On pourrait avoir un déplacement plus sophistiqué.
|
|
|
|
;
|
|
|
|
to bouge
|
|
|
|
ask turtles [
|
|
|
|
right random 360
|
|
|
|
forward pas
|
|
|
|
]
|
|
|
|
end
|
|
|
|
|
|
|
|
;
|
|
|
|
; Lancement de la simulation
|
|
|
|
;
|
|
|
|
to execute
|
|
|
|
bouge
|
|
|
|
tick
|
|
|
|
end
|
|
|
|
```
|
|
|
|
|
|
|
|
|
|
|
|
|