设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 10212|回复: 4

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

  [复制链接]
 楼主| 发表于 2013-4-5 21:09:10 | 显示全部楼层 |阅读模式
我编的程序如下turtles-own [energy]4 t9 ^8 ~& e& M. o& n6 ~2 x
to setup( u7 Q6 U+ z5 b6 E/ r" p
  clear-all6 b) [' X" J* K6 @
  setup-patches
+ ?4 X8 x6 O+ ^, m/ t. Z  create-turtles 100" \7 Q/ T  \# \
  do-plots/ C: U6 m. }( z: X9 i7 u2 @7 v& ^6 Y
  ask turtles [ setxy random-xcor random-ycor ]
0 h  c. E* x6 l; y% wend
8 P7 ~9 L5 v' U. _! k3 q, ]to go4 _* j: v/ f, }3 ?9 \- ]
  move-turtles
/ x4 [! Z9 }% e+ S& H* H2 @  v6 ?  eat-grass$ a% I' I0 y( d! }, ~/ E7 N
  reproduce
( j! u$ R) ^$ {$ \4 |" t$ p  check-death
" ^7 k8 [9 T. x* ^( Q! ?3 d; E/ }5 C+ `  regrow-grass3 p8 z2 L5 Z! Y$ o* k$ b2 m  u' g
  do-plots
; H7 M6 k# C3 I; A, k1 ?end
- h% B7 N8 f+ F! K% A) _; s. Uto move-turtles
$ k2 Z" t  d2 R* X+ `  D  ask turtles [
: U$ N, O8 h$ `8 `: ^& d    right random 3607 A/ \, k) K6 s6 `
    forward 1# V8 |" m9 ^3 E* h
    set energy energy - 1
2 L7 Z) g( \+ f$ j6 o    ]
0 @9 Z9 |6 d$ R6 P4 wend4 O. v$ f! t: z% Q  E  p6 ^! J
to setup-patches; ~8 P4 z! K: u; O6 k7 E2 r* J! h
  ask patches [ set pcolor green ]
. r7 ^0 `8 V  L4 V5 Iend" h& J, u$ E$ U# |# r; o
to setup-turtles
7 n' M# E& v' ?- }# A. V  create-turtles 1004 w+ a) H2 k* J
  ask turtles [ setxy random-xcor random-ycor ]
: }" @. b, q/ R2 X, F  K8 eend" w) |" s) @* D, Z/ N6 |: q) h
to eat-grass
& u+ j" ^  c4 E( H; C  ask turtles [
- `8 c7 w. O4 S0 a. ?% _/ L5 J. M    if pcolor = green [
) u: s+ X! W) ]9 a      set pcolor black
6 `: N% a8 M) p& c      set energy (energy + 10)
9 r0 J4 N( {7 E9 N+ d7 j$ P      ]
  x" r; `" @8 W9 `! |    ifelse show-energy?
5 M1 D& ]  R5 P+ |      [ set label energy ]
; N1 W+ a3 p' o& t* i8 f8 n4 M      [ set label "" ]
+ J5 _& M1 T6 z4 `& f    ]
4 v- s& z' g4 a4 W+ jend5 V; `8 T' w! P9 J7 d! S5 l& ?
to reproduce1 J3 }& W, e" i1 o. }
  ask turtles [
" ?1 T( [( u( B, @: Q    if energy > 50 [
* V9 j" a0 S: M' J6 A8 K      set energy energy - 50, W/ I+ M" E& D) o
      hatch 1 [ set energy 50 ]
- ]0 {- v. F: N& h8 X      ]
2 S% t# A9 [+ I: F    ]/ t  a9 W' H8 Y4 i* I
end
  C+ R0 o$ I: i. j. yto check-death
- n( C1 E4 I& G7 J# K  ask turtles [
. X. R0 ^" h0 l( O- p7 d    if energy <= 0 [ die ]
/ ]" c* c/ q* W    ]4 u1 q% C* c" k7 Y! T2 x
end/ y9 K) z7 }0 |6 G! z
to regrow-grass9 ]/ N6 p/ ^8 `& P& X  G
  ask patches [! g! ]2 }% X1 a2 f5 z6 Q  _- k
    if random 100 < 3 [ set pcolor green ]3 X& O- L  i/ n2 E1 Z
    ]
: f6 \! u- N" V1 h: Mend" L3 I+ v$ Z' V" p1 ?" p! Q: ?
to do-plots
8 ]. _* i. L5 ]3 o! o  set-current-plot "Totals"
" F8 L0 c9 A0 R* S# U; ?  set-current-plot-pen "turtles"# Q0 r, v! l( A8 A  o
  plot count turtles" V' l7 v" ?1 J3 S4 G$ I; u/ k' t
  set-current-plot-pen "grass"/ c. t9 s3 Z. V7 c5 N
  plot count patches with [pcolor = green]1 ~, Q. q: u* J$ X+ L8 W9 o& J
end
, ^/ d( K1 X+ S) X( X' B: f4 i可是运行时提示no such plot: "Totals"$ M; |+ O3 O5 K1 w0 d+ R9 h
error while observer running SET-CURRENT-PLOT  o* Q/ X9 v  Q  c  R
  called by procedure DO-PLOTS
9 f1 U; D- w2 b  called by procedure SETUP0 f3 v, k9 L3 Q) g9 M
  called by 按钮 'setup'
5 m7 n+ s8 K7 U! {" c4 ~求大神解答啊
发表于 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 & X! ?, ~3 t- Q- Z8 j2 h
建一个叫做叫做Totals的绘图框就行了
' y! t4 D" B1 S
哦,知道了,虽然自己应经找到问题了,不过还是谢谢哈
发表于 2016-5-3 09:17:18 | 显示全部楼层
你也可以直接再界面页创建“绘图”,然后设置时钟(ticks),每一步画一次,不用自己操心。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-2-24 09:20 , Processed in 0.019315 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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