请问：) B% x* B! M. M P$ m0 S
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
8 Q4 k: u& g' g1 F6 v1 ?9 |2 r- u( \' x$ h
& J, \7 ^& n* X {2 _$ R
turtles-own [ energy ]
% z$ R# |% j; A- ?1 eto setup
& ^+ E! s+ z& n5 w, ?clear-all
, n$ W2 W; ~3 C8 o9 z. gset-default-shape turtles "square"
! Q4 e& H5 T! R+ p2 f1 h0 u) M( ncrt nutrition: Z! Y- h! P) S1 h
ask turtles[) v- P4 B0 A5 d; s5 H
set color white6 \& r9 J, l: x. k' m: {! R3 J2 y0 e
setxy random-pxcor random-pycor]( V7 {+ i( v" ~
0 U: Z4 X9 g3 I5 |
ask n-of microbes-initialization patches, y. k/ F, x: T; g V( F& q
[ set pcolor green]
3 Z0 Y V1 @; J% T9 D* y4 k% L ask turtles [set energy 1]$ h0 z- J9 m3 N3 v. T: k
end
" v$ d! ^& C% n5 @1 Q4 @" n0 F) K% ?$ r4 d/ |& x0 \
to go* ~0 r4 U& \" @: {; L4 O" D: ~ Z. v
ask turtles [set heading 90 * random 4 fd 1]- S% ^1 y# `/ r
ask patches with [ any? turtles-here]% w# [' `" s, I( O/ T4 t3 G
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]/ M( `) M8 q7 F& i
ask turtles [ if energy = 0 [die ]]& c; q% R. W, q' x# P
end
B5 f7 l6 C6 n
. o4 U% H6 [" i: Z- ]to tt6 i1 Y, o3 m# A9 H1 l0 D3 u- m( D
ask patches [set pcolor gray ]
( r, h" \$ `( i8 [8 Vask turtles [set energy energy - 1]
\2 |" a5 I1 Nend( a0 e, \8 E8 y* i, e# q
" f7 Y3 r+ k$ m2 W- E8 m |
发表于 2008-4-8 10:49:43
楼主
