Some slight changes
This commit is contained in:
parent
0486cb9934
commit
422f1d5bb5
|
@ -20,20 +20,21 @@ to setup
|
|||
ask county-labels [ die ]
|
||||
|
||||
foreach gis:feature-list-of romanian-county-borders-dataset
|
||||
[ ;gis:set-drawing-color item random 14 base-colors
|
||||
;gis:fill ? 0
|
||||
let county-color item random 14 base-colors
|
||||
[ gis:set-drawing-color item random 14 base-colors
|
||||
gis:fill ? 0
|
||||
|
||||
;let county-color item random 14 base-colors
|
||||
ask patches gis:intersecting ?
|
||||
[ set county-name gis:property-value ? "NAME_1"
|
||||
set pcolor county-color ] ]
|
||||
;set pcolor county-color ] ]
|
||||
|
||||
end
|
||||
@#$#@#$#@
|
||||
GRAPHICS-WINDOW
|
||||
463
|
||||
5
|
||||
708
|
||||
223
|
||||
877
|
||||
440
|
||||
-1
|
||||
-1
|
||||
4.0
|
||||
|
|
|
@ -1,4 +1,5 @@
|
|||
globals [
|
||||
globals
|
||||
[
|
||||
nx ny
|
||||
nb-beekeepers
|
||||
max-distance-of-moving
|
||||
|
@ -8,7 +9,6 @@ globals [
|
|||
sunflower-price
|
||||
hivesProd
|
||||
fuelPriceByKm ;;; euros by km
|
||||
|
||||
]
|
||||
|
||||
breed [ beekeepers beekeeper ]
|
||||
|
@ -189,19 +189,14 @@ to follow-strategy
|
|||
|
||||
set current-spot best-spot
|
||||
move-to best-spot
|
||||
ask best-spot [ set availability 1]
|
||||
ask best-spot [ set availability 1] ]
|
||||
|
||||
|
||||
[;;;; there arent available spots
|
||||
|
||||
follow-strategy
|
||||
]
|
||||
] ] ]
|
||||
|
||||
]
|
||||
|
||||
]
|
||||
|
||||
]
|
||||
if strategy-of-turtle = 2 [ ;;;; choose the nearest county
|
||||
|
||||
]
|
||||
|
@ -272,8 +267,8 @@ GRAPHICS-WINDOW
|
|||
1
|
||||
1
|
||||
0
|
||||
0
|
||||
0
|
||||
1
|
||||
1
|
||||
1
|
||||
-23
|
||||
23
|
||||
|
|
Loading…
Reference in New Issue