|
|
' b3 A- t/ U1 \1 ~
我是Automod 初学者,在做某项目仿真时需要仿真叠盘系统,而叠盘系统在Automod中是没有现成的东西可用的,必须通过编程来实现。现在把这个方法和大家分享一下,献丑了,如果有什么更好的办法希望大家一起分享交流。
6 c& ]0 H$ q J- X6 m, i首先,在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。
' r6 l: [ S$ H# P- ?/ i5 q" o' l! q然后 建一个OrderList,详细设置我在这里就不赘述了,你可以每项都试一试看看是什么效果
! z# H2 U1 r" {2 h+ g) Y# _9 {8 T接着我们就可以编程序了,源代码如下:6 k# @$ s; _& V1 }* \( T z$ z2 \
begin P_process_name arriving
9 }3 I. G' l x5 b. z move into Q_queue //load进入队列中: k3 I8 M& k+ A( E( x0 K9 g4 U
if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
+ {* O9 c+ J+ y: r. ^& P begin
* l& n5 A- |' d# I9 } \ order 4 loads from OL_orderlist to die //取其中的4个消失# Z1 Y+ I! P6 n7 x$ } H; d* ]
set load type to L_new//设置第5个进来的Load为L_new类型的
' B' r% ]! E8 l7 f, ^ send to P_next//进入后续流程
2 f5 j$ F! i- _3 J( v% @ end
: _' U( I6 S% ` else//如果OrderList中的托盘数少于4 则进入
7 v* K8 P9 o* I9 w) @+ ] wait to be ordered on OL_ orderlist
, D! u0 I, @4 c' u) B6 A- Mend
8 h: S {4 \( N5 M' g/ X这段代码还可以精简为:4 S; p6 Q# M+ N0 k5 [
begin P_process_name arriving$ M! G* W; L0 T4 w( w$ V/ k! ]
move into Q_queue //load进入队列中
4 N, z( M4 ?0 |2 F; R* V6 i+ x if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
a2 n4 q# ~/ b2 P6 g/ ]" t3 s begin . p7 E2 o2 `9 R) F
order 5 loads from OL_orderlist to die //OrderList中的5个全部消失
4 O# r7 `9 N' n- f6 n+ g create 1 load of load type L_new to P_next //创建一个新的Load
, ?' {$ d0 M; ~! W end \$ h9 Z8 U5 I! A
else//如果OrderList中的托盘数少于4 则进入
$ p, N g& Y: {5 l a1 Z6 b wait to be ordered on OL_ orderlist
# M+ O! Z, K! l' x* _: }; o; C( Z0 yend7 Q7 }( {2 M) y1 a
这段代码不但可以用于构建叠盘系统,还可以应用与装配工位,机器人码垛等! |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
评分
-
查看全部评分
|