|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。/ e* W" f4 C. V
语句是这样的3 Q) T' w0 N( W
is; P* o, a/ i6 w1 k/ a+ T
i:integer;0 R- ^. C$ G- l: k& W. Z3 Y
Res:string;
3 v+ l% L0 @+ t% X* W! l8 H obj:object;
$ b) \7 R- @5 W% Z- L' l% [do. B1 V9 _% _2 L; P# E& b
if existsObject("Status") then! }- [$ p& S' F w& b
Status.deleteObject;
7 s5 O. i: h4 m. F* g end;
( C B5 [% G7 G& |- Z for i:=1 to 10 loop
- u% O% ]: y3 q0 t$ V8 ^ Res:=sprint("Store_",i);
; I) z u, Y3 A: w$ R if existsObject(Res) then+ b( S1 d3 f8 L. r2 _
Obj:=str_to_obj(Res);
/ @6 q& {4 Q) B Obj.deleteObject;
1 t6 Q- g% z; B1 \# T. i3 ^ end;( z [# q) y+ Y$ }$ E6 A u
next;2 ^6 i8 P' x0 F) J9 J
--shengcheng Status:zimoxingceng1 C- k* F, @" Q: i9 W( I' b
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
% Z6 Y6 b; Y( d; Z } X Obj.Label:="warehouse status";
" o. u7 l5 q2 ]: u! |" L
. D- S5 Q$ r$ q3 `. r9 l8 ` for i:=1 to WH_nums loop
0 {- ]- C& ^9 l8 w. n, R" h Res:=sprint("Store_",i);
O! J2 ~7 c( i ~ w* {( N5 F& Z3 P Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);0 k0 h6 R3 Q' R* Z, H
Obj.Label:=sprint("huojiaceng:",i);
G" [5 ?) y* B- m P$ K8 L V+ K Obj.xDim:=WH_x;
% _' r- A# |9 b7 ~2 e7 H4 Q Obj.yDim:=WH_y;
1 i1 u# I, _* L& H4 v Res:=sprint("StoreData_",i);
* A% A C6 i; V' m( [1 @( `/ w ) Y* V3 y3 |- x% c# [ v9 R2 L6 |
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);- O! K9 R% C+ k1 q* H$ c
Obj.Label:=sprint("huojiaceng:",i);
- U* C8 G7 A' [3 |0 x( O Obj.inheritFormat:=false;4 }' q( |- a+ c+ r# {/ J0 ?2 c( Y
Obj.maxxDim:=WH_x;# O4 I. Z! t1 a3 V! ?* M8 z! E
Obj.maxyDim:=WH_y;
& K) ^5 k3 }4 U g, d Obj.ColumnWidth:=3;9 C: U4 e- X* b: O( E( V
next;) e/ a8 b9 [9 h) ?/ b
m4 J: L: E5 }$ I
.Delivery.MUs.Forklift.speed:=2;8 x$ `/ a3 @ Z- \
WH_var.delete({1,Part_Nums+1}..{*,*});
* t6 H# D% U. O4 Z; @ for i:=1 to Part_Nums loop
0 M3 O2 W, J! x- r0 T8 d WH_var[1,i]:=chr(64+i);
4 u1 T5 H7 j0 F& D& m! j* f* t2 V1 | next;
& s& R7 J9 s- a' h- Zend;" c+ g% P% K) ?9 `, Q* n, `
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 : }2 q$ M( r& S' d
" F, m% I. b: f5 P0 o2 z. j% E |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|