|
先说代码的问题:- /* 标签设置*/
# F; a3 w. H! z2 ~8 m) U0 X - {
, U; B& U) ?: q$ _% s. X% | - if (port!=1)
' } G- l/ ]. g9 ], g - {2 |% m- l" ?: f+ Z% Q
- if(getitemtype(item)==1)# R( a @1 ]* g$ K5 s' H7 t8 A" A
- {
' f) L8 V% n5 F5 V, l0 y - int value=inc(label(item,"item1"),1);/ \* d, W+ B: ^* h5 B* A# }
- setlabelnum(item,"item1",value);
; C+ ~! ?& O8 T: k9 f6 G! ]) }) | - }2 T" n4 [. f. I" o+ r0 m, v
- if(getitemtype(item)==2)$ u1 {9 n S) V6 p1 C0 \( u
- { ^" c1 @. |2 n7 n4 o
- int value=inc(label(item,"item2"),1);
( s, Q/ a/ ^9 Q- J q8 Q - setlabel(item,"item2",value);( z% N: I+ U+ d3 y
- } , a- q K. t- a5 y1 N) k8 R
- if(getitemtype(item)==3)
' D0 z/ w6 `- y% S: q: m - {; W+ ?8 m6 A3 Z+ s* Z, s
- int value=inc(label(item,"item3"),1);
0 m/ \7 v+ p# v! _* i! o - setlabelnum(item,"item3",value);- O# [0 C; V6 p
- }
. R! z, J. F5 `0 ^/ Q4 | - if(getitemtype(item)==4)
( l! U/ p" S7 W/ ?- L - {& {* [. b# v. r& b& w5 S7 E
- int value=inc(label(item,"item4"),1);1 \* }0 ]0 y" D# {5 R
- setlabelnum(item,"item4",value);7 s: V/ v: h- e$ q9 L0 p' {
- } 5 w. N) S8 B. E" k# a' u7 M
- }
1 }# b8 x7 D3 r7 ^9 ~3 m8 C, ] - } 6 C% P) W j+ [( R8 d% ]3 N8 U5 l
复制代码 ; Q2 b/ O5 ^$ {7 l5 U- O
1.你在托盘上创建的标签名是"Item1","Item2"...但是在代码中写成了"item1"、"item2"....。Flexsim代码大小写敏感,所以无法获取到正确的标签。2.你建模的时候使用的是Flexsim2016或更高版本,但是在写代码的时候使用了非常古老的函数setlabelnum。setlabelnum函数已弃用多年,我已经查不到其相关说明了。如果你对点语法不熟悉的话,可以使用setlabel命令代替。setlabel命令可以在没有相应标签名的时候先创建标签再给标签赋值。结合第一个问题,setlabel的结果就是:在找不到"item1“标签的时候,先在item上创建一个名为"item1"的标签,然后再赋值。当然了,因为前一句语句% b7 X, l. u2 R. ]' F) w
- int value=inc(label(item,"item1"),1);
复制代码 无法找到正确的标签,所以value永远是0。! H( w, P8 w2 b: C$ [6 W9 b
3.你在代码中加入了if (port!=1)的判断,这非常正确,应该排除托盘,只在box进入合成器的时候改变标签。但是再想想,你要给谁增加标签呢?是box还是pallet?你希望根据进入box的类型增加pallet上相应标签的值。那么,setlabelnum函数中的第一个参数应该是什么?如果是item的话,就是要在box上设置标签值,而非pallet。所以此处应先找到pallet对象:# l0 S3 V; C% W1 n4 {
# [; x; ]1 i2 ~; e7 S
- if(getitemtype(item)==1)
3 s6 D& Q8 q1 u; U
复制代码 也就是说,你确实应该根据box(item)的类型值来进行判断,但是判断结束之后,你要改变的标签在pallet身上,不在box(item)身上。% ^, w% D% x0 A( ^2 }$ C* y4 s. P
4.inc函数本就是增加(减少)节点值。既然已经增加了,就不必要在用setlabel函数重新设置一次了。( Z# h) B! G6 d: Y* v
- treenode pallet=first(current);* T J/ v4 ?9 L4 r5 d. W7 Q; y
- int value=inc(label(pallet,"item1",1);
复制代码
1 z# D0 {& v/ s5 g1 v4 u6 G1 v! T" ]/ K' E+ C
. o) Y- r( D3 i, d) x0 u8 O3 O3 f
说完代码问题之后,我们再从模型逻辑上来想一想。
+ Z9 b# b/ |" T0 n, P你在托盘上设置标签值的作用是什么?模型中没有体现出来用处。如果仅仅是为了练习编写代码,这样写当然可以,甚至可以说这是一个非常好的案例。% _# l' v3 u6 A1 B' I; s' N4 A
如果不是为了练习,这段代码就没有意义了。因为托盘上的临时实体的数量早就在全局表中定义好了。如果需要,直接根据托盘类型值读取全局表就可以了。
: d, a1 b! P0 s$ A' @/ H! e. F) o' `* P
附上我的代码以供参考。
7 T" U2 l' B6 n( i& s8 x0 e/ u- /* 标签设置*/0 |% e" E! G5 x/ n# A p
- if (port!=1)
: X+ S0 D# I+ N - {
: k: g4 X/ S# b2 t - treenode pallet=first(current);//找到托盘$ y! N( V! ^' n3 Q; H' w( p8 A
- int type=getitemtype(item);//获取临时实体类型值# j+ v7 u. c+ B; O* W# I% s/ D
- string labelname=concat("Item",numtostring(type));//根据类型值生成标签名7 `$ s! V& S) i' ?/ J
- inc(label(pallet,labelname),1); //标签值+1) H* c0 d4 L5 Y: l0 B! }9 v4 M+ ^) y
- }
复制代码
' o7 U' q: M0 x# U
7 J. Z [' A2 W+ i& r& d; Z) W. c! \6 P* Q |
|