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

tengda_wlfz

, W/ m2 w# X8 v; \9 P* m我是Automod 初学者，在做某项目仿真时需要仿真叠盘系统，而叠盘系统在Automod中是没有现成的东西可用的，必须通过编程来实现。现在把这个方法和大家分享一下，献丑了，如果有什么更好的办法希望大家一起分享交流。
首先，在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。
) T* @% O" H5 b  C; U3 M然后 建一个OrderList,详细设置我在这里就不赘述了，你可以每项都试一试看看是什么效果
7 x+ M) d6 D2 t+ i9 {3 v& X" i) x3 T接着我们就可以编程序了，源代码如下：
1 {# T( S# H1 _9 [  @. X# Obegin P_process_name arriving
  E! b4 z! {1 \7 d           move into Q_queue        //load进入队列中
/ }0 t9 z: ]7 G% n5 p0 p         if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
         begin        
                order 4 loads from OL_orderlist to die //取其中的4个消失
& ?% M6 r/ O# A3 v) X) r                set load type to L_new//设置第5个进来的Load为L_new类型的
' W/ k) S/ }, ^% s! `* @                send to P_next//进入后续流程                       
         end
        else//如果OrderList中的托盘数少于4 则进入
: t2 o- @& W  j; p! M) h" b5 s6 I% ^                wait to be ordered on OL_ orderlist
3 @& d+ t& n3 m6 w) C4 ^+ hend
0 g% W# Y% Y9 E这段代码还可以精简为：
" q* ^; u7 e& R0 V  E: \/ l* @7 \* Jbegin P_process_name arriving
9 q3 J: l8 \( _4 [* T0 {           move into Q_queue        //load进入队列中
: j1 H4 B* ]- J  w( @         if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
8 ^9 b2 i( S7 r+ ~" G         begin        
                order 5 loads from OL_orderlist to die //OrderList中的5个全部消失
                create 1 load of  load type L_new to P_next        //创建一个新的Load
7 b# f$ C. [4 t: D* c$ ^% ^ end
/ J. A0 T9 p! Y# H+ B: ~        else//如果OrderList中的托盘数少于4 则进入
% K. I4 J7 v9 O* c& _: s: r                wait to be ordered on OL_ orderlist
end
这段代码不但可以用于构建叠盘系统，还可以应用与装配工位，机器人码垛等！

ksec_wangwei

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

gjccrazy

不错，谢谢您的分享