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

newlove

我编的程序如下turtles-own [energy]
to setup
0 K3 D" F' w5 o  clear-all
& ^% M! B1 |: ]3 B" r  setup-patches
  create-turtles 100
5 h' R% Y1 f4 F) z4 G* l  do-plots
- t! K! H. t1 M3 n6 o( n# A  ask turtles [ setxy random-xcor random-ycor ]
end
to go
  move-turtles
5 ~9 o: z$ `. [* K. }  eat-grass
3 L5 E: I, M. U8 P; T7 L- ]  reproduce
) p- t/ ~! k  I  check-death
8 z- A, a8 g- k$ ~8 I) E  regrow-grass
  do-plots
" y8 x0 j  n9 J( \$ _) r$ J7 C: F; Eend
to move-turtles
% Q# \8 T% Y2 ?  ask turtles [
) f5 ^7 N2 S" l" y' x    right random 360
    forward 1
$ l/ G% w+ a4 h& h1 Y    set energy energy - 1
    ]
end
9 f- {% R0 ?) A* M6 C' D( T" [to setup-patches
  ask patches [ set pcolor green ]
end
to setup-turtles
& u- J5 t( ?8 U& D' Y  create-turtles 100
- T$ k1 b9 f) u5 u" u  ask turtles [ setxy random-xcor random-ycor ]
. W6 T5 C' ^: k) tend
. _5 U% m; v' Y5 E. B) Fto eat-grass
  ask turtles [
5 p' P  O; A+ K1 }6 S; W2 `5 `    if pcolor = green [
      set pcolor black
+ }) c. O. Q% x/ F/ r8 Y5 x      set energy (energy + 10)
      ]
3 y3 z: F8 z: ~, H9 j    ifelse show-energy?
3 c) T9 Y5 [$ S) F; k$ o! E      [ set label energy ]
- l# z1 T. E' W6 T, z      [ set label "" ]
$ d* Y& m  x; d( T' ^    ]
end
+ r. B/ t1 L1 o. h2 I& Mto reproduce
7 o* ?; ~+ j3 ~3 f; H' E, ]  ask turtles [
) R/ U# X, m! z2 q* k% U  M    if energy > 50 [
7 ?1 O$ s  @+ t! t. t1 ^5 I9 X: x      set energy energy - 50
      hatch 1 [ set energy 50 ]
" F# P$ @# c: w- M      ]
) y! _( U+ N9 W% p( }$ e7 B* j    ]
1 j6 k# X# p( d# u  R0 iend
$ S! s. x( r+ {& |to check-death
  ask turtles [
5 Y+ \: m4 j; ]    if energy <= 0 [ die ]
" O3 F& M; ?/ C4 T. c    ]
5 S4 K$ d$ P+ B8 t% u! c- ^end
to regrow-grass
; Y* s. x/ Y/ U+ s+ ~# u5 {  ask patches [
    if random 100 < 3 [ set pcolor green ]
    ]
end
& Q. g' L# L" i2 ?, @$ pto do-plots
8 N; |! h/ ~$ k+ W, j: j& {: r* v  set-current-plot "Totals"
- `7 I2 ~- m$ A8 ?* D  z. Q  set-current-plot-pen "turtles"
! F$ ]" J$ F6 K) @2 ?. H( K( W  plot count turtles
) @1 S; T3 f8 @! n8 ]) _! ]  set-current-plot-pen "grass"
  plot count patches with [pcolor = green]
end
) T% R, E/ m0 w可是运行时提示no such plot: "Totals"
; y) s7 F' Q4 }5 J' Ierror while observer running SET-CURRENT-PLOT
/ b% V: t/ Q8 z) k" \  called by procedure DO-PLOTS
  called by procedure SETUP
1 i8 q8 ^" Q; @1 K  called by 按钮 'setup'
4 q& W$ m' W- @/ U$ I% t求大神解答啊

emlyn

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

emlyn

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

newlove

emlyn 发表于 2013-5-29 00:26
6 N! z0 T7 m  U' V建一个叫做叫做Totals的绘图框就行了

3 G; m' U8 I7 G, S* x, r' T哦，知道了，虽然自己应经找到问题了，不过还是谢谢哈

pichan

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