设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5930|回复: 4

[求助] 自学中文手册时遇到了问题,求高手解答

  [复制链接]
 楼主| 发表于 2013-4-5 21:09:10 | 显示全部楼层 |阅读模式
我编的程序如下turtles-own [energy]
" a" G! Y' U( c; i$ Wto setup8 y1 p, S. x+ e8 K" E
  clear-all0 _7 ]! p% d6 l1 W8 K
  setup-patches: Z! r# t5 M8 r: w$ n
  create-turtles 100
0 Q# q: Y/ r# W* W2 ^  do-plots
8 E* H7 ~0 f+ U6 M+ {' w4 {4 C. [  ask turtles [ setxy random-xcor random-ycor ]
) D. r% q! Z! u6 z! }end+ \) Z: k3 ^* }- a8 F2 R
to go/ A0 U6 n& |' h) A% ~7 E( }
  move-turtles# }( j6 i. G5 G, i% k2 V
  eat-grass9 Z9 b( p. v! c2 |/ g3 A* a
  reproduce  Q! S4 d/ J7 R/ _) ^* p! g3 [
  check-death6 h) `6 }. F  X, c9 d5 g2 Z9 r( a
  regrow-grass
* P' ^# f' J8 n& ]3 t6 P  do-plots
, Z' w' I4 D* T$ ~' j) @# gend
8 I2 M( s# }# d) x4 N0 mto move-turtles
  o& M- ~+ Z$ r0 J$ \- K0 T0 r  ask turtles [
) ?. n8 \! m! a' F3 d    right random 3602 y' \2 |, e( q  T
    forward 1% e" }2 I/ h' \. P, s/ V
    set energy energy - 1
( }0 X9 B% \! t1 s1 D    ]0 ]. b; z3 x: [' O  e& M/ D
end
9 M0 r9 f, W) O; x" ?! jto setup-patches: e6 o" T  z) ^+ w2 s) L6 Z
  ask patches [ set pcolor green ]5 w, \% ~3 A' e$ ]" i
end
, r  F4 p9 t# ?1 v( W3 U: [2 ]to setup-turtles) X2 g7 l" u2 ?9 X# a/ z: e
  create-turtles 1002 j. R( \, H2 Y& p1 O0 n7 P
  ask turtles [ setxy random-xcor random-ycor ]
0 t' `- e1 g' I! i2 R2 m5 Iend; [8 x( T% u9 l* Y) b( u
to eat-grass
6 H/ L7 e8 _3 d' W4 T' ^1 ~  ask turtles [( u! I; \, n  r- `* _5 q( g4 ]6 N9 C
    if pcolor = green [; S8 k. [6 d4 o5 p3 c
      set pcolor black
* K5 I2 W; x0 q5 m% s2 v      set energy (energy + 10)
2 ], z0 ~: g& y8 b      ]4 |3 ], E" Y+ a6 \7 A/ w5 B
    ifelse show-energy?% C& _8 W) Y" Y
      [ set label energy ]
( w9 U% N+ s6 ]$ ~      [ set label "" ]
0 d( g+ I7 c4 W    ]
0 U, ]' i" P4 O' d- j! ~& Cend
' E* K1 c2 w# e6 \# {$ Fto reproduce- h' V+ v% y8 q8 @& v" P( H
  ask turtles [
" P4 g$ s) E- ?8 _1 i0 O' U& w# C    if energy > 50 [+ D! |: U% T- K( }4 h+ a  [3 s
      set energy energy - 50
0 E5 Y) L9 S9 c      hatch 1 [ set energy 50 ]
: l; c" H! i4 G/ A      ]
% B7 s3 p  ]  D( d    ]
& ^; v: Y5 }  `end( d1 d% V+ A( O4 w# ?
to check-death
$ e1 n6 D$ x3 [' k  ask turtles [
, J( G9 Z. q1 }" ]    if energy <= 0 [ die ]: y* e3 R; j1 t+ q/ J
    ]7 a7 K/ W) {! i% W7 N
end  z0 c! p5 X% b( c3 S; O6 Z* U
to regrow-grass
5 A! |2 S0 Z. w- F6 T  ask patches [
* z, U: s( P' ~7 X2 y& a0 q' |    if random 100 < 3 [ set pcolor green ]
9 ~0 M* T7 L; h2 h& s: s. h/ g    ]( Z  w) \" b2 [& A
end
3 t% o$ ]% o7 L6 Oto do-plots
1 P: ^- h1 }  X5 O  set-current-plot "Totals"
! x: x6 E3 E1 |: V9 s2 b+ `  set-current-plot-pen "turtles"1 q8 Q9 @+ P1 F  S0 i
  plot count turtles, j- l6 F! |* s3 `: |
  set-current-plot-pen "grass"
. H0 u  d3 d9 ?  plot count patches with [pcolor = green]
5 x; q, P, O9 n: G" y7 |9 p/ d: A2 eend
. b( v6 J5 V4 \- M* D. A可是运行时提示no such plot: "Totals"
- L5 ^0 Q# z! w3 m& g* J% ^error while observer running SET-CURRENT-PLOT
" ?/ _! L6 e" m  called by procedure DO-PLOTS
. `" o* h" ]  Q2 M1 P  called by procedure SETUP
/ k  V) f/ G9 k3 {; G) H  E" Y3 T  called by 按钮 'setup'
  t% N. y5 {0 m# r6 i5 _* R% c/ x求大神解答啊
发表于 2013-5-29 00:25:38 | 显示全部楼层
no such plot: "Totals",就是说你的界面里没有叫做Totals的绘图框
发表于 2013-5-29 00:26:26 | 显示全部楼层
建一个叫做叫做Totals的绘图框就行了
 楼主| 发表于 2013-6-4 12:24:45 | 显示全部楼层
emlyn 发表于 2013-5-29 00:26
, r" p! c& v$ T  g+ f" o建一个叫做叫做Totals的绘图框就行了

) G* ~8 W2 [# N) }哦,知道了,虽然自己应经找到问题了,不过还是谢谢哈
发表于 2016-5-3 09:17:18 | 显示全部楼层
你也可以直接再界面页创建“绘图”,然后设置时钟(ticks),每一步画一次,不用自己操心。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2024-4-24 20:45 , Processed in 0.012768 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表