|
先说代码的问题:- /* 标签设置*/- F( t& D0 R4 ^4 H( Z+ j$ o. n
- {4 p& \2 ^% A# T& w
- if (port!=1)
1 V% a2 ~6 ?1 d" {2 a/ }' G9 R - {
3 Z0 y' d c' m: e - if(getitemtype(item)==1)
; p, z- H) d, U4 Q* } - {
6 {) h5 l; E* c( U: x( ]5 s - int value=inc(label(item,"item1"),1);) O6 t7 Z T' M
- setlabelnum(item,"item1",value);0 o$ c! P. X7 T, ?" Q
- }4 b" T8 M! d+ b& m0 J; b9 j
- if(getitemtype(item)==2)4 X7 t; O: I8 O, ]! C$ G' C& j/ u
- {4 f3 l3 x& ~4 K3 q4 t- Q8 {/ s
- int value=inc(label(item,"item2"),1); R1 U5 u& Z, E. Z" {: U) N
- setlabel(item,"item2",value);8 L$ M8 H/ M! @$ f) b+ \8 d7 M* f' p
- } , b5 V- P- P. @5 x: O- _9 ~
- if(getitemtype(item)==3)
, _4 Y$ R' W/ s( S I3 Q* v$ S - {4 i9 y% p: J/ q7 s3 G6 j! m
- int value=inc(label(item,"item3"),1);
: e2 k! A5 J* D+ w( e4 _* j - setlabelnum(item,"item3",value);6 ~4 H% H! _+ z( E+ L% A
- }
k1 s7 |: W7 l2 Q/ a- S9 c - if(getitemtype(item)==4)
1 n6 J3 G* T# h3 D - {, n" m" R* ?! a; ^: Z
- int value=inc(label(item,"item4"),1); `& ?2 w9 R0 B- v, \+ Q/ M; g
- setlabelnum(item,"item4",value);% d+ `* P* _$ r# m
- } 6 a) f) A8 _5 C q5 L
- } % w1 T+ Y" ~5 d. V/ Y ^
- } ! ?3 ]* C( L3 J' U& P! D4 J
复制代码 ; E- c _% ]0 u# A; h# K
1.你在托盘上创建的标签名是"Item1","Item2"...但是在代码中写成了"item1"、"item2"....。Flexsim代码大小写敏感,所以无法获取到正确的标签。2.你建模的时候使用的是Flexsim2016或更高版本,但是在写代码的时候使用了非常古老的函数setlabelnum。setlabelnum函数已弃用多年,我已经查不到其相关说明了。如果你对点语法不熟悉的话,可以使用setlabel命令代替。setlabel命令可以在没有相应标签名的时候先创建标签再给标签赋值。结合第一个问题,setlabel的结果就是:在找不到"item1“标签的时候,先在item上创建一个名为"item1"的标签,然后再赋值。当然了,因为前一句语句
6 K: u" h' |2 \/ |/ T- int value=inc(label(item,"item1"),1);
复制代码 无法找到正确的标签,所以value永远是0。
, V% O. g' K2 L, y) R. e3.你在代码中加入了if (port!=1)的判断,这非常正确,应该排除托盘,只在box进入合成器的时候改变标签。但是再想想,你要给谁增加标签呢?是box还是pallet?你希望根据进入box的类型增加pallet上相应标签的值。那么,setlabelnum函数中的第一个参数应该是什么?如果是item的话,就是要在box上设置标签值,而非pallet。所以此处应先找到pallet对象:
# e+ d1 H" O9 O! f" `; j* u* |) t# w8 m! i1 w; k
- if(getitemtype(item)==1)8 r- ?( u( E% Z3 r9 |! U# {
复制代码 也就是说,你确实应该根据box(item)的类型值来进行判断,但是判断结束之后,你要改变的标签在pallet身上,不在box(item)身上。
, U) F0 w0 P* Z# R/ B8 S0 J& J4.inc函数本就是增加(减少)节点值。既然已经增加了,就不必要在用setlabel函数重新设置一次了。( r. Y$ r% K( [0 R1 t' }3 e6 [4 a2 r b
- treenode pallet=first(current);
4 ~1 ~5 O7 [4 X3 O- a - int value=inc(label(pallet,"item1",1);
复制代码 . ^. ~2 T2 c" {
( y! j; a" ^4 N* g# W6 }2 `1 z J( X
说完代码问题之后,我们再从模型逻辑上来想一想。
. l ^+ f& m8 }9 ~- T你在托盘上设置标签值的作用是什么?模型中没有体现出来用处。如果仅仅是为了练习编写代码,这样写当然可以,甚至可以说这是一个非常好的案例。% y# {! e/ V& X# R, R, U. D
如果不是为了练习,这段代码就没有意义了。因为托盘上的临时实体的数量早就在全局表中定义好了。如果需要,直接根据托盘类型值读取全局表就可以了。
! E3 {6 W2 s( C6 p/ ?0 P
5 S' c) [( z# ?附上我的代码以供参考。
; C6 }1 s1 C$ Y- /* 标签设置*/
/ Y/ X) G# \( H. d - if (port!=1) {: i& s4 F$ U
- { % G! V1 ^$ N1 n: z
- treenode pallet=first(current);//找到托盘8 O# n4 B# f! K* c
- int type=getitemtype(item);//获取临时实体类型值6 p( c3 h ^* j; x* T% U3 N
- string labelname=concat("Item",numtostring(type));//根据类型值生成标签名4 M6 Q l! D! `2 N" I5 W
- inc(label(pallet,labelname),1); //标签值+1
% X3 Z3 D$ t6 c9 r y2 O) C' L - }
复制代码 # d/ F/ K& U4 i
. ~7 {+ s' q6 e5 P { |
|