设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3721|回复: 0

[求助] 仿真出错,求大神帮我看看哪里错了

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
5 ^' w# }0 O% p/ S  O$ k$ C) Y: S语句是这样的$ Q! S+ w' Q) ], b( i
is1 U! Q3 b* g) T7 [+ ~! n0 j
        i:integer;
; E! E: U0 y- e4 M( }6 N( ~        Res:string;5 B! _" z/ F  T' h
        obj:object;
' P1 G4 w( f2 _# O0 D: [: L6 udo
9 J6 t% {. }. Y- ?" g        if existsObject("Status") then$ i! n" Z' B- Y; `1 y  `$ g$ z* }
                Status.deleteObject;- ?# T  F2 ~" q' |& y% ?$ x; O
        end;
' i2 b. j( ?- B        for i:=1 to 10 loop
' a2 r$ d" A5 B! k% }4 @" s8 L                Res:=sprint("Store_",i);* |3 e2 x) N0 e9 g* |7 F' J4 A
                if existsObject(Res) then
) ^2 Y& q- _" Z, o0 s6 ]5 v                        Obj:=str_to_obj(Res);
$ A# W$ c; R( l9 x+ F                        Obj.deleteObject;3 S2 S3 Z, Y" G3 g- t- n
                end;
- i6 J4 K+ V4 g5 H        next;
7 Y1 W7 g" n  ^& l( W        --shengcheng Status:zimoxingceng
1 K5 M9 h4 ~" G$ T6 \  V9 p        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");* F) ^/ p  u9 W. L$ g, k
        Obj.Label:="warehouse status";+ \' ^( Z3 v) M" I1 U7 K
       
- [9 l0 ]5 f* ]2 C. k& a. X0 h" P* R        for i:=1 to WH_nums loop
$ h  a9 K4 q' x& w                Res:=sprint("Store_",i);
1 l% K/ ?. S( |: P4 F6 ?9 k                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);# w. Y/ t' H6 P- W# ], u# O
                Obj.Label:=sprint("huojiaceng:",i);" `' \6 p. j8 W6 e1 n# z
                Obj.xDim:=WH_x;/ u. s6 x6 D, X4 }5 y/ a3 d1 k
                Obj.yDim:=WH_y;
0 [( o+ i0 B6 R                Res:=sprint("StoreData_",i);( L7 h( V$ o5 }1 Z) W# H
                9 E% M5 `9 Z0 }- m. i% b
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
, T- G) ~9 T) }: z                Obj.Label:=sprint("huojiaceng:",i);( A$ Z3 c+ ]6 `9 h( h
                Obj.inheritFormat:=false;
  c# j) Y' t$ R  u5 c% I                Obj.maxxDim:=WH_x;  Z1 d) o4 D$ v+ R9 K0 r# D1 `
                Obj.maxyDim:=WH_y;2 A6 k# J9 {! [& _9 Z. {+ x2 u
                Obj.ColumnWidth:=3;
% k& Y+ [) U/ ~- @5 D3 I/ {% R        next;, c# B% g+ H5 O% C) L. d* J0 {
       
: J! m2 u) _7 w/ F, c        .Delivery.MUs.Forklift.speed:=2;
# }/ t2 b8 ~/ M' h6 i5 w2 K        WH_var.delete({1,Part_Nums+1}..{*,*});
; F% a2 {6 M0 }. M+ N        for i:=1 to Part_Nums loop5 J" o( V1 L- Z7 F0 Y. @. `1 b+ I
                WH_var[1,i]:=chr(64+i);+ ~6 S# J/ {1 {" Q
        next;
+ T7 V3 F' m/ J3 a3 u% `end;' O$ c5 B5 l$ `. A
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
8 I! p1 |6 U# A4 J4 w$ A. h
" u& X5 W  n3 x5 d/ [* j& P) u9 E9 u# l

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-4-17 17:43 , Processed in 0.021712 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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