设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 15654|回复: 2

[求助] Automod Syntax 编译的一个问题

[复制链接]
发表于 2009-4-4 23:58:32 | 显示全部楼层 |阅读模式
5仿真币
想请版上的人帮我看看我这段code中的一个错误,我刚学Automod没多久,实在找不出错在什么地方了,谢谢
; |8 z" V: ^) E' y/ U9 t5 B& \1 ~+ n5 \
我的问题是,在每个P_pick的process中的while循环内,总显示错误Expecting QueuePtr or Location, but found PathPtr. 在我定义所有的attribute的时候,从来没有定义过任何QueuePtr or location or PathPtr,为什么会出现这种错误呢。 我这里面A_picks是一个30x1的array的load attribute,我想用A_i这个load attribute来读取这个array中的数值,不知道会不会有什么不妥。% q  T7 q  b7 ~+ h

' |+ A* k3 [: y3 i" f! c$ e0 |begin P_read arriving; U! z" w) m/ v: D
    while 1=1 do begin, w4 }2 `6 n& t9 Z
        read A_tote from "data.txt" with delimiter "\n"
  |$ y) J8 M9 I' o- `" E* {# e2 u        read A_time from "data.txt" with delimiter "\n"
- Q2 E/ V* t5 b. T  X        read A_leave from "data.txt" with delimiter "\n"0 N3 o  Z' z" t8 l
        read A_picks from "data.txt" with delimiter "\n"! B' E! P8 P% n6 l4 K
        set load type to A_tote
6 Z1 T- U3 W" X        if A_tote="tote 1" then set A_induct to 1
" s" t- r# A1 V& w        else if A_tote="tote 2" then set A_induct to 2' t( N9 v0 K( v& S1 Y, K
            else set A_induct to 3   
7 v  V2 K! f4 i2 U5 }8 l  U3 M        set A_i to 0
7 z$ f4 L" f5 o2 N/ j" u, A        clone 1 load to P_induction5 j2 B  s. B7 f5 f
        wait for A_time sec
$ s6 K- w6 ~# h" A& U& h    end! l# J, q1 |3 G2 p
end
& u( q4 k% g9 F1 Q. C! ?" R  A- E5 c* X8 q
begin P_induction arriving% \: Y- f5 _5 \+ D% @$ x8 `: a0 }- p" `
    if A_induct=1 then clone 1 load to P_pick1
4 s! ?( i  c* e0 \) p& i0 P2 J  B    else if A_induct=2 then clone 1 load to P_pick2
: F/ p& h# F9 Q; Y        else clone 1 load to P_pick3( @  c9 n4 p2 G- b
end
1 z& H) }) B& {1 J( X  J( `7 C6 `, D; M6 M& |7 p8 F" g  ^% }
begin P_pick1 arriving
0 a" y/ N  T# a3 I. ^    set A_i to 1& x, u7 m( U/ _6 v; p" D3 Q4 e
    move into Q_induct1, C5 J/ u& w0 F% q$ Q& {
    move into pickaisle.induct1" y% |% X- ~  g2 `( ~/ k
    while A_i<=30 do begin
. B$ U- }9 O6 t+ w2 W, R( }$ u        travel to pickaisle.con(A_i)* g, v0 D6 h, ^! c2 p( K9 e
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec% V$ m) H5 e6 N9 a: @$ C6 l% H& y
        else wait for 10 sec
( x' D0 L  X$ L5 }4 s, w        if A_i=A_leave then send to die- G+ u# x# r* y1 i8 X/ D
        else inc A_i by 12 W+ d% I; c! n4 A1 X7 l- ?
    end
% r& o& x8 }4 j; C) oend
' y# @  h/ e: T
; O% d4 y- k& q/ V( s6 Zbegin P_pick2 arriving( Q3 M9 }! x; S: Z6 y
    set A_i to 11
7 k. ?# B+ L7 G' x, _    move into Q_induct2
1 j2 }& @8 Q9 o/ p8 Y    move into pickaisle.induct2& t# F! W. c: T' L* D* P' j
    while A_i<=30 do begin
5 X" z0 U2 v0 S5 N        travel to pickaisle.con(A_i)# X3 Z: J2 Y  u
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec9 J8 R6 ~. }; H% v1 f
        else wait for 10 sec( C, c  {6 d. m- z/ C" R. F6 L5 H% J
        if A_i=A_leave then send to die. }: l7 E4 ]1 ?* E
        else inc A_i by 15 a0 a& c; ~6 r" V& K8 ?
    end
4 b9 ^5 W" V4 g( e3 _6 a7 L$ cend
0 @# F$ A7 h2 {7 l# d! V( h3 l, v9 Y; e' X: W
begin P_pick3 arriving
9 F" F2 Y6 J9 E3 l+ |    set A_i to 21! p/ s! H5 c/ Y* S
    move into Q_induct3  Y8 W! `( F1 y
    move into pickaisle.induct3
/ u' h) u" C' W( F4 [4 Y    while A_i<=30 do begin$ Z7 o2 V! W4 ]: b, L8 e
        travel to pickaisle.con(A_i)2 b& i$ Q: [: [4 e
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec3 [8 k% c+ e" H8 C* r- X9 w- N
        else wait for 10 sec
! ?0 X  @( T3 j* g1 w2 K! I        if A_i=A_leave then send to die& ~" l! Q/ k& x1 x3 U
        else inc A_i by 1
/ B9 [: J! [3 b; U& r7 W) a0 t    end4 U! t9 k8 D$ H- O+ @" b* \4 s
end

最佳答案

查看完整内容

pickaisle.induct1/2/3是个什么东东? move into后面,应该是一个station或control point,或者Queue/Container/Vehicle/Segment之类的东西。看你的报错信息,这个induct是个path么? AutoMod Editor的语法报错信息,有时候会指在下一行,必要的时候要把上下几行都看一下。 另外,你的几个P_pick是完全重复的,建议以如下方式修改,可以减少代码编写量: 1. 创建一个Process:名称为P_pick,number of Processes为3,其它按你的 ...
发表于 2009-4-4 23:58:33 | 显示全部楼层
pickaisle.induct1/2/3是个什么东东?
: B! y, C8 F5 b. L( A) imove into后面,应该是一个station或control point,或者Queue/Container/Vehicle/Segment之类的东西。看你的报错信息,这个induct是个path么?6 I* H+ ], \* B1 @4 o; n5 ~

2 u1 ]' _1 K' Z: Q' `$ w- z& \* rAutoMod Editor的语法报错信息,有时候会指在下一行,必要的时候要把上下几行都看一下。4 P6 c9 t/ H. I

- b% ^) \; b7 n# q4 X# w另外,你的几个P_pick是完全重复的,建议以如下方式修改,可以减少代码编写量:
! r2 D1 X) K9 B' E+ X. I1. 创建一个Process:名称为P_pick,number of Processes为3,其它按你的需要设置;删除那几个P_pick;
; z! ]+ ?9 P! f7 X+ H: s. T2. 创建一个Queue:名称为Q_induct,number of Queues为3,其他按你的需要设置并放置;删除那几个Q_induct;, W* A9 A% s7 W" F% q- R: C. a5 t( L
3. 以如下方式改写P_induction和几个P_pick的arriving procedure的代码:
! E7 X$ s% K. Kbegin P_induction arriving, Q# Q' y3 X' e/ h) K0 n
    clone 1 load to P_pick(A_induct); z  E/ W' X  f' ~( ]& A4 m/ T
end最大的系# O# e* _0 g9 O8 ]7 j; G. u

$ X6 m  H7 Q; m& w; o% n7 m' Bbegin P_pick arriving5 p' H+ E' l$ y4 I3 l
    set A_i to procindex * 10 + 1' I$ N# M5 H  h* t" b
    move into Q_induct(procindex)3 v" q$ v0 S4 x
    move into pickaisle.induct(procindex)8 [7 V6 N8 i1 H- k
    /*check the type of pickaisle.induct(i), for your last problem.*/
# G+ i! ]9 w8 r# R6 U  q" l
6 F- X, l, Z; W( i  r+ }    while A_i<=30 do begin
7 w3 i- M* L7 K" o        travel to pickaisle.con(A_i)7 |  B1 d9 O9 N9 D) F7 v
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec" U3 s, ?9 ^" ~: n+ A+ B$ `- c
        else wait for 10 sec7 o" q- l2 f4 P
        if A_i=A_leave then send to die
. Q; _6 b* p' u) _9 m& d        else inc A_i by 1
$ _- @/ L; ^  T7 M' s$ E    end
. y1 t* v- [: |3 h$ bend
" n$ x% G% F/ E$ w) u, ], m
- }5 a& N  u+ e$ H, K其中的procindex为整形,代表当前process的序号。  ]4 ~: n4 x% D+ Q4 E& e8 w* }6 U7 n
station和control point只要以数字结尾,都可以直接用作数组。如pickaisle.induct(procindex),当procindex为1的时候,和pickaisle.induct1是等同的。
发表于 2009-4-20 15:33:32 | 显示全部楼层
你的主要错误应该是在move into pickaisle.induct或者 travel to pickaisle.con这两个类型的语句中,因为你的编译说明的意思是类型混淆,你查一下报错的行数,应该就能找到问题,其他的问题慢慢调吧
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2026-9-24 15:45 , Processed in 0.019666 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表