代碼的问题需要求助..

h64914110 · 发表于 2008-6-3 17:42:03

我想请问各位大大高手帮我解决我的问题
我先简述一下我所要做的模型，我的模型里，整体有两种人，政府与民众。
那政府里又分为四种策略的人faithfuls ，trigger-punishments ，trigger-punishments ， mixeds
那政府要与民众互动，选择合作与不合作，政府合作和民众合作可得分(energy）
，相对的不合作也有得分但当我要开始写规则的时候，却发现程式无法照我的意思去跑，想请问各位高手能帮我看看是哪里出问题了吗？
breed [peoples people]
breed [faithfuls faithful]
breed [trigger-punishments trigger-punishment]
breed [tit-for-tats tit-for-tat]
breed [mixeds mixed]
turtles-own [cooperate?  energy]

to setup
set-default-shape turtles "person"
  clear-all
  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 ]
ask peoples  [set energy 0 ]
end

to setup-peoples

ask patches with [-1 < pxcor and pxcor < 20 and pycor = 0]
[sprout-peoples 1 [ set color blue set heading 0 ]

]
end

to  setup-goverments
create-faithfuls  5 [set color red set heading 180]
create-trigger-punishments  5 [set color green set heading 180]
create-tit-for-tats  5 [set color white set heading 180]
create-mixeds  5 [set color pink set heading 180]
ask turtles with [ color != blue ] [while [any? other turtles-here] [setxy random 20 1]
]
end

to go
ask  peoples [ set cooperate? random 2]
  ask  faithfuls [  set cooperate? random 2]
  ask  trigger-punishments [ set cooperate? random 2]
  ask  tit-for-tats [ set cooperate? random 2]
  ask  mixeds [ set cooperate? random 2]

  ask faithfuls [
  if ( cooperate? = [cooperate?] of peoples-on patch-ahead 1 )
[  set energy  energy + 8
   ask peoples-on patch-ahead 1 [ set energy  energy + 2] ]
   ]

就是这里出问题了无法照我的意思去跑
ifelse (show-energy?)
[ ask turtles [ set label (energy) ] ]
[ ask turtles [ set label "" ] ]
end
希望大家能帮我解决一下不然我没办法继续写下去

[ 本帖最后由 h64914110 于 2008-6-4 10:51 编辑 ]

norain · 发表于 2008-6-3 17:42:04

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

h64914110 · 发表于 2008-6-4 11:57:22

简单点说好了模型固定分为上下两排，上为政府下为民众
每一个政府类的人对应一个民众
上下两两对应但我现在问题就是我不知道turtles是否有互相对应到
那如果没对应到要让turtles互相对应的语法又该怎么写?
我是新手麻烦大家帮帮忙传短讯给我也可以谢谢

[ 本帖最后由 h64914110 于 2008-6-4 11:58 编辑 ]

帐号		自动登录	找回密码
密码			注册

[求助] 代碼的问题需要求助..

最佳答案