|
|
- n4 k& P# R6 E( q
我是Automod 初学者,在做某项目仿真时需要仿真叠盘系统,而叠盘系统在Automod中是没有现成的东西可用的,必须通过编程来实现。现在把这个方法和大家分享一下,献丑了,如果有什么更好的办法希望大家一起分享交流。
% E. p6 x. P% y# w4 H9 w首先,在输送线的叠盘系统位置建立一个Queue,在Queue中建立一个Container,这样你的托盘进入到队列才能显示出来。
2 q8 Y- c8 \+ @; H0 P) n8 i! {然后 建一个OrderList,详细设置我在这里就不赘述了,你可以每项都试一试看看是什么效果
" S3 _6 J. z2 o2 U% n( v接着我们就可以编程序了,源代码如下:5 q R. G0 n! J5 T( W6 G! N, K
begin P_process_name arriving, F* L. E/ @0 L# y/ `& Y
move into Q_queue //load进入队列中
" Y5 e) a0 N3 y if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘2 n* ~) h1 D ]" n. t! `% c- [
begin
+ c0 ?8 J: G8 L6 D' [. a8 d order 4 loads from OL_orderlist to die //取其中的4个消失/ D. y: f2 a- P7 ?
set load type to L_new//设置第5个进来的Load为L_new类型的
; s' v6 q# S5 i O send to P_next//进入后续流程
# B$ c2 a& H( U9 u5 U* U0 [5 } end
; N7 M, n# y* r1 v7 s5 ? else//如果OrderList中的托盘数少于4 则进入! J8 H P' E4 j) Y% K% A
wait to be ordered on OL_ orderlist
- o: Q6 D0 _9 G5 |0 n( bend
% M: f; q/ W2 t9 g, ?- m" Z这段代码还可以精简为:
' Q/ @; y2 @0 T5 R- T: u" p6 tbegin P_process_name arriving* S6 q% H9 y4 r& _$ }: _$ i8 r# D
move into Q_queue //load进入队列中0 t) T( q' e% i( I+ T; [
if OL_ orderlist current loads =4 then //判断OrderList中是否有四个托盘
( _ s$ Z$ r- r3 j. }$ S begin
! F( g H, a; w' d3 P4 J order 5 loads from OL_orderlist to die //OrderList中的5个全部消失 b# J, ]+ p* X# F/ @0 Z
create 1 load of load type L_new to P_next //创建一个新的Load
; f7 O- g+ s5 ?4 w5 |2 Y% U end
4 P: g- S; @. ^$ k# ~& V, p else//如果OrderList中的托盘数少于4 则进入
2 a- {1 f' c7 X z% h( T wait to be ordered on OL_ orderlist
4 _) O2 F U" ^' v9 qend
) w# D) ?: N; p3 _( p/ S: g这段代码不但可以用于构建叠盘系统,还可以应用与装配工位,机器人码垛等! |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
评分
-
查看全部评分
|