设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 13218|回复: 2

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

[复制链接]
发表于 2009-4-4 23:58:32 | 显示全部楼层 |阅读模式
5仿真币
想请版上的人帮我看看我这段code中的一个错误,我刚学Automod没多久,实在找不出错在什么地方了,谢谢+ e% p5 N; T& i: X
$ n6 v/ v$ l% W6 G* E  g+ l4 G/ w
我的问题是,在每个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中的数值,不知道会不会有什么不妥。( S5 R, Z9 Q+ E

6 Q1 u5 y$ U$ r2 b* R' M* Pbegin P_read arriving
( e: `! v* ^/ g5 O' R    while 1=1 do begin+ b( c$ H9 \! {& a. s
        read A_tote from "data.txt" with delimiter "\n"( b$ h2 z$ c! [
        read A_time from "data.txt" with delimiter "\n"
3 j, A" y* T* e' g/ Q  T, |0 r        read A_leave from "data.txt" with delimiter "\n"2 P7 I- `# z: g( u  \# ?7 f
        read A_picks from "data.txt" with delimiter "\n"
# G7 z- O) V: v+ K! p, O: a        set load type to A_tote
2 B6 K' N# N8 Q& y        if A_tote="tote 1" then set A_induct to 1
' ]1 W4 }5 v) |1 D  m; c        else if A_tote="tote 2" then set A_induct to 2
( v& J  u, f2 r& A! t            else set A_induct to 3    9 T. P, E) x2 k- k9 R7 M' ^
        set A_i to 0
6 Z: k$ u: G, @9 Q& C        clone 1 load to P_induction7 v8 o# `6 [- k4 o6 s1 V6 X
        wait for A_time sec& S% o; ?& _/ P5 J7 `/ _
    end
7 a. G- j1 I. lend
( k3 |8 @$ H; H( F6 D4 g6 H3 D* _4 C+ E% X
begin P_induction arriving
& l+ f5 g4 K& d/ n- s: l    if A_induct=1 then clone 1 load to P_pick16 _7 e* j+ ~2 |/ E
    else if A_induct=2 then clone 1 load to P_pick25 |" o& w1 x* a+ k2 T: I/ u; g3 k
        else clone 1 load to P_pick3
1 `$ A1 _8 ^, e7 c6 F% l7 R& [end' I: w$ u" ]+ \4 ^. a

! _: Q5 o0 o* L( g/ ^/ ]6 c* E5 Bbegin P_pick1 arriving" s: p  A% [. D: _# h7 H8 a9 m7 D  k
    set A_i to 1. W$ j( j7 I; c% ?
    move into Q_induct16 g5 F! F$ E: A- T/ E
    move into pickaisle.induct11 i, [6 ^# P* I* f5 O) Z
    while A_i<=30 do begin
/ n; H7 a: o' l* A* ^/ H        travel to pickaisle.con(A_i)$ p  v5 w+ V9 _) D$ i# H
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec
- N1 Z7 ]' {) l, I        else wait for 10 sec1 ^, }2 \8 F6 J
        if A_i=A_leave then send to die! i# F' Y3 e- v% |% |, m5 L8 W
        else inc A_i by 1( z; |( h2 i1 ?) K/ H
    end5 c" A7 v2 t1 x% E% i! G
end8 L/ o, G3 y$ N* i- j# t2 _
0 c0 h5 |& }  A3 J4 V
begin P_pick2 arriving
3 z+ q2 f' W- E5 q  N0 t    set A_i to 11
" s7 H1 @' s7 n$ o    move into Q_induct2
0 t# Q4 G: \' c1 y& {  {$ _    move into pickaisle.induct2) i! X8 F9 P. i7 j  w" D% d5 s  z- A0 E
    while A_i<=30 do begin3 K0 \+ S8 h; t. n0 h) Y
        travel to pickaisle.con(A_i)0 M1 z$ N. Q  M9 p* N- Y' u
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec
# T% H; v" O) P" S- y" ~        else wait for 10 sec' J5 T( K- r) p, v( q  m( A  Y" S7 ~
        if A_i=A_leave then send to die
& S( |" k6 I5 \# G        else inc A_i by 1, l/ D$ n0 }# X# o' S
    end  J' j7 `- ^; Q' b! Z  T
end
% l% [8 `- l8 p8 H  U9 ~/ v& q8 ]) s' d( _
begin P_pick3 arriving
# ?  R* l5 I( E( I4 x* j! F    set A_i to 21
+ G" y4 d' B% J  f    move into Q_induct3
2 d& V) B1 l% @$ C2 o% L6 A& B    move into pickaisle.induct3
- K# c( M! K. v' K4 c    while A_i<=30 do begin
/ V7 m% B% U* h+ `% }5 `6 n        travel to pickaisle.con(A_i)  W* ?! C) \( a  M9 H! P
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec" z1 S% u# q0 q$ z5 Z2 p
        else wait for 10 sec1 o. r; n5 e3 p8 m) _
        if A_i=A_leave then send to die
- c8 h' M( K% k9 V        else inc A_i by 1
# T: D( G1 C. m; ]$ k2 O  J  {' o    end8 C6 d  \+ I, q' l" D1 [
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是个什么东东?5 b2 M& X$ @1 y( c5 d
move into后面,应该是一个station或control point,或者Queue/Container/Vehicle/Segment之类的东西。看你的报错信息,这个induct是个path么?
9 ^8 D! K# ?- Z" u! s! v, Y3 G
/ k8 o# S5 z* }. `$ {AutoMod Editor的语法报错信息,有时候会指在下一行,必要的时候要把上下几行都看一下。6 Q7 F/ Q( a7 d+ Z: B( V% |- H9 p

' z5 x7 V" h1 `9 m4 Y0 x8 l" H另外,你的几个P_pick是完全重复的,建议以如下方式修改,可以减少代码编写量:1 ~4 Z/ Z" b3 Q4 G0 I/ k2 D
1. 创建一个Process:名称为P_pick,number of Processes为3,其它按你的需要设置;删除那几个P_pick;
: b% n; M( Z0 u2. 创建一个Queue:名称为Q_induct,number of Queues为3,其他按你的需要设置并放置;删除那几个Q_induct;
  S. h3 b, }( b; G0 ?8 t3. 以如下方式改写P_induction和几个P_pick的arriving procedure的代码:) A" o' E. z4 ]) _( Y5 h
begin P_induction arriving0 ^$ O2 Y! I7 s( }
    clone 1 load to P_pick(A_induct)
4 ?9 ]4 u! i, i& u7 x% m0 ]/ Dend最大的系7 p% }6 D7 ?! W' m) F. N8 V
8 r3 y0 [+ c$ n" s5 g
begin P_pick arriving
# r2 y5 q) t4 a) U& ?3 v# e. c    set A_i to procindex * 10 + 1
( B& }& D$ ~7 V# P* m    move into Q_induct(procindex)* Y5 h3 Z8 I: K8 o' {, p( A
    move into pickaisle.induct(procindex)% f9 l2 P+ S% c, h) H; l+ [! ^9 e
    /*check the type of pickaisle.induct(i), for your last problem.*/2 T9 S5 o- b2 _/ |

+ P9 |- E. Q! r( q2 w    while A_i<=30 do begin4 Y: F2 q% f3 Y4 D! y. k& B
        travel to pickaisle.con(A_i)( @' w% l$ F  Y0 {; ?0 N' g0 N# _
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec; \/ c7 I' P4 g5 Z( F8 r* J
        else wait for 10 sec$ o# t1 Z1 D: \4 B. c3 y8 L
        if A_i=A_leave then send to die
3 ?$ z/ t# V) w- |1 H        else inc A_i by 1
- n2 _) f) W4 F- I% v1 i& S    end! L5 a% ^1 v$ Y& W7 E" h
end
2 W- X/ ~( l) ]" u- j6 Q# Y: I& N* E
其中的procindex为整形,代表当前process的序号。
" E, o8 {1 r8 H! [- P3 Cstation和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-3-27 14:54 , Processed in 0.015582 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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