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

newlove

我编的程序如下turtles-own [energy]
to setup
  clear-all
1 E% D  ?9 ~* j4 {2 q  setup-patches
  create-turtles 100
2 X- n6 g4 K/ R* y& M! {/ R# D' A- w* q  do-plots
  ask turtles [ setxy random-xcor random-ycor ]
end
  {: j1 H7 i, W( w% L) vto go
4 n" K: |( X2 D, n" z  move-turtles
  eat-grass
  reproduce
  check-death
  regrow-grass
1 b  w1 b, ~5 D  do-plots
+ C9 K7 X/ Z4 R% Z) t8 t* zend
to move-turtles
% M5 o0 r4 D' Z7 {0 Z  ask turtles [
! f4 {! ^) ]* ~" S1 q6 Z3 s    right random 360
    forward 1
. ^* s& `1 b$ p4 A& ^    set energy energy - 1
) l: l. j* b& d8 T' [2 i    ]
end
4 ?& T* t$ P  ?! t( [1 {to setup-patches
  ask patches [ set pcolor green ]
% M. D1 a6 t3 r) A" O+ R( Mend
: f$ }3 h3 p4 h4 r! pto setup-turtles
2 R! A9 w; X3 i% `8 b& w  create-turtles 100
  ask turtles [ setxy random-xcor random-ycor ]
$ P( s1 n/ K0 ^) j2 H3 f* send
to eat-grass
: ?3 M- S1 |. p; V* w; Y8 P  ask turtles [
    if pcolor = green [
      set pcolor black
1 m; e" R4 h9 G: q) j      set energy (energy + 10)
      ]
* L0 n' X3 b9 m2 N2 ~' p; ^, d! D6 C    ifelse show-energy?
      [ set label energy ]
6 F5 Q  ]6 {9 e5 V2 a7 R# D      [ set label "" ]
    ]
end
) x0 Z+ o2 m, j$ _to reproduce
3 V6 T% H7 H; P1 F) R& }& I  ask turtles [
    if energy > 50 [
$ A) d) q) W, [4 G      set energy energy - 50
      hatch 1 [ set energy 50 ]
      ]
    ]
end
to check-death
  ask turtles [
6 O$ L) d0 @; |1 G  L* A- }    if energy <= 0 [ die ]
    ]
end
! D* f! U% M& H% V  Qto regrow-grass
9 f7 O6 r" H0 S. J+ Z  ask patches [
    if random 100 < 3 [ set pcolor green ]
+ g# E7 l  A/ }    ]
- j* `4 u% R. a6 k) q5 L6 O7 Pend
to do-plots
; _4 a, M( d! K" T  set-current-plot "Totals"
- O# N- R9 G/ ]9 p9 b) h4 W; z4 z  set-current-plot-pen "turtles"
. h+ H# E# K' {; q  plot count turtles
  set-current-plot-pen "grass"
  plot count patches with [pcolor = green]
) K. L1 y# \( r8 H7 U7 }. O: Iend
% S$ o, t2 \" C+ P  K3 j: x- m9 l可是运行时提示no such plot: "Totals"
error 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
$ x+ s0 C$ ?* K/ z0 I  D3 v; F) b建一个叫做叫做Totals的绘图框就行了

$ D3 b6 z. B5 X/ {$ a! X哦，知道了，虽然自己应经找到问题了，不过还是谢谢哈

pichan

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