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

newlove

我编的程序如下turtles-own [energy]
to setup
) n/ w* |  _0 b" Q+ U  clear-all
  setup-patches
: e& b2 B: c' h- l% V) C8 D  create-turtles 100
! d' M4 s% t: d  do-plots
  ask turtles [ setxy random-xcor random-ycor ]
0 S6 y% K& ~0 C; f/ ?) nend
to go
  move-turtles
  eat-grass
/ H& l* ]8 [  |  reproduce
5 e  e4 B: Z1 `- d$ V& M# b1 |  check-death
  regrow-grass
2 v9 ^  g( {3 z/ V6 {( }+ n! }  do-plots
end
% }9 W& m7 T" g  X# Dto move-turtles
8 v) H8 V' \- \, A9 \/ g: {$ P0 X  ask turtles [
/ U1 A" A+ H+ U5 `    right random 360
# p. Z; j( P# H* {3 Y    forward 1
    set energy energy - 1
    ]
end
to setup-patches
- ?! F* m9 r' i& i* M9 U# z. j$ s  ask patches [ set pcolor green ]
end
! G7 p6 k- A% A  kto setup-turtles
. V  B  w" R8 q) n4 R9 E* f  create-turtles 100
3 G! U, w# w0 j" ~  ask turtles [ setxy random-xcor random-ycor ]
, J( P6 e3 b3 j9 m) R5 tend
to eat-grass
  ask turtles [
    if pcolor = green [
; q2 }5 B8 @$ p/ W" H4 V      set pcolor black
      set energy (energy + 10)
      ]
3 u& r' }# U" j. ~! d9 \8 [    ifelse show-energy?
      [ set label energy ]
- {/ H, \  }$ x5 r' H; u, ?      [ set label "" ]
2 \" b+ t# l: g: G6 {3 J+ B5 P# H    ]
8 ]2 G# W4 D3 a6 Cend
to reproduce
8 f+ X- p3 j) z' r6 q" l  ask turtles [
    if energy > 50 [
8 g; w. @6 w8 h% m. {8 v- G      set energy energy - 50
      hatch 1 [ set energy 50 ]
6 _% y, p/ m. i- e9 \4 g! G/ a" y  D      ]
    ]
end
to check-death
/ G' t  D& J' v7 t! e  ask turtles [
    if energy <= 0 [ die ]
    ]
end
to regrow-grass
! D! N) h, `! p9 [+ z. n  ask patches [
4 N$ w6 O, ~1 `; f    if random 100 < 3 [ set pcolor green ]
    ]
end
: l6 |3 t$ f9 T# c! p5 Y( Bto do-plots
9 O8 S7 V% k( I  set-current-plot "Totals"
  set-current-plot-pen "turtles"
  plot count turtles
  set-current-plot-pen "grass"
1 {5 ^9 L. y1 V) @  plot count patches with [pcolor = green]
end
5 m2 D/ G1 _0 l- k4 p9 |可是运行时提示no such plot: "Totals"
& @3 e% {' f" w9 ]( x9 perror while observer running SET-CURRENT-PLOT
  called by procedure DO-PLOTS
4 n/ Q) Z) b. P1 v  called by procedure SETUP
1 \3 D# }" Z% x$ o' v" u1 B0 q7 y- A  called by 按钮 'setup'
. T, k" }: t5 M( V) m) l; v2 p求大神解答啊

emlyn

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

emlyn

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

newlove

emlyn 发表于 2013-5-29 00:26
. m' t/ I# f# L$ g% Y7 K/ w/ T$ R建一个叫做叫做Totals的绘图框就行了

, b0 ]" H% L8 v0 [! U& h哦，知道了，虽然自己应经找到问题了，不过还是谢谢哈

pichan

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