mpo
/
csss-beedza
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Moving to common source folder

This commit is contained in:
EEva 2013-07-16 23:39:35 +02:00
parent 4533427360
commit 242b51bef4
1 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
Source/utilityfunction/utilityfunc.nlogo → utilityfunc.nlogo
View File

@ -183,22 +183,23 @@ to follow-strategy
let spots-on-county turtles-here
let available-spots spots with [availability = 0] ;; free
ifelse any? available-spots [ ;;; there are available spots
let best-spot max-one-of available-spots [ utility ]
ifelse any? available-spots
[ ;;; there are available spots
let best-spot max-one-of available-spots [ utility ]
set current-spot best-spot
move-to best-spot
ask best-spot [ set availability 1]
set current-spot best-spot
move-to best-spot
ask best-spot [ set availability 1]
[;;;; there arent available spots
follow-strategy
[;;;; there arent available spots
follow-strategy
]
]
]
]
]
if strategy-of-turtle = 2 [ ;;;; choose the nearest county
@ -950,7 +951,7 @@ Polygon -7500403 true true 270 75 225 30 30 225 75 270
Polygon -7500403 true true 30 75 75 30 270 225 225 270
@#$#@#$#@
NetLogo 5.0.1
NetLogo 5.0.4
@#$#@#$#@
set too-close 1.5
set too-far 2.0