|
|
% y$ i1 o- ] t" d5 }我是Automod 初学者,在做某项目仿真时需要仿真叠盘系统,而叠盘系统在Automod中是没有现成的东西可用的,必须通过编程来实现。现在把这个方法和大家分享一下,献丑了,如果有什么更好的办法希望大家一起分享交流。
7 W% b, |$ d* Z6 a" P. u首先,在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。5 ^, o; h$ m0 a- m6 u0 k, }" I. _: }. e
然后 建一个OrderList,详细设置我在这里就不赘述了,你可以每项都试一试看看是什么效果& P% n4 D% ` F6 C5 S+ _- P1 J' K
接着我们就可以编程序了,源代码如下:
" d2 Z+ b# \! m0 B/ E! {0 ?begin P_process_name arriving
9 r/ b1 A8 ~4 {7 q. y2 j/ o7 j move into Q_queue //load进入队列中
7 W) q0 j) c; }! e1 N7 y+ ~; d if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘0 U4 e- K' K3 L9 g# _' P% w
begin
0 M2 s5 L0 X+ u9 U3 j. d) e, B order 4 loads from OL_orderlist to die //取其中的4个消失
- o! \# Z$ T- d' A set load type to L_new//设置第5个进来的Load为L_new类型的. w2 K+ H l) s) b2 p5 c5 Q- s
send to P_next//进入后续流程
7 I. v: x$ q# ` end
. d: F' P A: f else//如果OrderList中的托盘数少于4 则进入. f6 O9 E$ x0 s6 }* p
wait to be ordered on OL_ orderlist4 [$ K9 W0 h1 Z F" S
end
/ e- O$ O T ?( D+ X这段代码还可以精简为:
+ B0 l( N) F* K; @1 Q A/ Tbegin P_process_name arriving; P) s' @: r% g9 z% }% v
move into Q_queue //load进入队列中0 e( G5 X8 \- k3 \! F
if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘/ m8 n0 s( c1 R# p/ X+ j: B' H
begin
! z4 U- q; j2 G, Y( {. s! M7 H order 5 loads from OL_orderlist to die //OrderList中的5个全部消失2 m: I' q0 @: L1 V3 |
create 1 load of load type L_new to P_next //创建一个新的Load* ^# s9 F1 W' n. y* {5 t- ?% A- X
end
! g2 W* {4 K( A; ?) @; H else//如果OrderList中的托盘数少于4 则进入* ]: k% {$ F8 B A& a7 r( I: E o
wait to be ordered on OL_ orderlist
( l# z% W' p& c; Y6 zend
7 {2 b* i( w3 c- L l B这段代码不但可以用于构建叠盘系统,还可以应用与装配工位,机器人码垛等! |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
评分
-
查看全部评分
|