|
先说代码的问题:- /* 标签设置*/
- w6 }" L+ N- C - {
* |9 y7 O9 S0 c) ]" r% B% S: K - if (port!=1)
`+ q; @; D: W) d" p6 S7 O - {
8 w4 _7 z" E6 {7 p7 J6 A - if(getitemtype(item)==1)
. K2 _$ V% I) T. r& d5 }' h: R1 p - {
2 h5 X7 i2 W5 f# F0 n" Q: N7 } - int value=inc(label(item,"item1"),1);
7 o" i) _, S3 D& y- P - setlabelnum(item,"item1",value);
& I$ }3 t* F H. \. u - }
3 ^8 d/ l6 [( q - if(getitemtype(item)==2)& J8 p$ k+ n/ M2 M3 `$ H) V, `& o K
- {
; L0 q; A/ i# R1 Z7 k' ^( `! O5 z - int value=inc(label(item,"item2"),1);, f& k( `0 g4 h
- setlabel(item,"item2",value);
7 b1 g5 ?# m9 t. V$ }5 V - }
) I. z& R- \& _4 c2 z+ R - if(getitemtype(item)==3)
" t4 q0 a I8 P$ [6 T) A9 B7 s - {
6 `$ a6 L3 R% m3 u+ a& t( p$ ^ - int value=inc(label(item,"item3"),1);2 g2 s* O1 @& E5 R3 B% x) }* H
- setlabelnum(item,"item3",value);3 I! r: V/ M+ n; ]6 w/ M
- }
! N! l3 m; f$ \# V8 B5 Q - if(getitemtype(item)==4)/ k4 u; ~7 V( Y& m5 C! v5 w
- {: m% o7 ^% h, w/ A$ ?# ]
- int value=inc(label(item,"item4"),1);
4 K( ?' {+ G) v - setlabelnum(item,"item4",value);+ I. I5 E0 _' X% t6 I) a% F
- }
9 m9 w/ k& Y0 I; |6 R7 g9 C - }
$ ?* s+ |: b8 S d( e8 ]1 j& ` - }
: o) c; \: A4 g
复制代码 4 e# W& I5 `, Y0 B+ _9 J2 n" }+ u
1.你在托盘上创建的标签名是"Item1","Item2"...但是在代码中写成了"item1"、"item2"....。Flexsim代码大小写敏感,所以无法获取到正确的标签。2.你建模的时候使用的是Flexsim2016或更高版本,但是在写代码的时候使用了非常古老的函数setlabelnum。setlabelnum函数已弃用多年,我已经查不到其相关说明了。如果你对点语法不熟悉的话,可以使用setlabel命令代替。setlabel命令可以在没有相应标签名的时候先创建标签再给标签赋值。结合第一个问题,setlabel的结果就是:在找不到"item1“标签的时候,先在item上创建一个名为"item1"的标签,然后再赋值。当然了,因为前一句语句5 G5 g- F& i% l" ]9 @: k
- int value=inc(label(item,"item1"),1);
复制代码 无法找到正确的标签,所以value永远是0。2 o# Q' r# d. R; t
3.你在代码中加入了if (port!=1)的判断,这非常正确,应该排除托盘,只在box进入合成器的时候改变标签。但是再想想,你要给谁增加标签呢?是box还是pallet?你希望根据进入box的类型增加pallet上相应标签的值。那么,setlabelnum函数中的第一个参数应该是什么?如果是item的话,就是要在box上设置标签值,而非pallet。所以此处应先找到pallet对象:
, x2 o3 B' q: L+ ?; K' I* O2 m# p8 M0 u5 _) N' J; q
- if(getitemtype(item)==1)1 X) K$ [: _& u. l0 h
复制代码 也就是说,你确实应该根据box(item)的类型值来进行判断,但是判断结束之后,你要改变的标签在pallet身上,不在box(item)身上。: l/ a! V8 U+ r# v9 _( ]4 ~
4.inc函数本就是增加(减少)节点值。既然已经增加了,就不必要在用setlabel函数重新设置一次了。
& G9 h6 w% K1 F; R) W2 i k- treenode pallet=first(current);
! k8 D6 E+ j7 k: u5 @3 R4 ] - int value=inc(label(pallet,"item1",1);
复制代码
- Z' T& z5 P! z$ W$ I
+ ^! m; s# H! k+ Q" F' J0 i- y) V2 A0 i
* t _; [9 {- f" N3 L& q" B说完代码问题之后,我们再从模型逻辑上来想一想。
$ @+ @2 r0 }" c' O- E0 p你在托盘上设置标签值的作用是什么?模型中没有体现出来用处。如果仅仅是为了练习编写代码,这样写当然可以,甚至可以说这是一个非常好的案例。
9 P' R4 F1 N# h. o9 U3 U如果不是为了练习,这段代码就没有意义了。因为托盘上的临时实体的数量早就在全局表中定义好了。如果需要,直接根据托盘类型值读取全局表就可以了。; }+ I: N4 b* j, w" R8 f
( j1 K" e6 [) f/ q附上我的代码以供参考。+ h& `2 T+ w: n# S
- /* 标签设置*/) ?8 a& q, u, j
- if (port!=1)+ [! ~" j- K$ ], r% u' H
- {
e1 W; L- o: m& G @% h - treenode pallet=first(current);//找到托盘; d8 O/ Q2 F% G' _6 n) f2 W
- int type=getitemtype(item);//获取临时实体类型值
6 X6 k" @4 F* }2 Y8 C - string labelname=concat("Item",numtostring(type));//根据类型值生成标签名 }) h5 @4 d2 L
- inc(label(pallet,labelname),1); //标签值+1
( R2 ~1 g* o2 L# t! a) \ Q$ O - }
复制代码
$ N) C# \% s: K3 s! @* w6 S( r1 d! w1 V
|
|