设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 13679|回复: 2

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

[复制链接]
发表于 2009-4-4 23:58:32 | 显示全部楼层 |阅读模式
5仿真币
想请版上的人帮我看看我这段code中的一个错误,我刚学Automod没多久,实在找不出错在什么地方了,谢谢
# k& D0 g# L& H7 B# B* L* K) G; j& \0 u+ i5 v
我的问题是,在每个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中的数值,不知道会不会有什么不妥。
* M8 |% O3 M  D* m8 L
" Y, w. k" l8 X- n% l2 X% G' vbegin P_read arriving
  P. t8 o5 b6 N( S* ]; V3 ?( P+ `& ^    while 1=1 do begin
2 I9 @7 M) u* `4 _- Y        read A_tote from "data.txt" with delimiter "\n"
( \$ h) ?1 K9 l9 Z- B8 B        read A_time from "data.txt" with delimiter "\n"8 L) V5 S( ?* {5 ?6 K- S+ {) f
        read A_leave from "data.txt" with delimiter "\n"
3 ^+ Q% B  e7 Y( {, J" ^' V        read A_picks from "data.txt" with delimiter "\n"% M, ~% K% I  h) P
        set load type to A_tote5 ~& a" F) P$ r5 y! ~7 @- r/ [
        if A_tote="tote 1" then set A_induct to 1% ~* O  C& m7 I& l! U
        else if A_tote="tote 2" then set A_induct to 2
; V( m$ g" J5 s0 s            else set A_induct to 3   
/ a4 u' H9 x0 x: u. W. L! w3 S        set A_i to 0
  m: Y( V. a0 l' I/ `* i. J; d' t+ T        clone 1 load to P_induction
6 [8 G# A- j2 \+ |        wait for A_time sec+ [3 u/ l0 D5 m3 p
    end
* L7 _1 A& Q2 r% C8 eend2 H" S0 t. e# S/ ?1 a0 t. Y

3 h; n8 u$ h, q; N, Pbegin P_induction arriving
. L' A4 ]; p# ?2 w! D2 C" ?- A& X* n. C    if A_induct=1 then clone 1 load to P_pick1, I- t: Y& O: V
    else if A_induct=2 then clone 1 load to P_pick2
8 u1 X6 T; w+ U        else clone 1 load to P_pick3
8 j* {( N2 l% W5 tend
( t$ y* W8 o# t) a- p# W2 Q( C* m, V: V1 C. k1 K% o
begin P_pick1 arriving
, Q! V5 k+ S, Q. Z. d- n  o6 E" z    set A_i to 13 X5 q! o- L/ Q) D( `% @
    move into Q_induct1# D: G- [4 k; z5 v5 j
    move into pickaisle.induct11 a. |, F1 Z5 D- R+ d6 R2 t
    while A_i<=30 do begin
, e1 \- Q9 L% r; J        travel to pickaisle.con(A_i)$ e3 ?: q+ s. i0 f* [; I6 z# O. F# o; Q( t
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec
$ _7 G, C( J: {: o" o) b* s3 u        else wait for 10 sec
. }1 J9 Q7 j0 p  i2 P- i! E) L        if A_i=A_leave then send to die$ l" G) O$ f4 i9 @- g, m# ?# j
        else inc A_i by 1* r5 U+ }9 m0 v5 P$ F- c
    end$ M' u) x: d0 x7 |
end
0 f  j$ d& c5 Y$ T$ m
& z: \' v9 `5 a9 ?& Ibegin P_pick2 arriving
( o* E+ Z6 z( {4 e0 z    set A_i to 11
. n, C8 F, C% [1 n' H. B/ ~    move into Q_induct2  i! k+ P4 o, O. K2 [. W
    move into pickaisle.induct2, N  t' o9 [# N" ~  |( i
    while A_i<=30 do begin
3 f* N( D* Y3 ~5 l  Z- n" L        travel to pickaisle.con(A_i)
1 q" c6 g  s) Z/ J3 H( \        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec
" W) ]/ x8 r8 ]9 Q        else wait for 10 sec
- K" {0 n5 y! ?( o2 e. }' s! v3 P        if A_i=A_leave then send to die
! X/ @5 q' _/ E$ t; @        else inc A_i by 1
% s+ L$ e# i9 V$ k& A    end& x( H2 V+ e# ]* z
end
% G1 n# @/ S0 n3 W' [2 J3 e
4 j3 o1 a# G! g3 Q4 b7 Rbegin P_pick3 arriving1 {: U) ?& i3 _5 D" Y& U4 a- `
    set A_i to 21' }  k+ h6 t' \8 a
    move into Q_induct3
# |* R, d3 `. l7 |: a    move into pickaisle.induct3$ ?/ ?4 e* f: N7 ^
    while A_i<=30 do begin' l' H/ q/ N( \* P1 q
        travel to pickaisle.con(A_i)4 ~+ M; e( K" ]. f9 X+ g( h+ j
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec8 O) n0 g0 @* c' ]( F( M
        else wait for 10 sec* x/ ?' {& U0 C) [) n* T6 p
        if A_i=A_leave then send to die" [* u- h. Q" B
        else inc A_i by 13 K% X4 J" A% w7 P$ e: P
    end2 Z- o8 p! A8 N5 m
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是个什么东东?
7 o! V, ]% E7 @move into后面,应该是一个station或control point,或者Queue/Container/Vehicle/Segment之类的东西。看你的报错信息,这个induct是个path么?
( h+ ^" V8 |: u2 y  i- W! u5 K! C& y9 f; e5 |) f! P
AutoMod Editor的语法报错信息,有时候会指在下一行,必要的时候要把上下几行都看一下。+ @0 d& k8 F$ C$ W: A

, }7 O; k# W( N% A1 U/ p另外,你的几个P_pick是完全重复的,建议以如下方式修改,可以减少代码编写量:6 o0 I1 d% C6 a( O! j- _( K
1. 创建一个Process:名称为P_pick,number of Processes为3,其它按你的需要设置;删除那几个P_pick;
$ X7 |0 ?  d+ n. B& R- e9 i3 `2. 创建一个Queue:名称为Q_induct,number of Queues为3,其他按你的需要设置并放置;删除那几个Q_induct;
# C% y' Q. t* i3 ~8 @' F3. 以如下方式改写P_induction和几个P_pick的arriving procedure的代码:
4 y, \2 K, n' p% K+ X' B7 Ibegin P_induction arriving
5 ^  d' z# G% o  `0 n    clone 1 load to P_pick(A_induct)
" c. s+ v4 T6 \; @( [3 P- r+ Uend最大的系
4 W7 f2 y+ Q: K) z$ ]  ^
+ D3 P8 n8 \  z9 x" I0 ]begin P_pick arriving( S: f/ R* c  F5 H3 ^, l
    set A_i to procindex * 10 + 1! x$ M' @: E# ~9 E5 W8 Y" N1 L$ ]
    move into Q_induct(procindex)
$ V; y5 f. f/ }  q$ C. j    move into pickaisle.induct(procindex)
; `6 p  N0 |  |$ m. e    /*check the type of pickaisle.induct(i), for your last problem.*/  z  p; W4 P# R3 v" W
. \" @8 A5 J1 c: t8 Q% h
    while A_i<=30 do begin
4 O- c+ r) I; s5 S# _        travel to pickaisle.con(A_i)/ x/ C3 |% @8 c  S' j' B/ J7 p; R
        if A_picks(A_i)<5 then wait for 5*A_picks(A_i) sec
- }) k# m* O( D- f        else wait for 10 sec
! z# @- j% |2 X- |7 R3 m        if A_i=A_leave then send to die
) I# r$ f+ e: V6 P        else inc A_i by 1
9 L* l4 k- i( d* ]- Q* b; j2 w! V  @$ R    end/ q3 r9 |% H! `+ P
end
4 V, f2 C$ `7 T% h! ^3 K  q& q& y1 H$ p! @; z9 E
其中的procindex为整形,代表当前process的序号。
7 w! q5 Z8 W4 M1 Gstation和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-4-28 11:35 , Processed in 0.018132 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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