请问：0 ~* `9 w! c! l3 r: S& c, V
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
$ x7 X8 O0 _! G# v( u5 ?# Q9 q4 G: u* b8 G* l+ n* @
$ V' L: S8 H" Y+ H
turtles-own [ energy ]
- S. i6 R$ r/ Y0 Sto setup; c1 Z" u0 X/ Q3 [ b; ]. b9 z
clear-all1 b0 \/ g6 q$ `
set-default-shape turtles "square"% [& ~# c' ~- d \9 f- g' d, _
crt nutrition
$ a# z, j) W( d$ Gask turtles[7 M' A1 U) m* `, r
set color white! R; n/ G; A. ?3 }/ z! w$ `
setxy random-pxcor random-pycor]7 a' g; n3 i8 |& ]8 C5 h
/ g! H5 b: i: n# ^& p7 r! eask n-of microbes-initialization patches
* T3 C# G9 a! W- E& s9 \4 k [ set pcolor green]
* d: J3 C4 ^1 \; J ask turtles [set energy 1]$ x0 q) Y' n! I R1 n; C- E
end( ~; m2 f9 P9 K- a7 U, P
, v- ^( y5 j* ?to go/ {$ @: J0 F) b) y5 k
ask turtles [set heading 90 * random 4 fd 1]3 o) C4 }5 ^, u' J+ o& B1 S. F! [
ask patches with [ any? turtles-here]4 k# d2 T! y ~) [6 Y0 U" _0 m) t, F* Y$ c
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]% ^2 y9 E3 [ U$ h1 x; X% H
ask turtles [ if energy = 0 [die ]]. r$ \: J* L0 h$ a @, b
end5 t p' z; B1 u+ Y" H
1 r/ w# H* E# p, q! W
to tt" D5 ?8 n2 W6 j; T' t* o8 `! J
ask patches [set pcolor gray ]
^$ d0 j: j. s6 j4 X# a# Xask turtles [set energy energy - 1]0 |* [0 |' O4 n! S! z
end
" ?- ?+ C" l) j% \, N
Y- q% L* N2 c. r+ ` |
发表于 2008-4-8 10:49:43
楼主
