|
|
5 Z* @; U: k' x2 n我是Automod 初学者,在做某项目仿真时需要仿真叠盘系统,而叠盘系统在Automod中是没有现成的东西可用的,必须通过编程来实现。现在把这个方法和大家分享一下,献丑了,如果有什么更好的办法希望大家一起分享交流。( L! S' ^+ P$ d+ }+ F9 X8 R
首先,在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。# S% q0 n$ `( [ T- I0 y, a" D3 e
然后 建一个OrderList,详细设置我在这里就不赘述了,你可以每项都试一试看看是什么效果
1 n6 U5 o3 _$ C' k6 U接着我们就可以编程序了,源代码如下:/ z: ]" ]9 i, y
begin P_process_name arriving# v: H( F3 h) W% g
move into Q_queue //load进入队列中
/ G. o5 I7 ]8 [* h if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
+ t, t3 R5 m) G3 L3 K" x9 e begin & e7 O: @. B: e* ^6 R
order 4 loads from OL_orderlist to die //取其中的4个消失
3 X* ?! R) |2 t8 R6 \- u/ b set load type to L_new//设置第5个进来的Load为L_new类型的4 }: r/ D/ K7 `5 G, {& K( ^
send to P_next//进入后续流程
% i. y3 r+ V. L6 |. l1 F: x; {4 P end
* z. D( ?. C. ^2 ?# G else//如果OrderList中的托盘数少于4 则进入! i+ x" ]. H* \0 S% ~5 y" K6 X
wait to be ordered on OL_ orderlist
, t& g1 M. O$ r) ^ V7 P/ @7 Uend9 S5 N+ n4 E' I+ O9 m) c9 b- q! C
这段代码还可以精简为:
! e9 p, w6 U P( E$ jbegin P_process_name arriving
- v5 D* H2 p6 D* K/ `1 H move into Q_queue //load进入队列中4 f& Q1 K- I& a1 W+ K6 q
if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘+ N1 ]% i. F% B
begin % n% Q+ E: h3 ]. \( g$ H+ I, I& E# t$ `
order 5 loads from OL_orderlist to die //OrderList中的5个全部消失
8 c! k3 {3 ^) b4 |. v$ t: y% R/ Q create 1 load of load type L_new to P_next //创建一个新的Load
9 _/ O( P& g( J* v# n end
. A5 w2 s2 Q' f: Z, L- K# i else//如果OrderList中的托盘数少于4 则进入
' M4 \: |" ~* n/ }; v0 Q% z wait to be ordered on OL_ orderlist2 O. i5 o. Z# s1 d8 C6 U. M4 R
end! e0 a8 x( f$ n2 E* t: |
这段代码不但可以用于构建叠盘系统,还可以应用与装配工位,机器人码垛等! |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
评分
-
查看全部评分
|