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

tengda_wlfz

6 l, Q0 {7 L4 P' T& e: `我是Automod 初学者，在做某项目仿真时需要仿真叠盘系统，而叠盘系统在Automod中是没有现成的东西可用的，必须通过编程来实现。现在把这个方法和大家分享一下，献丑了，如果有什么更好的办法希望大家一起分享交流。
首先，在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。
" `3 U! ^7 l* S, k) G. b然后 建一个OrderList,详细设置我在这里就不赘述了，你可以每项都试一试看看是什么效果
接着我们就可以编程序了，源代码如下：
! p) N0 x  r0 Z- x8 M, B3 i7 wbegin P_process_name arriving
& v$ u. \: R$ Z           move into Q_queue        //load进入队列中
        if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
# E( ?4 U& W' r5 I         begin        
7 ~4 l, R; s. L7 I+ i. p                order 4 loads from OL_orderlist to die //取其中的4个消失
- W& r3 z' I9 P4 O; F" `& {                set load type to L_new//设置第5个进来的Load为L_new类型的
* ?$ b! ~# {) `8 u4 J: U! Q: l1 f                send to P_next//进入后续流程                       
* R4 e- C3 F6 T0 ^: x  d/ v, V         end
) D; O% L& x* Q% ^1 m4 ?7 P) v        else//如果OrderList中的托盘数少于4 则进入
( ^  `" n8 O# }- i3 f                wait to be ordered on OL_ orderlist
4 A  v7 l- q$ P7 s1 }  ]7 w% {end
这段代码还可以精简为：
: T' R! Y1 ]2 n. c$ E: X. fbegin P_process_name arriving
! I$ |! T8 s; S& t8 e0 Q           move into Q_queue        //load进入队列中
        if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
         begin        
                order 5 loads from OL_orderlist to die //OrderList中的5个全部消失
                create 1 load of  load type L_new to P_next        //创建一个新的Load
3 q7 c$ V. }* C" o$ \1 o+ L end
# A/ [  `( c. \6 d        else//如果OrderList中的托盘数少于4 则进入
                wait to be ordered on OL_ orderlist
end
这段代码不但可以用于构建叠盘系统，还可以应用与装配工位，机器人码垛等！

ksec_wangwei

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

gjccrazy

不错，谢谢您的分享