csss-beedza/Source/vmodel-strategies.nls

19 lines
969 B
Plaintext
Raw Permalink Normal View History

2013-07-17 18:38:04 +02:00
to-report with-collective-strategy
2013-07-17 16:10:47 +02:00
;; to explode. beekeeper do not know in advance
2013-07-17 23:58:24 +02:00
;let potential-empty-spots spots with [ not any? beekeepers-here or member? myself beekeepers-here ]
;let pes-radius-limited potential-empty-spots in-radius d-max
;report max-one-of pes-radius-limited [ beekeep-utility flower-type ([amount-of-hives] of myself) (distance myself) ]
2013-07-18 03:00:30 +02:00
set persistence-length d-max
2013-07-18 00:33:43 +02:00
let available-spots spots in-radius persistence-length
ifelse any? available-spots [
2013-07-18 03:00:30 +02:00
report max-one-of available-spots with [ not any? beekeepers-here or member? myself beekeepers-here ] [ beekeep-utility flower-type [amount-of-hives] of myself (distance myself) ]
2013-07-18 00:33:43 +02:00
]
2013-07-18 03:00:30 +02:00
[ set persistence-length persistence-length + d-max
report n-of 0 spots ]
2013-07-17 18:38:04 +02:00
end
to-report with-blind-strategy
;; to explode. beekeeper do not know in advance
2013-07-17 21:12:38 +02:00
report max-one-of spots in-radius d-max [ beekeep-utility flower-type [amount-of-hives] of myself (distance myself) ]
2013-07-17 20:23:15 +02:00
end