设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 12439|回复: 4

[求助] 自学中文手册时遇到了问题,求高手解答

  [复制链接]
 楼主| 发表于 2013-4-5 21:09:10 | 显示全部楼层 |阅读模式
我编的程序如下turtles-own [energy]4 r6 H, I# ^; N8 M) \2 y
to setup: m$ f$ o( I8 r' b, C4 h- f
  clear-all+ b4 |% p, l0 v" ]5 m' h
  setup-patches
9 A/ j  H) X9 ]  create-turtles 100
4 Y$ [1 y7 s7 _& Q4 c8 F9 c  g" I, @  do-plots+ ]( C: \$ V( G7 o- V; O
  ask turtles [ setxy random-xcor random-ycor ]. x! t8 E: I9 N! `& U6 J* Y. k
end
5 J8 B9 U  P2 q9 Rto go4 g( e; F9 ?/ ~/ U: |' y
  move-turtles6 B" p- v3 q' C: _- k$ p/ Y
  eat-grass4 |1 D8 @% O+ Y- q) N
  reproduce# O; M% a# A" l6 _6 ^# ^9 c) Y  D
  check-death/ a: C+ l( ~3 w% n
  regrow-grass7 {5 ]+ D( I: x. e  H) ~
  do-plots) l4 s$ Z4 t  Q: K
end
1 f) {  V! r% v; ato move-turtles* x" W# N% _' l: P' v& W9 }3 M
  ask turtles [
( i! M, y1 |- Q    right random 3607 A" K: ^- }1 }* `$ J% S
    forward 1
+ R4 t% N! Q6 g, W& j    set energy energy - 16 n: ^3 ]3 P) ?1 O1 Y; X, i
    ]& f9 X9 F4 c( J$ {& \( B* G
end
3 F( g4 w. Y% [% e4 d. ]9 a- ~to setup-patches
. \/ h' e; u4 L/ a/ j. P3 V. S  ask patches [ set pcolor green ]
8 I7 @; C# g  S3 kend
- N& |1 \/ h# d, A) a+ Y5 y3 _. j3 sto setup-turtles1 a! {: ]* z2 g' `% R( T" {
  create-turtles 1008 L! V) L1 p& m: }9 @
  ask turtles [ setxy random-xcor random-ycor ]
$ |2 M5 f: e" C) T6 Oend
2 P0 G+ s, L8 A$ o+ r8 ^2 D1 Mto eat-grass
& M" D6 m" h. ~- P" a  ask turtles [% f6 g% v# N: a& x3 P$ F5 [$ D
    if pcolor = green [" t7 V/ M  W' ~2 g
      set pcolor black
) B1 B) E" W8 \- V/ }      set energy (energy + 10)+ J8 l* T; ?# J/ ^' A
      ]' P* n5 ?9 i. N7 n! [# M
    ifelse show-energy?
6 ^! _; e( [! T! T! q( z- O! ^      [ set label energy ]
4 q& ]  g. D' [! u  l      [ set label "" ]
6 l9 j/ {, E/ Z7 x' \    ]7 H7 ?$ f8 D4 j
end) a) ^; s0 U) y- d$ \: L8 C
to reproduce
* u& W9 Y. T( a* `9 Y7 @  ask turtles [
6 c) n' @1 z- A: i    if energy > 50 [
; B8 M( F) _4 @& H$ Z5 @3 r      set energy energy - 50" V3 X  `9 \& T. ^: R1 r! [. n
      hatch 1 [ set energy 50 ]
6 j3 D. p3 }- T  v5 Q* n      ]
' X; S- Y( S% S& B2 [- p$ a% m0 ?0 @    ]5 O2 I. k3 E% B+ B( x
end3 S9 T' M: i& c4 H" ^
to check-death; x$ g& A; F$ p1 j6 S9 W% D
  ask turtles [
' T0 @: {% [1 |0 x% w' v! X: D    if energy <= 0 [ die ]4 H& f* ]) Y2 q5 ^; J
    ]
+ N6 j1 y$ W2 P+ L; ]7 Xend
( d  D/ y  a- r1 G1 r2 t3 P8 xto regrow-grass) P/ N( V. R, Z) V$ J1 ^
  ask patches [
7 ]8 |% H" |; D7 ]- U# t    if random 100 < 3 [ set pcolor green ]
1 Z- ]/ s: P4 F7 _+ `( t, q    ]" q1 M  S9 f1 G) j) S
end1 n' U3 G# ~; f
to do-plots# E& ^) m% _4 [# X
  set-current-plot "Totals"" J! j' Z; s* F: K  i
  set-current-plot-pen "turtles"
- W' O8 w6 o! h  plot count turtles
& u* @3 O: z' p6 Q  X/ @5 [  set-current-plot-pen "grass"
* g  @/ r/ F/ L9 @  plot count patches with [pcolor = green]6 U0 H' z  P% U& v- H  p3 c
end
+ d4 b. a5 d& ?& y3 a+ O5 h3 r) ^可是运行时提示no such plot: "Totals"1 l: A' v- z/ j) I" I# O1 w
error while observer running SET-CURRENT-PLOT
9 g5 c* i2 V# A  called by procedure DO-PLOTS: N+ P) k4 e/ T
  called by procedure SETUP
7 V2 [- @5 f% z  called by 按钮 'setup'
! W; j: Z) h3 b求大神解答啊
发表于 2013-5-29 00:25:38 | 显示全部楼层
no such plot: "Totals",就是说你的界面里没有叫做Totals的绘图框
发表于 2013-5-29 00:26:26 | 显示全部楼层
建一个叫做叫做Totals的绘图框就行了
 楼主| 发表于 2013-6-4 12:24:45 | 显示全部楼层
emlyn 发表于 2013-5-29 00:26 8 M. a3 c$ \) Z" }
建一个叫做叫做Totals的绘图框就行了
! h5 M/ D" O' `( Y$ p' F3 m6 e* W- w
哦,知道了,虽然自己应经找到问题了,不过还是谢谢哈
发表于 2016-5-3 09:17:18 | 显示全部楼层
你也可以直接再界面页创建“绘图”,然后设置时钟(ticks),每一步画一次,不用自己操心。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2026-8-21 02:59 , Processed in 0.020234 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表