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

wind123_SW

遇见一个难题，请教各位高手。
6 C) W  y  M5 K8 h, J
0 t: `" z/ C* Q) U使用transporter将物料从A点运送到B点，通常情况下，每次运输100件，但是运输几次后，剩余的产品不够100件（例如订单总数是220件，第一次运输100件，第二次运输100件，第三次只有 20件可以运了），当运行到第三次的时候，仿真就停滞了，无法继续下去。不知道如何修改程序（我现在的程序如下）。

需要说明的是，A点的运输量不是固定的，因为有两台并联的机器，因此我无法通过表格直接得出已运送量和未运送量。
" N2 x) a8 S+ \" e( |9 ?2 H' o
% @- Z- F: ?' Q- p! o% a3 S is
* m% W  p3 \+ c3 Z  M+ S        i,m: integer; -- 整数变量
        Name:string; -- 字符串变量
- o& I. L- M5 m/ a# V+ }' i        Obj:Object; -- 对象类型变量

do
, j2 J) [0 F6 d6 p        m := str_to_num(omit(?.Name,1,1)); -- 先取Drain*后面的数字，在转换成整数类型
. J0 W) r6 a1 n! ~$ z2 O) [. Q        Name := sprint("BA", m);  -- 生产线名称
        Obj := str_to_obj(Name);  -- 转换成对象变量
   
- A( I# w& ~9 g- z) ]0 Z& q0 Y        FOR i:=1 to 100 LOOP
( A1 r- ~  k: E9 [" a                    waituntil OBJ.occupied prio 1;
5 }" v  i  ?( F# h% |% D9 k, k8 v                 OBJ.cont.move(@);       
       
        NEXT;
                @.backwards:=false;
# X8 t  R  I2 d9 R& Qend;
7 Z2 V% y6 i/ r5 w+ y) d  n+ o5 r- R' x

dongshui8558

FOR i:=1 to 100 LOOP, 这里肯定要变化啊。
2 w3 S% Q! g/ s. d6 f需要说明的是，A点的运输量不是固定的，因为有两台并联的机器，因此我无法通过表格直接得出已运送量和未运送量，不太明白。

automer

函数主体 缺少对source物料的数量判断
' T! l0 ~/ O$ q) x+ Yif numberMus = 100 or numberMus > 100 then
6 M0 W% p$ N0 L- ]( `% B       vehicle takes 100 units.
elseif numberMus < 100 then
% z" J9 j4 p/ q1 Y3 ]7 k; C% L       vehicle takes really number of units.
- @) `" }$ [% W4 Pend;
  [9 ]6 j& u9 ?' u& t! w
3 j* h0 s( y* X7 v& d6 N希望帮到你

wind123_SW

多谢各位！
4 n: F! ~1 i' ^, Z' l% g
! r- J9 S  y( b& V& d' u9 ~

wind123_SW

dongshui8558 发表于 2014-10-9 15:03
) }2 @' H+ O% @0 y2 {& ^* a& r1 PFOR i:=1 to 100 LOOP, 这里肯定要变化啊。
% j& s" g9 |. R: d需要说明的是，A点的运输量不是固定的，因为有两台并联的机器， ...

7 d# F7 M% T$ X6 Y4 Q4 \多谢您提供的方法！