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

newlove

我编的程序如下turtles-own [energy]
to setup
' B5 r$ m( M* b, ?8 u3 Q' e# w3 \  clear-all
  setup-patches
/ P4 }/ A# \0 _  create-turtles 100
; M& @9 i" I. w$ y0 S  do-plots
  ask turtles [ setxy random-xcor random-ycor ]
$ c/ [# t* i, |4 A4 m! x6 P. dend
to go
  move-turtles
! y; {5 U. @% h  eat-grass
0 V4 `! Q$ g7 e6 J6 S  reproduce
  check-death
0 c. g; Z5 X% M3 a% Z9 T0 x  regrow-grass
! }0 m6 i# o2 x" w- D  D  m  do-plots
end
1 V  y- m8 ^& _8 i& m- Zto move-turtles
2 `2 U9 J- ^6 B! c; F  ask turtles [
    right random 360
4 c) ^: _$ }5 ^2 R    forward 1
2 u5 H. y: e; q    set energy energy - 1
    ]
end
to setup-patches
0 a+ T" v  u" N0 I# ~7 u2 t) ]  ask patches [ set pcolor green ]
end
to setup-turtles
  create-turtles 100
% ^9 k; J7 m0 p4 A# O6 Q) e1 L" J/ H; `  ask turtles [ setxy random-xcor random-ycor ]
end
to eat-grass
  ask turtles [
) m, O) ~1 `" Z, ^9 g    if pcolor = green [
! ?# D( e4 \9 r0 d0 c" [1 S; e      set pcolor black
      set energy (energy + 10)
      ]
9 j* S0 g7 z& Y9 G$ u! ^1 r7 |    ifelse show-energy?
      [ set label energy ]
1 d+ S/ l" `- ^' R8 l  M      [ set label "" ]
7 [5 T) B! e% X" B' A    ]
end
to reproduce
) B" i% D$ j) s  ask turtles [
" ^% x+ q) P# L( E    if energy > 50 [
$ _) _) p1 O5 p. |: g; E/ w      set energy energy - 50
, J' _1 j* q4 s. E9 \      hatch 1 [ set energy 50 ]
      ]
    ]
end
! J6 c) ?5 t% Q, W! F- H4 g+ s9 hto check-death
  ask turtles [
# a; e" Q3 O! @    if energy <= 0 [ die ]
0 x0 `; T3 N( L. v. v- d# o/ K    ]
end
to regrow-grass
  ask patches [
    if random 100 < 3 [ set pcolor green ]
; p) Q# K& t# L0 m& P    ]
end
' s5 D! X1 g5 s/ gto do-plots
8 Y: M# T" r6 T+ Q5 i& f  set-current-plot "Totals"
  set-current-plot-pen "turtles"
  plot count turtles
  set-current-plot-pen "grass"
  plot count patches with [pcolor = green]
; L5 s+ D; F! R2 B" v+ [5 A4 wend
/ b' Z0 v* t7 I1 d" m可是运行时提示no such plot: "Totals"
/ g7 N5 T, o+ o1 s( yerror while observer running SET-CURRENT-PLOT
  called by procedure DO-PLOTS
  called by procedure SETUP
  called by 按钮 'setup'
求大神解答啊

emlyn

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

emlyn

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

newlove

emlyn 发表于 2013-5-29 00:26
$ e8 {" [; W* y; i  Z建一个叫做叫做Totals的绘图框就行了

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

pichan

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