|
先说代码的问题:- /* 标签设置*/5 b& b& I7 E. t4 {7 K* |* n8 c
- {$ T; m+ S. O0 _! a. y+ d( S
- if (port!=1)
$ t8 p& ]7 i; C3 p- d$ F( Y - {
/ w% e# r! I1 b5 `8 O3 I - if(getitemtype(item)==1). |! U) l8 ~- O- l A0 ^) V
- {2 e$ f. B# g5 D: u- T
- int value=inc(label(item,"item1"),1);- n5 C( y! N2 x
- setlabelnum(item,"item1",value);- A0 R$ b9 K( x' r$ K$ m5 A! X/ b
- }6 e, |, v0 u5 C" J! X
- if(getitemtype(item)==2); W% }. X0 U5 I7 z* I5 s
- {! m( i X* p8 h! ]" R& B, m8 j$ n
- int value=inc(label(item,"item2"),1);
. L! E* \/ ]) j H% | - setlabel(item,"item2",value);
7 f. l- s5 h; \1 t* A- v - } 3 ]6 `7 w% }0 l* A9 b( T0 G( r( ` p; b
- if(getitemtype(item)==3)" l! R# G+ H1 d( q: C
- {
) z9 N/ r+ ]; U( W8 k# |: w t - int value=inc(label(item,"item3"),1);+ |; B. b. r( T) t& t% A5 A% ~5 X1 a( |
- setlabelnum(item,"item3",value);8 w7 ]! x9 s' ?0 i T! M5 M
- } C i$ Y- |0 K9 g- _' U0 U- M
- if(getitemtype(item)==4)9 O5 G7 A1 ~! b5 Z! M/ D* W. b
- {) }0 Z8 ~0 H+ d( N1 |6 s( p x
- int value=inc(label(item,"item4"),1);
# V4 y6 x% L( v8 E4 l - setlabelnum(item,"item4",value);
2 ~4 [( `2 Z9 [8 C! M* `- @. m - }
- c! q' c h. a; E" f" s8 v: F - }
7 I( b$ q$ s- J8 V - }
$ p4 Z# w; g% T8 W- R- ?1 J8 N
复制代码
4 H9 X! h" S( {% d7 F1.你在托盘上创建的标签名是"Item1","Item2"...但是在代码中写成了"item1"、"item2"....。Flexsim代码大小写敏感,所以无法获取到正确的标签。2.你建模的时候使用的是Flexsim2016或更高版本,但是在写代码的时候使用了非常古老的函数setlabelnum。setlabelnum函数已弃用多年,我已经查不到其相关说明了。如果你对点语法不熟悉的话,可以使用setlabel命令代替。setlabel命令可以在没有相应标签名的时候先创建标签再给标签赋值。结合第一个问题,setlabel的结果就是:在找不到"item1“标签的时候,先在item上创建一个名为"item1"的标签,然后再赋值。当然了,因为前一句语句2 O# A7 R( w- u% q! B
- int value=inc(label(item,"item1"),1);
复制代码 无法找到正确的标签,所以value永远是0。- _' |% _" \$ l$ H( [ P
3.你在代码中加入了if (port!=1)的判断,这非常正确,应该排除托盘,只在box进入合成器的时候改变标签。但是再想想,你要给谁增加标签呢?是box还是pallet?你希望根据进入box的类型增加pallet上相应标签的值。那么,setlabelnum函数中的第一个参数应该是什么?如果是item的话,就是要在box上设置标签值,而非pallet。所以此处应先找到pallet对象:
8 k j) n* K+ m, A2 U! C1 X+ D% D z- R: x
- if(getitemtype(item)==1)) F. ^, k6 f1 e$ j$ ~4 Y( u$ L; @
复制代码 也就是说,你确实应该根据box(item)的类型值来进行判断,但是判断结束之后,你要改变的标签在pallet身上,不在box(item)身上。1 i% `' u& H) H3 l6 v; p- @* o- ]
4.inc函数本就是增加(减少)节点值。既然已经增加了,就不必要在用setlabel函数重新设置一次了。
1 V! L1 q4 _) ?0 i' F, i- B* ~- treenode pallet=first(current);0 A9 ^4 S* j @4 v( y
- int value=inc(label(pallet,"item1",1);
复制代码 % x: a! C+ _- b! ~7 G( t- @- J
( ?2 Q$ W9 G. u# k8 b! ]6 }7 C
/ y' t, R2 J* P, W$ Y% U9 g K7 D说完代码问题之后,我们再从模型逻辑上来想一想。9 M( V+ h) I" x3 D3 G
你在托盘上设置标签值的作用是什么?模型中没有体现出来用处。如果仅仅是为了练习编写代码,这样写当然可以,甚至可以说这是一个非常好的案例。
4 f) W, W0 C- \; p! N8 \; I5 h/ o: n0 W如果不是为了练习,这段代码就没有意义了。因为托盘上的临时实体的数量早就在全局表中定义好了。如果需要,直接根据托盘类型值读取全局表就可以了。 ? n+ w, l! F2 a3 |9 T
+ y0 V: q" i4 q$ k( }
附上我的代码以供参考。
8 ^! B- t# T5 ^& F- /* 标签设置*/8 B; v4 i8 _) C; [% V# |
- if (port!=1)" M# |( G& O, w
- {
" G h( q3 f6 Z1 v( R& c - treenode pallet=first(current);//找到托盘' Y8 \: W O8 a% ^9 J) K
- int type=getitemtype(item);//获取临时实体类型值
" A7 L0 v ^/ n3 | - string labelname=concat("Item",numtostring(type));//根据类型值生成标签名
2 ~; S) N* _" D6 m l - inc(label(pallet,labelname),1); //标签值+1- v2 ?" m) P, k3 z% }
- }
复制代码 8 |7 n! t! |4 g/ Q: O9 v+ x& ]8 C
' g0 A+ T# v* H |
|