请问：
, n( X g. _- ?随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
3 i) Z' r: G) u: k' s4 U
4 v, ?; g' d y/ K* e4 z- ~ + @9 M2 S# `* C8 E7 Q! U
turtles-own [ energy ]
: S; R5 @4 D% Nto setup. Z! M: ?8 X9 s7 H" Q7 T
clear-all
1 K6 I6 o3 o/ t! e6 Z) A; rset-default-shape turtles "square" ^5 }) K6 V2 Z* P
crt nutrition
, @ Q S' C& T7 Qask turtles[
8 Y+ C' W; i& T0 w/ t0 @& e set color white9 y( \7 b, h: K2 ~
setxy random-pxcor random-pycor]
+ p- s) Z( _4 ?" }/ z# d }0 K + h# o( Y: U/ M
ask n-of microbes-initialization patches# \. K# Y' L1 v' C1 q
[ set pcolor green]; R) p% [+ T- D
ask turtles [set energy 1]
) p/ V$ g' c- A* y& P0 xend
1 w6 G) G2 t, G4 U9 Z3 x
5 h k$ N( {/ D9 {0 sto go
( l- v, @/ ^2 U# G ask turtles [set heading 90 * random 4 fd 1]% P5 V2 z% S1 d! ~4 j( o
ask patches with [ any? turtles-here], b( Y" [6 Y( T( f+ L- b
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]& [( T( ?) Z$ s b T; ]
ask turtles [ if energy = 0 [die ]] K# E/ M! k' r- b
end- a t' N, s# T$ w1 C
8 n6 f7 Z+ \9 ^/ d3 K$ |
to tt
! W, A; _9 R. qask patches [set pcolor gray ]
; l7 @" ?4 |2 Z/ m/ _# Nask turtles [set energy energy - 1]1 D3 ~! E1 @* t+ M V
end
/ K# n+ {( C6 Q- _0 ]7 }( x- _( n
/ Y6 Q4 a$ e: B! O6 Y- | |
发表于 2008-4-8 10:49:43
楼主
