|
先说代码的问题:- /* 标签设置*/$ [, O$ s) o9 s* Q& K5 {: t+ I
- {# Q1 n7 ^6 S- L- V
- if (port!=1)
0 [, b. z0 ]" X - {/ D0 J7 j& h, R" _: u4 f
- if(getitemtype(item)==1)
9 `) c- D$ Y# R* f# `7 r - {
0 c, h L8 s5 Q6 Z4 _% u! s$ V/ d! v - int value=inc(label(item,"item1"),1);
, G$ i5 t w( Y - setlabelnum(item,"item1",value);2 Z8 r. h4 M+ J- `
- }- F/ B& T; y! ]+ N5 M
- if(getitemtype(item)==2)$ h/ A8 \1 ^- o% b. W% r) H! @7 F
- {8 O: L& u6 v+ C
- int value=inc(label(item,"item2"),1);- |1 ?9 p* A1 R B0 b' B
- setlabel(item,"item2",value);
( V/ P3 L4 Y' ]& S/ C" @5 s - } % B( q, q9 B5 |: J: ^- G) U" P
- if(getitemtype(item)==3)5 Z2 ^% N/ z' T: d b
- {
; T1 d9 y1 F2 \: X4 I) s4 N0 N - int value=inc(label(item,"item3"),1);
( f: S7 W e! [' ~" W. c/ | - setlabelnum(item,"item3",value);! M2 a; K8 p5 v/ z) H! S0 e6 N
- } 4 ]3 U O* `/ R" |2 I, T# Y
- if(getitemtype(item)==4)3 N+ v" _8 Z- u, T* M& _6 W; c
- {
/ }9 t0 P6 x' M8 j- |: U - int value=inc(label(item,"item4"),1);
% G) d7 h; O2 p7 I. ^0 F% | - setlabelnum(item,"item4",value);6 ]" x; v$ Y8 K' o& [3 Y6 I
- }
" J( ^( G+ k9 e/ O5 {: X! X - } 8 G; O3 j% M$ ?4 Z) {
- }
8 i! W1 j6 [2 L4 {. {/ r5 ?
复制代码 ! _7 [7 S- u. ^: w7 W- `
1.你在托盘上创建的标签名是"Item1","Item2"...但是在代码中写成了"item1"、"item2"....。Flexsim代码大小写敏感,所以无法获取到正确的标签。2.你建模的时候使用的是Flexsim2016或更高版本,但是在写代码的时候使用了非常古老的函数setlabelnum。setlabelnum函数已弃用多年,我已经查不到其相关说明了。如果你对点语法不熟悉的话,可以使用setlabel命令代替。setlabel命令可以在没有相应标签名的时候先创建标签再给标签赋值。结合第一个问题,setlabel的结果就是:在找不到"item1“标签的时候,先在item上创建一个名为"item1"的标签,然后再赋值。当然了,因为前一句语句8 ]: [ S9 [, ?2 n; [' j( Y, \
- int value=inc(label(item,"item1"),1);
复制代码 无法找到正确的标签,所以value永远是0。
, [0 q: T' s9 [' @* N" U2 R- b3.你在代码中加入了if (port!=1)的判断,这非常正确,应该排除托盘,只在box进入合成器的时候改变标签。但是再想想,你要给谁增加标签呢?是box还是pallet?你希望根据进入box的类型增加pallet上相应标签的值。那么,setlabelnum函数中的第一个参数应该是什么?如果是item的话,就是要在box上设置标签值,而非pallet。所以此处应先找到pallet对象:
$ H( j# P4 [7 ]- J- Q# G6 p
7 m3 B: l L7 `$ P% u4 l- if(getitemtype(item)==1)
, c2 y2 u; u* y, E% r9 ~6 G
复制代码 也就是说,你确实应该根据box(item)的类型值来进行判断,但是判断结束之后,你要改变的标签在pallet身上,不在box(item)身上。3 p F6 M' A; [
4.inc函数本就是增加(减少)节点值。既然已经增加了,就不必要在用setlabel函数重新设置一次了。
. m* e H6 G1 ]6 J& L0 B& v5 U- treenode pallet=first(current);
, h. `7 H4 m+ g1 i9 M- }5 b - int value=inc(label(pallet,"item1",1);
复制代码
7 O1 d1 Z- h( @& W
' c8 e' c- [, G4 e; i+ y: H+ g
) p/ E X" f/ t; }+ `3 t5 @说完代码问题之后,我们再从模型逻辑上来想一想。
" o: k1 J/ O" V; r- {8 Y你在托盘上设置标签值的作用是什么?模型中没有体现出来用处。如果仅仅是为了练习编写代码,这样写当然可以,甚至可以说这是一个非常好的案例。# M" b# _0 ^) j! a& F7 B
如果不是为了练习,这段代码就没有意义了。因为托盘上的临时实体的数量早就在全局表中定义好了。如果需要,直接根据托盘类型值读取全局表就可以了。
9 h: m% G5 T3 _5 [( M' ~8 z* x- G* G
附上我的代码以供参考。
# N6 @3 T& L6 \# x Q- Y- /* 标签设置*/
2 h E9 R5 \1 e7 f - if (port!=1)
) O% ^% o! W9 y8 `! Q3 K1 s( u - {
1 z) y# H8 h, N. n! G - treenode pallet=first(current);//找到托盘
- V+ v8 E) Z c" G$ X/ [+ }; _1 K2 G: ? - int type=getitemtype(item);//获取临时实体类型值
) U$ T! o! o& ] - string labelname=concat("Item",numtostring(type));//根据类型值生成标签名
$ f2 |2 K( y. W0 u& m - inc(label(pallet,labelname),1); //标签值+1' E. k2 `. m1 }; }
- }
复制代码
8 Y1 Z! o+ d( h: W4 V$ |0 D5 I$ M) c F$ X
|
|