请问：
& ~6 O! i$ \* M$ L: V) H/ y随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
2 e; j& T- \3 n6 N, P
! F1 m4 h' A, j- j 3 P' O) n) `4 D0 I
turtles-own [ energy ]/ H# ~! s6 T8 w) |
to setup- V7 R, \9 c1 c2 n8 h
clear-all
2 w g) |2 ^8 Fset-default-shape turtles "square". |2 R; e' ^" _# z" G; H7 p/ c
crt nutrition# \ @' |% C. o2 W$ ^7 q
ask turtles[
' }% @! o1 N4 e3 L( Z! E5 e set color white6 T0 }8 m7 E! `" G- v& H8 W
setxy random-pxcor random-pycor]( B. E8 U4 D# J( \$ Z
; {! L) k, I, Q3 v: A
ask n-of microbes-initialization patches; e3 h( Y$ c( n2 q
[ set pcolor green]
* |! Q; g6 Z1 S. g& [ ask turtles [set energy 1]
2 F, b4 k6 n) Y) V5 _. G8 ~* s. Iend& Z' w4 ]( z. r) O* v/ e- ]
/ k2 _5 I' I7 z+ a. Y* q, G- h
to go9 G& _0 T% M+ I1 j9 J) V9 Z1 C
ask turtles [set heading 90 * random 4 fd 1]
, j5 r" G* g+ R. n% } ask patches with [ any? turtles-here]
+ p( }! k0 b' f: Y4 \! G [ if pcolor = green and random 100 < chance-of-congregating [tt ]]: J# }: t, C* g+ n, k, `
ask turtles [ if energy = 0 [die ]]5 H' f! E i# g4 t9 t4 D
end8 B& p4 p+ u# K/ S( l
a( Y4 z% q( k. k; c9 J
to tt+ S& m& @, T: j0 d
ask patches [set pcolor gray ]( _% _/ r! w, i3 Y. L1 v3 }
ask turtles [set energy energy - 1]
. M5 F- }4 C" p6 `0 _end
: d0 t9 n8 A6 y1 J& I, M! o4 d. e* v0 S5 V( {2 M" [
|
发表于 2008-4-8 10:49:43
楼主
