求教：transporter 运量不固定如何编程

wind123_SW

遇见一个难题，请教各位高手。

使用transporter将物料从A点运送到B点，通常情况下，每次运输100件，但是运输几次后，剩余的产品不够100件（例如订单总数是220件，第一次运输100件，第二次运输100件，第三次只有 20件可以运了），当运行到第三次的时候，仿真就停滞了，无法继续下去。不知道如何修改程序（我现在的程序如下）。
, m% c4 ^* {! D6 e
" [: Z. V; Y7 \4 X6 f( w需要说明的是，A点的运输量不是固定的，因为有两台并联的机器，因此我无法通过表格直接得出已运送量和未运送量。
* r* A0 O6 M$ D" t+ R
0 Q+ c# V# I9 Y( w* l1 W is
- i9 K) @! h1 c, f+ E        i,m: integer; -- 整数变量
        Name:string; -- 字符串变量
! W4 F' E& M0 F+ X/ c, k; S/ d        Obj:Object; -- 对象类型变量
/ Y/ E& X5 L3 n, l# T8 u& W! }
do
        m := str_to_num(omit(?.Name,1,1)); -- 先取Drain*后面的数字，在转换成整数类型
        Name := sprint("BA", m);  -- 生产线名称
2 }& r  N3 r+ f& |& X- `) s        Obj := str_to_obj(Name);  -- 转换成对象变量
   
        FOR i:=1 to 100 LOOP
5 V) N7 K8 i( N                    waituntil OBJ.occupied prio 1;
  Z; f$ h) z5 ~                 OBJ.cont.move(@);       
: g8 d) P) W9 ~: m       
        NEXT;
                @.backwards:=false;
" w& q$ c% x, Z. [7 ^end;
; G: I4 s, m% `* U3 T! i

dongshui8558

FOR i:=1 to 100 LOOP, 这里肯定要变化啊。
3 H$ S+ }# Z+ a2 z, D需要说明的是，A点的运输量不是固定的，因为有两台并联的机器，因此我无法通过表格直接得出已运送量和未运送量，不太明白。

automer

函数主体 缺少对source物料的数量判断
" W) q: \: T1 p8 Pif numberMus = 100 or numberMus > 100 then
- }3 i6 y# g; h. P  g: c       vehicle takes 100 units.
) h' ~; t6 P% p5 s# [# qelseif numberMus < 100 then
       vehicle takes really number of units.
end;
7 f& E6 \+ z* p. C  s1 s
( q: T  f8 K. v# }希望帮到你

wind123_SW

多谢各位！

0 a# ~7 I" }2 O  \

wind123_SW

dongshui8558 发表于 2014-10-9 15:03
' F' g$ l; t! e0 o: FFOR i:=1 to 100 LOOP, 这里肯定要变化啊。
+ f+ B" }/ c8 f5 h, W9 Z' S" v- C需要说明的是，A点的运输量不是固定的，因为有两台并联的机器， ...

多谢您提供的方法！