|
|
0 x, Q! i! {9 \6 F5 {/ Z1 e2 u* ]
我是Automod 初学者,在做某项目仿真时需要仿真叠盘系统,而叠盘系统在Automod中是没有现成的东西可用的,必须通过编程来实现。现在把这个方法和大家分享一下,献丑了,如果有什么更好的办法希望大家一起分享交流。" L& J+ |2 u% t5 }- X2 u
首先,在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。' }$ D$ G# L. s" C
然后 建一个OrderList,详细设置我在这里就不赘述了,你可以每项都试一试看看是什么效果
7 K% I1 o \5 x# ]6 s接着我们就可以编程序了,源代码如下:3 Z' Y- s. K; j; m
begin P_process_name arriving+ { v) b+ y+ f9 r8 S5 Y
move into Q_queue //load进入队列中
( H; y, P0 i0 d' x* I7 v+ B if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘 o8 q% y' q& Q/ v/ U; J2 H S
begin " U7 ?2 x' ]- B% `" Z
order 4 loads from OL_orderlist to die //取其中的4个消失
1 }& j% \: y9 Y4 W, \ G set load type to L_new//设置第5个进来的Load为L_new类型的0 L* p: n- k# p6 Z8 b0 E& a" D4 `& k
send to P_next//进入后续流程
4 H, |5 w8 {. n5 z% K# E end
/ _" ^* T. M7 P. V: q" G: [ else//如果OrderList中的托盘数少于4 则进入4 K' A/ {2 g3 c) o' T2 [# g' N, K
wait to be ordered on OL_ orderlist
! A4 g1 B9 M9 ^( ]5 Z1 cend
! C3 q; G( k6 B3 Q1 k" r这段代码还可以精简为:
) G8 v- h4 e3 mbegin P_process_name arriving
8 C+ ?4 N3 O* D: h2 W4 [ move into Q_queue //load进入队列中3 S# `, N4 B" K3 z1 _2 @8 |2 j* `
if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
8 R5 L) d' U3 K" ~ begin
# u/ s, @7 ], Q+ c# ~ order 5 loads from OL_orderlist to die //OrderList中的5个全部消失) R4 Y; e% H1 r: G
create 1 load of load type L_new to P_next //创建一个新的Load' ?; E0 ^, [( R2 t2 F6 v
end0 X: h, J5 a$ g/ D) h
else//如果OrderList中的托盘数少于4 则进入# @9 Z( T: U/ @& M% I* \( E) H
wait to be ordered on OL_ orderlist7 a) a% l' O/ R% u4 _
end
& J7 ^2 G0 O/ F9 ~7 F# D; p* _这段代码不但可以用于构建叠盘系统,还可以应用与装配工位,机器人码垛等! |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
评分
-
查看全部评分
|