设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 9494|回复: 4

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

  [复制链接]
 楼主| 发表于 2013-4-5 21:09:10 | 显示全部楼层 |阅读模式
我编的程序如下turtles-own [energy]# u  X! O- }  W9 C, M1 {$ Q
to setup
5 E* l$ N3 P0 `- o# F& S" t  clear-all* ~! j- Z2 C* t# i4 b$ B
  setup-patches
9 Q1 g! z% x; d$ F7 F! ?4 T5 y, X  create-turtles 100. ^& B) ~3 r. {9 c
  do-plots
7 ~( Y9 ]1 O0 v  ask turtles [ setxy random-xcor random-ycor ]
" B6 F0 R2 j0 h. _+ A/ lend
3 `7 \3 U# T. E) U6 Z8 a1 S( s: Oto go
8 S  k9 O+ I) I( `, I7 [* M# a7 o  move-turtles7 \; R2 A  r; ]% a- v5 `
  eat-grass
4 A7 {1 M, X# `: e, N! K/ S  reproduce5 x7 ?9 {7 i5 T2 C
  check-death# U! j# T; d! V3 ~; {$ {6 H$ H- E8 p
  regrow-grass* u9 d0 |, i* r3 U5 T& i
  do-plots; a! [  G; O) b9 g/ P9 Y/ }" K) _
end
; k" s8 f/ f/ n( m0 `" E* kto move-turtles. }' W3 F" S6 q
  ask turtles [
  o1 T  t' X8 P    right random 360& \! s' k: G3 R$ R0 z6 H8 w+ E. J
    forward 1
$ J; x! n/ r0 P+ I1 _, v    set energy energy - 1  H2 {, ]5 F! G
    ]$ T# v. i9 d# T% `' i& W0 l
end* r! c: Z7 h) b, M' s& \
to setup-patches8 Y# [) h, }' _( \3 R) M1 j6 S5 A) P3 _5 a
  ask patches [ set pcolor green ]
9 f( K! B- {! @4 d) x6 z" ~end
- L. r% l; l8 I# R! W7 ]" P4 X) kto setup-turtles
" B$ |3 v( T8 M0 X  create-turtles 100" F; ?4 t* A% r0 J
  ask turtles [ setxy random-xcor random-ycor ]
: j$ s- o% N& p# s+ \end
# F  W& X9 p( k1 p& z( {3 s: N  Jto eat-grass
8 z7 s4 ~0 H- f) e* W7 e9 B# o  ask turtles [9 q# ?& R7 W! K4 k
    if pcolor = green [
* v1 r  q4 J& M+ @+ H$ J      set pcolor black
7 d) ]* y/ l& H. Q. }' V      set energy (energy + 10)
* k) Z& o# v% e+ D, X      ]2 ]& s/ y7 u) i3 }  }$ O- H
    ifelse show-energy?
8 M$ F' H+ r7 g9 b8 i) r8 x/ p1 ?      [ set label energy ]* f$ V9 t$ n7 e* g% K+ [' L; ?
      [ set label "" ]
* Y& Z' e9 Z" M, B" B) |2 p    ]# k& H! @% o/ n/ I
end. ^7 B2 q2 l+ ]
to reproduce
: B$ p$ j4 Y! J8 C8 u: A. ~  ask turtles [
# L: L' M; f' N+ ~$ \    if energy > 50 [) n% j3 R! i1 x4 T6 |& v' c
      set energy energy - 50
7 u$ d. L6 {8 z4 o3 N0 g* B      hatch 1 [ set energy 50 ]
6 F5 W- M; q5 j. H. t# n      ]
- c0 i; E7 x& B0 q; F/ U( P, t( H    ]
9 k2 e* {0 }# ]0 eend
% f2 Q$ F& O, O! f5 E; Bto check-death
6 O! _6 u) t, n3 g8 K  ask turtles [
4 J& k0 V' s( p2 T! |    if energy <= 0 [ die ]
" ]5 j* Y; k  Q- n4 f' \, S+ o. Q    ]+ s0 }! I* ]$ o- {
end( I  k% ]2 L3 c3 d4 S, c& r
to regrow-grass3 T( Z% v; T; F9 E$ Y* ?4 L9 K
  ask patches [" L8 ~0 t4 G7 z6 g, h! i
    if random 100 < 3 [ set pcolor green ]
7 `. l6 q4 ]& b    ]
5 w1 H3 O; \( h8 yend- O% ^# D. Q2 k% K
to do-plots* X7 Q9 v. B* y0 O0 g; d5 Q
  set-current-plot "Totals"
9 A" b% P  Y9 N8 O3 f  set-current-plot-pen "turtles"
  \; u, m! n* t; b  plot count turtles! d- s  ]' o* k# c
  set-current-plot-pen "grass"
/ Y# Y2 f- t# b( J5 x; Q/ k  plot count patches with [pcolor = green]
! G$ ?6 G1 c2 R) S& Uend
8 k, ~- E& V  {可是运行时提示no such plot: "Totals": ]1 d. D7 J; S+ k; K
error while observer running SET-CURRENT-PLOT
: j4 t$ e9 Y$ k" H  {  called by procedure DO-PLOTS
" l+ S: Z' T$ b4 _1 r  called by procedure SETUP3 S8 D8 q( L) P/ f) t( a, W; y
  called by 按钮 'setup'8 d1 O- @1 r% G. E
求大神解答啊
发表于 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 , o- o% v" c0 m: `' ]6 Y9 I
建一个叫做叫做Totals的绘图框就行了
. a0 y+ v! U' ^0 [
哦,知道了,虽然自己应经找到问题了,不过还是谢谢哈
发表于 2016-5-3 09:17:18 | 显示全部楼层
你也可以直接再界面页创建“绘图”,然后设置时钟(ticks),每一步画一次,不用自己操心。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-12-19 22:41 , Processed in 0.013891 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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