设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4414|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
: T, m8 U  Q& z& a! U, N语句是这样的5 j  {5 m3 q7 R9 o0 I
is
1 [6 S+ ^, ~% O- Z        i:integer;
3 b) |9 J8 {$ J/ P7 G        Res:string;
. o2 A3 e7 u# }; \$ I6 z        obj:object;
0 ~6 f$ W" W, P1 g" Ado
3 t0 Z- Y# x2 K0 ~$ _        if existsObject("Status") then
. g+ r: n; [6 Q4 K( R3 b                Status.deleteObject;; ^/ U6 c( z8 F" A5 ?% l
        end;
; k$ \+ M3 j0 D. b        for i:=1 to 10 loop1 F0 m& U- }" n6 }
                Res:=sprint("Store_",i);% U8 H3 N( j7 l4 u1 c% S  e
                if existsObject(Res) then) o5 o5 d) I) m6 i8 m
                        Obj:=str_to_obj(Res);; W# a3 q" G) t8 u; \# W
                        Obj.deleteObject;' O% `( Y  f- C1 w) o0 [: h, x3 ^
                end;8 q3 B: A! B, I$ ^/ P
        next;
6 \1 a, D2 w1 U7 W  v5 j5 t* F        --shengcheng Status:zimoxingceng$ j* S9 U6 U8 X( h) u# M' e
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");7 [9 N+ Y5 L8 \' }$ l5 `
        Obj.Label:="warehouse status";4 B) v5 d9 H- X6 M8 i/ c
       
$ F- p* x/ `  X        for i:=1 to WH_nums loop0 q+ N8 I1 m4 a0 S( T+ h* \' O* e
                Res:=sprint("Store_",i);' a+ V' f8 f8 @5 A4 S
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
+ n/ ?! D* m5 m                Obj.Label:=sprint("huojiaceng:",i);7 W' t4 h8 y& z8 [
                Obj.xDim:=WH_x;
+ t! {8 R" \- H5 a. z                Obj.yDim:=WH_y;) m# D7 ^# v2 }- C* I  B2 e3 }
                Res:=sprint("StoreData_",i);
2 X# _- {6 k" v/ x$ r" {8 |) O                " |. G0 ~  T3 I3 Q; S: M6 k+ X
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);% k/ q) M& y" o. Y
                Obj.Label:=sprint("huojiaceng:",i);
7 ?+ f7 G9 _+ J+ l- H+ m- y8 H. Z                Obj.inheritFormat:=false;# y# D, r3 a4 W' d- |& R
                Obj.maxxDim:=WH_x;
0 N7 Q5 O- C( Q+ i                Obj.maxyDim:=WH_y;8 h$ q( ^) G% c* J1 f0 Z* R
                Obj.ColumnWidth:=3;
3 Y# d6 v/ N# @% t        next;
/ E: Y7 l6 ~$ {$ f. q) Y       
7 ^& Z8 T2 a) s1 G( l( E+ p- G1 n9 [        .Delivery.MUs.Forklift.speed:=2;9 d, g, @& C& ?8 R6 `0 Y
        WH_var.delete({1,Part_Nums+1}..{*,*});
' U& a4 C/ Z5 h9 }        for i:=1 to Part_Nums loop9 D0 p& D9 [$ w" p1 O$ R7 l
                WH_var[1,i]:=chr(64+i);+ I. r. J3 _6 s8 I/ L* g) V
        next;
  }; {0 j" S6 gend;3 \$ g5 }1 o8 G$ V/ e7 I2 ^4 w
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
  v* q1 j8 X  B" d% X5 A9 }' r9 \0 U. o+ N0 r

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-7 04:04 , Processed in 0.017538 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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