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

newlove

我编的程序如下turtles-own [energy]
$ I7 a# x7 M0 z( }1 W5 fto setup
# q3 i# z8 {+ v$ f/ E  clear-all
8 B' a" E  q3 r, A# ^  setup-patches
  create-turtles 100
  do-plots
* W1 i) [  m5 k2 D/ n( r5 x+ a  ask turtles [ setxy random-xcor random-ycor ]
2 a* S+ O% ~2 nend
+ k2 d' ^6 A6 w' G  t3 Jto go
4 |8 T& m4 X6 E- W0 J5 z  move-turtles
  eat-grass
  reproduce
* w( ~1 s) T! a" |0 k3 T  check-death
6 y) V: \8 Z8 ^. }" K+ o  regrow-grass
  do-plots
end
to move-turtles
! t# n5 D5 b8 p! H1 u, U2 @  ask turtles [
- D3 {/ V) e# X( }. s) j* @( ~    right random 360
# H  g. x+ q- n" S6 D    forward 1
: w, _+ w6 I- C4 q( |# ]% B    set energy energy - 1
    ]
/ }: _0 z* L# w1 c# Z( B% aend
to setup-patches
8 ]" B4 L% g: m0 J9 m9 L, @" _; K; K  ask patches [ set pcolor green ]
end
to setup-turtles
  create-turtles 100
  ask turtles [ setxy random-xcor random-ycor ]
end
) s; w) a- S- p! O& d3 H- ^to eat-grass
  ask turtles [
    if pcolor = green [
3 E+ u& L  m6 h, Q7 d" t      set pcolor black
      set energy (energy + 10)
      ]
; F3 n* q, X- N4 Z    ifelse show-energy?
7 N- R' ^. I0 [7 W      [ set label energy ]
( W2 v4 y$ H1 j+ L      [ set label "" ]
6 s2 i9 N# [+ \7 e    ]
end
$ g9 G; x8 L0 J% Gto reproduce
" p( j$ x# U. C; H& A0 K) a' s  ask turtles [
    if energy > 50 [
( g( N4 R! ?0 \* K/ |, r$ X) z6 U      set energy energy - 50
& Z$ g1 A' V: v. l4 T( q. J/ s      hatch 1 [ set energy 50 ]
: a" }) W7 ]& y4 h6 @" W      ]
    ]
end
to check-death
  ask turtles [
    if energy <= 0 [ die ]
    ]
end
8 H0 b8 u0 f3 l4 C- hto regrow-grass
  ask patches [
( k) |9 r  K3 d9 Q    if random 100 < 3 [ set pcolor green ]
    ]
end
to do-plots
  set-current-plot "Totals"
  set-current-plot-pen "turtles"
  c& U) X8 {  I9 `, f* R  plot count turtles
  set-current-plot-pen "grass"
  plot count patches with [pcolor = green]
4 z/ Z* y2 Y* L. Bend
9 T' x2 Z/ `* }6 h- L* ~  o, b) ^可是运行时提示no such plot: "Totals"
% s0 h- f) y9 I" n2 m7 cerror while observer running SET-CURRENT-PLOT
  called by procedure DO-PLOTS
  called by procedure SETUP
& b. q. F6 w: |+ ^  called by 按钮 'setup'
求大神解答啊

emlyn

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

emlyn

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

newlove

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

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

pichan

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