设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4052|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
/ V& R# G1 @& s语句是这样的
6 T# i$ F. d- H; w3 Pis9 w2 q# @% v$ {- |) {4 Z+ M+ L2 Z4 [4 f/ [
        i:integer;
& ^5 i3 F$ s) p3 a3 P1 O0 V        Res:string;% E" M8 k3 v4 J1 W) S) e
        obj:object;
# O9 t2 \0 y2 mdo' p+ u) j  C: B5 k
        if existsObject("Status") then
! N3 n, a7 z. W8 `2 d0 C! w' N                Status.deleteObject;
" ?4 B& Y! m7 J0 r+ m, e! u        end;# `* z9 W* s. \3 h) b/ N) M& s% Q
        for i:=1 to 10 loop
. `0 g: p% C8 V5 H. R                Res:=sprint("Store_",i);
! V: }/ G  H( {: k& C4 f2 S; [                if existsObject(Res) then
% d! N* w% Q, J( S                        Obj:=str_to_obj(Res);" D5 K. k/ v+ t5 _9 h0 \  X
                        Obj.deleteObject;# a* J0 P  e' i" f
                end;! Z/ Q: w4 A+ C$ V' X2 t
        next;( V  z7 Y' P' W$ p, Z# G
        --shengcheng Status:zimoxingceng; W7 ^. ]5 [# G9 k( k4 X
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");. Z( j' t: M0 g* |6 Y
        Obj.Label:="warehouse status";" I; L! y5 s# d. f+ }2 L
       
8 y) [/ R4 R- G" @5 v! ?- s% p        for i:=1 to WH_nums loop
8 y" w6 R1 u" m" n+ Y+ `                Res:=sprint("Store_",i);
! f+ |+ `* z* k. z                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);0 U  P$ a9 H% @4 a/ j* s- f2 v  n
                Obj.Label:=sprint("huojiaceng:",i);) j& \  ]) _/ M# _; J# A8 z
                Obj.xDim:=WH_x;* V, T+ n5 T! x3 ?4 g% o: u# c
                Obj.yDim:=WH_y;) D- W( Z8 M2 d
                Res:=sprint("StoreData_",i);2 f# _# T$ ^5 d$ w  p' s- T
               
3 N/ T) q! k: N. z3 l9 e; q                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
% X3 R; e# Y9 y4 I, K                Obj.Label:=sprint("huojiaceng:",i);9 X9 {0 Z: @: V- m
                Obj.inheritFormat:=false;: a* J& X* [- x8 H' i$ [2 n
                Obj.maxxDim:=WH_x;
1 j9 N- V: l3 O$ Z: t+ U3 q: e                Obj.maxyDim:=WH_y;8 x/ A+ V# S; F. a
                Obj.ColumnWidth:=3;
. ?# ~, \7 g' Q* {        next;$ h$ [& r3 A8 N3 [
        $ ?0 q& d% y/ o' A0 [$ c8 a
        .Delivery.MUs.Forklift.speed:=2;
; d1 w8 F/ ^. K) L4 M        WH_var.delete({1,Part_Nums+1}..{*,*});/ e5 S! A; g; `) l
        for i:=1 to Part_Nums loop
( i  N+ e1 Y. O/ u                WH_var[1,i]:=chr(64+i);6 N9 {0 p+ R6 n, ?4 k/ w
        next;; }2 i' x" L) a* `5 S2 H3 F; j% i5 f
end;% M# X; t8 ?: q
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
5 ~2 U1 p1 C! v+ [! C1 g2 u3 ?3 I4 o* g! {. \& T  k# g! c% @

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-6-10 05:52 , Processed in 0.013936 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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