代碼的问题需要求助..

h64914110

我想请问各位大大高手帮我解决我的问题
我先简述一下我所要做的模型，我的模型里，整体有两种人，政府与民众。
& `' Q* T8 q0 W2 K那政府里又分为四种策略的人faithfuls ，trigger-punishments ，trigger-punishments ， mixeds
8 i' A; p6 p; ?$ @: m+ d: I9 s那政府要与民众互动，选择合作与不合作，政府合作和民众合作可得分(energy）
" i2 O7 J/ q& x1 {/ H3 ^2 e，相对的不合作也有得分但当我要开始写规则的时候，却发现程式无法照我的意思去跑，想请问各位高手能帮我看看是哪里出问题了吗？
breed [peoples people]
breed [faithfuls faithful]
breed [trigger-punishments trigger-punishment]
9 i& m1 a1 d8 G0 L2 E, nbreed [tit-for-tats tit-for-tat]
/ g/ a# W( {* d- w4 U0 h1 Ibreed [mixeds mixed]   
turtles-own [cooperate?  energy]

to setup
8 ?" |0 z2 g/ B1 Z" x" jset-default-shape turtles "person"
4 @  s- V4 W: `- ~  clear-all               
9 b" ?, v8 Y0 }. L+ x  setup-peoples  
  setup-goverments
ask faithfuls  [ set energy 0 ]
ask trigger-punishments  [set energy 0 ]
ask tit-for-tats  [set energy 0 ]
ask mixeds  [set energy 0 ]
  P1 P9 o$ W/ d  M4 E  X( hask peoples  [set energy 0 ]
% h7 f: }( B% _4 M2 T1 o, A0 a3 Lend

5 }" [( g; M3 U1 Xto setup-peoples

; ?6 D7 S9 |( g/ P( w5 {" Xask patches with [-1 < pxcor and pxcor < 20 and pycor = 0]
[sprout-peoples 1 [ set color blue set heading 0 ]

]
) L, [' C& u; N( e3 Cend

to  setup-goverments
# |4 B. t& k* T0 p9 w+ Kcreate-faithfuls  5 [set color red set heading 180]
create-trigger-punishments  5 [set color green set heading 180]
2 T0 c! z5 I; _% hcreate-tit-for-tats  5 [set color white set heading 180]
2 P6 f& k/ @9 Mcreate-mixeds  5 [set color pink set heading 180]
+ p% Q0 R! W! @+ O4 \ask turtles with [ color != blue ] [while [any? other turtles-here] [setxy random 20 1]
]
end
+ l% Y- G- Y+ M/ t" M6 u1 v
to go
ask  peoples [ set cooperate? random 2]
1 I0 w% t: H# Z  ask  faithfuls [  set cooperate? random 2]
6 x! T+ m* U0 @9 `# P  ask  trigger-punishments [ set cooperate? random 2]
  ask  tit-for-tats [ set cooperate? random 2]
; M# }8 P0 w" d2 x! D  ask  mixeds [ set cooperate? random 2]
  
  ask faithfuls [
  if ( cooperate? = [cooperate?] of peoples-on patch-ahead 1 )
4 ^) I! }8 r, y3 z6 f) C( P9 w3 e0 [   [  set energy  energy + 8
      ask peoples-on patch-ahead 1 [ set energy  energy + 2] ]
      ]         就是这里出问题了无法照我的意思去跑
  ifelse (show-energy?)
    [ ask turtles [ set label (energy) ] ]
5 T* F2 N' u& U    [ ask turtles [ set label "" ] ]
% c# J7 x, C+ H+ c8 W  y( G5 u  end
希望大家能帮我解决一下不然我没办法继续写下去

' @) a0 u: u; N$ ^% ]1 H& @9 H[ 本帖最后由 h64914110 于 2008-6-4 10:51 编辑 ]

norain

为什么不考虑用patches设定政府，假设政府不能够移动，民众可以通过用脚投票选择政府。这样也许可以解决你说的问题。

h64914110

简单点说好了模型固定分为上下两排，上为政府下为民众
- s" n/ J  D8 ~6 w. o. F+ P. {每一个政府类的人对应一个民众
上下两两对应  但我现在问题就是  我不知道turtles是否有互相对应到
那如果没对应到    要让turtles互相对应的语法又该怎么写?
我是新手  麻烦大家帮帮忙  传短讯给我也可以  谢谢
6 h2 M! |* C1 |. X5 B" j0 ?* Y
[ 本帖最后由 h64914110 于 2008-6-4 11:58 编辑 ]