设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4189|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
8 ?+ N2 z  Q& u" Z1 J; q( n语句是这样的# H6 P1 k$ W" U' [' i( ?
is2 `' ~8 P. F, t) c: E8 r, a4 s" k
        i:integer;8 |' B6 z2 I, v8 m
        Res:string;$ g  f  p  H; t, ~8 ~
        obj:object;. _3 Z; I: G" n
do
/ m" L! {, i& F1 C" |7 K        if existsObject("Status") then
/ W7 O% \: u  f4 P& F9 u                Status.deleteObject;
/ A, l8 T6 {7 G- K5 g8 u, w        end;
2 F! ^5 F+ G7 ~- ~        for i:=1 to 10 loop
2 _- J% T+ I) o1 w' z7 i* z                Res:=sprint("Store_",i);6 j0 m' F" }0 J
                if existsObject(Res) then
1 x3 W& q% j" w* S& `* Y- L6 `                        Obj:=str_to_obj(Res);
+ r. U+ f$ x- ?6 C- V: a( ]8 J4 J; o                        Obj.deleteObject;8 a4 |( u1 y: R
                end;
3 f" s; e  |+ J        next;
; H# r- @* u# ]8 L8 R$ _. t, w        --shengcheng Status:zimoxingceng
6 b3 ?7 t( T. K0 X        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");. j; S* `( ]$ ^) @7 E3 A4 T8 }
        Obj.Label:="warehouse status";
9 {% I* {( T2 \8 t# r3 M+ ?        1 F, Q6 H$ `& T" n8 i
        for i:=1 to WH_nums loop
, b- {! u; H: t: {                Res:=sprint("Store_",i);
, _8 n/ d5 b, F( D) L  D                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);& I) O- o, J9 W* r0 a. s6 p
                Obj.Label:=sprint("huojiaceng:",i);) o; \: Y8 r( k6 ?* E  W
                Obj.xDim:=WH_x;" A& }5 ~& D3 r2 d( ?
                Obj.yDim:=WH_y;  s& A! P' s4 Q) y- |
                Res:=sprint("StoreData_",i);
3 Y0 S( f, z4 ^; q/ f% j                9 S6 H3 U, X: u) u
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);3 U: B, d' K/ B" G
                Obj.Label:=sprint("huojiaceng:",i);
" t: `1 ~, O2 j4 @; }                Obj.inheritFormat:=false;# L9 c1 `% U0 Z3 p0 W* `4 z
                Obj.maxxDim:=WH_x;4 \3 t+ e1 ^! a
                Obj.maxyDim:=WH_y;9 K/ ^7 D: V- c* e# f1 A( Y: j# E6 F
                Obj.ColumnWidth:=3;( m3 R$ p9 ?& t& w" P& W* G5 \4 P
        next;
7 A* v! P. H, w( ^# ~# Q# B( l       
7 z  i2 F5 d2 M/ w        .Delivery.MUs.Forklift.speed:=2;
' {) F; W; I5 D- G        WH_var.delete({1,Part_Nums+1}..{*,*});
$ q/ w+ J* ^7 X        for i:=1 to Part_Nums loop* I0 w" t9 q# _5 y
                WH_var[1,i]:=chr(64+i);9 W1 Q# i* {1 \
        next;
* @* r6 x( }3 H7 o! Gend;1 @5 z, S+ B" b9 \! A2 q6 K
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
, ^/ h* \0 K8 C% p, E. ?" g
( v3 e+ N' {# C6 w# @

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-5 00:08 , Processed in 0.015701 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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