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

wind123_SW

遇见一个难题，请教各位高手。
! T) a4 |) A4 X7 w
使用transporter将物料从A点运送到B点，通常情况下，每次运输100件，但是运输几次后，剩余的产品不够100件（例如订单总数是220件，第一次运输100件，第二次运输100件，第三次只有 20件可以运了），当运行到第三次的时候，仿真就停滞了，无法继续下去。不知道如何修改程序（我现在的程序如下）。

2 |3 d9 b/ t1 U; K) r4 a需要说明的是，A点的运输量不是固定的，因为有两台并联的机器，因此我无法通过表格直接得出已运送量和未运送量。
) `2 P- ~) Z9 I* b, m" a2 K1 p
is
        i,m: integer; -- 整数变量
        Name:string; -- 字符串变量
        Obj:Object; -- 对象类型变量

do
  o" P2 R4 F' t9 D4 n" ?        m := str_to_num(omit(?.Name,1,1)); -- 先取Drain*后面的数字，在转换成整数类型
& _6 s  C3 e) W) i. a2 E5 M        Name := sprint("BA", m);  -- 生产线名称
/ |9 C- `3 t) U. j6 o        Obj := str_to_obj(Name);  -- 转换成对象变量
   
+ K9 S1 o. k5 {        FOR i:=1 to 100 LOOP
                    waituntil OBJ.occupied prio 1;
                 OBJ.cont.move(@);       
       
2 }1 F3 X9 ]- V, r2 w        NEXT;
& ]- D) K4 h; v: m- B1 W                @.backwards:=false;
' C$ H2 a4 X) E8 `end;

dongshui8558

FOR i:=1 to 100 LOOP, 这里肯定要变化啊。
$ i8 A; @: L# P7 B- ?需要说明的是，A点的运输量不是固定的，因为有两台并联的机器，因此我无法通过表格直接得出已运送量和未运送量，不太明白。

automer

函数主体 缺少对source物料的数量判断
, q1 a$ U! g$ F0 h% n: {6 A. _; uif numberMus = 100 or numberMus > 100 then
       vehicle takes 100 units.
elseif numberMus < 100 then
2 }* L1 {$ l/ i0 `  g       vehicle takes really number of units.
: O3 g  G( I) u' G! I' J# ]end;
2 B4 t, O" K) `
3 Z9 g8 E$ V2 M. I( |希望帮到你

wind123_SW

多谢各位！

wind123_SW

dongshui8558 发表于 2014-10-9 15:03
. L$ _1 S0 j3 y" _: dFOR i:=1 to 100 LOOP, 这里肯定要变化啊。
, k+ c2 U: i7 [  P( S需要说明的是，A点的运输量不是固定的，因为有两台并联的机器， ...

. B) G( h8 p7 ~9 \1 B多谢您提供的方法！