用OrderList与Queue结合实现叠盘系统的方法分享

tengda_wlfz

( e9 H; j1 |% [( M0 e; @+ R& c我是Automod 初学者，在做某项目仿真时需要仿真叠盘系统，而叠盘系统在Automod中是没有现成的东西可用的，必须通过编程来实现。现在把这个方法和大家分享一下，献丑了，如果有什么更好的办法希望大家一起分享交流。
首先，在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。
% J, m5 H- h: l; e2 I2 r+ O9 F7 |+ P然后 建一个OrderList,详细设置我在这里就不赘述了，你可以每项都试一试看看是什么效果
6 _, N) j/ |2 j# x& c+ W接着我们就可以编程序了，源代码如下：
begin P_process_name arriving
           move into Q_queue        //load进入队列中
9 @5 y. B) E! p' u         if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
" @  O; X$ }9 d( K2 b* C8 c         begin        
" _/ n; S( x9 \                order 4 loads from OL_orderlist to die //取其中的4个消失
) l/ p/ S( _. O: [$ Y. ?. A                set load type to L_new//设置第5个进来的Load为L_new类型的
                send to P_next//进入后续流程                       
, V2 ]# o7 a# Z9 O+ ^/ l& W         end
) C; w$ Y, c. y2 X        else//如果OrderList中的托盘数少于4 则进入
                wait to be ordered on OL_ orderlist
& ~1 {/ X6 F! I. n# mend
6 X/ o$ d! n6 A4 T0 [4 Z这段代码还可以精简为：
) t* X! H( l) t- _) m# abegin P_process_name arriving
6 q' B. m5 V. h5 I9 B/ f* C$ h           move into Q_queue        //load进入队列中
        if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
& F: \, m3 W/ ~6 |         begin        
" I, R4 t- [* H0 V& b                order 5 loads from OL_orderlist to die //OrderList中的5个全部消失
                create 1 load of  load type L_new to P_next        //创建一个新的Load
end
! Z% |; s2 _! y1 ^9 g: @: y. W3 g        else//如果OrderList中的托盘数少于4 则进入
                wait to be ordered on OL_ orderlist
' F# u8 a) E- G& v4 s) eend
这段代码不但可以用于构建叠盘系统，还可以应用与装配工位，机器人码垛等！

ksec_wangwei

平时做项目也会遇到这种情况，作为初学者，长知识了，谢了，，，，，，，有时间把我们的解决方案贴上来

gjccrazy

不错，谢谢您的分享