自学中文手册时遇到了问题，求高手解答

newlove

我编的程序如下turtles-own [energy]
" Z/ g9 T% @& Kto setup
  clear-all
; p# O/ N1 \( R, o  setup-patches
+ ~; z1 D9 \% c3 K( \8 X) l: c  create-turtles 100
  do-plots
9 w1 i) I7 }. l! Q4 B  F% K( k  ask turtles [ setxy random-xcor random-ycor ]
* {# x$ s0 f* p$ h1 Tend
to go
  move-turtles
3 g5 k- f9 u/ }$ O, t2 Z  eat-grass
  reproduce
. q) i& B" k. e8 f- X4 C8 H  check-death
. O0 ?- k: L' H3 y9 H  regrow-grass
; |5 l  D: e; R  do-plots
end
$ X" d" a0 e# L# l+ Q1 fto move-turtles
  ask turtles [
    right random 360
0 o, F2 j! T( h. h4 ~4 _# w' h    forward 1
, Q# o& a& l' ~1 H& N: C    set energy energy - 1
' W: W+ K$ C0 j1 z    ]
& I  E# T- G) aend
8 w) |1 q) W' }# h- n5 m7 Ato setup-patches
  ask patches [ set pcolor green ]
end
5 `5 q+ A5 p* \0 ?7 ?; N1 @. Fto setup-turtles
  create-turtles 100
  ask turtles [ setxy random-xcor random-ycor ]
end
3 ^- E8 }$ V, T8 g0 p. V3 F1 `" Pto eat-grass
! A& A6 }/ ], _$ g0 b) r7 C1 o  ask turtles [
' Y+ y/ s3 b. ^, U6 G7 a! {    if pcolor = green [
      set pcolor black
- u0 ]8 _6 D2 |! `% _1 e: G      set energy (energy + 10)
7 A3 ?; Z+ t: k& g+ z0 i      ]
    ifelse show-energy?
9 p' T+ r, G/ _) v) K3 C      [ set label energy ]
+ M! o0 E: j9 d      [ set label "" ]
    ]
2 \/ `3 i% B! W2 H, G: p' [end
to reproduce
  ask turtles [
    if energy > 50 [
; h& M2 G8 o' D4 w      set energy energy - 50
( h  @: {1 S' }# S$ P: @3 q$ T      hatch 1 [ set energy 50 ]
      ]
    ]
end
) [% B' n0 t0 B/ j" x& J1 oto check-death
  ask turtles [
* V4 i( n1 ]; @+ Q    if energy <= 0 [ die ]
    ]
end
to regrow-grass
6 v" A& |' H7 s8 C6 U6 R  ask patches [
    if random 100 < 3 [ set pcolor green ]
    ]
! O$ d9 }# S5 {3 }8 dend
* `2 Q( ?' X7 `  `3 Rto do-plots
3 x( J7 P7 X" ?+ v/ I  set-current-plot "Totals"
  set-current-plot-pen "turtles"
  plot count turtles
9 w. [- @3 |3 W3 E1 K  j) t1 z  set-current-plot-pen "grass"
+ k1 q* B) O1 x: O7 y; @9 f  plot count patches with [pcolor = green]
end
可是运行时提示no such plot: "Totals"
error while observer running SET-CURRENT-PLOT
  called by procedure DO-PLOTS
  called by procedure SETUP
  i" Y* \  a6 o, W0 y1 n: |  called by 按钮 'setup'
求大神解答啊

emlyn

no such plot: "Totals"，就是说你的界面里没有叫做Totals的绘图框

emlyn

建一个叫做叫做Totals的绘图框就行了

newlove

emlyn 发表于 2013-5-29 00:26
建一个叫做叫做Totals的绘图框就行了

哦，知道了，虽然自己应经找到问题了，不过还是谢谢哈

pichan

你也可以直接再界面页创建“绘图”，然后设置时钟(ticks)，每一步画一次，不用自己操心。