Comment déplacer turtles netlogo ?

Fermé
mynoe Messages postés 18 Date d'inscription dimanche 27 novembre 2016 Statut Membre Dernière intervention 8 avril 2017 - 3 avril 2017 à 17:10
Bonjour,

Je suis débutante en netlogo et dans le cadre d'un projet, je dois modéliser la propagation d'une épidémie.

Pour le moment, j'ai réussi à délimiter et colorier les patchs carrés destinés à représenter les villages et une forêt (en vert) et à mettre une turtle (homme) dans chaque patch dans ces carrés.
Le but est de déplacer un homme jaune choisi au hasard dans un village (par exemple, sur le carré blanc) et de le déplacer dans la forêt afin qu'il soit infecté. Ainsi, la tortue doit passer du jaune au rouge, puis revenir de la forêt à un autre village (p. Ex. Orange) pour infecter d'autres personnes autour d'elle (dans un certain rayon). Et pour finir, cette personne doit retourner dans son village d'origine et ainsi contaminer à nouveau les autres personnes qui rougiront à leur tour. Ensuite, toutes ces personnes vont infecter tous les villages avec leurs mouvements. Le but étant qu'en fin de compte, tout le monde soit infecté.

Voici mon code pour le moment:

turtles-own 
[ infected?       
susceptible?   
cured?         
infection-length     
recovery-time       
nb-infected         

nb-recovered         
village-number 
foret-number 
] 


breed [ village  avillage ] 
to setup 
clear-all 
ask patches 
[ set pcolor 11 ] 

 ask patches with [ pycor > -20 and pycor < -5 and pxcor > 5 and pxcor < 20 ] 
[set pcolor white 
] 


ask patches with [ pycor < 20 and pycor > 5 and pxcor > 5 and pxcor < 20 ] 
[ set pcolor 76 
] 



ask patches with [ pycor < 4 and pycor > -5 and pxcor > -5 and pxcor < 4 ] 
[set pcolor 26 
] 

  ask patches with [ pycor < 20 and pycor > 5 and pxcor > -20 and pxcor < -5 ] 
[ set pcolor green 
] 

setup-people 

end 

to setup-people 
ask patches with  [ pcolor = white ] [ sprout 1 
  [ 
    set size 1 
    set shape "person" 
    set cured? false 
    set infected? false 
    set susceptible? true ] ] 

ask patches with  [ pcolor = 76 ] [ sprout 1 
  [ 
    set size 1 
    set shape "person" 
    set cured? false 
    set infected? false 
    set susceptible? true ] ] 

ask patches with  [ pcolor = 26 ] [ sprout 1 
  [ 
    set size 1 
    set shape "person" 
    set cured? false 
    set infected? false 
    set susceptible? true] ] 

 assign-color 


end 

to assign-color 

if susceptible? 
  [ set color yellow ] 
if infected? 
  [ set color red ] 
if cured? 
  [ set color green ] 

end 




Merci d'avance pour votre aide