能不能忙帮忙翻译一下语句

热翔啊

is
        i,no,m:integer;
1 h6 Q! u, t4 ~9 U        Buf:object;
do
) l9 `3 q6 ~: N        m:=0;
0 k- b% ~. B9 p- Q% z4 i; I  I: l        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
- z8 Z+ W4 T5 ^% A" p1 l                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
$ x, i8 n$ A6 n: U                        @._To:=PartsTable[6,i];
4 w( ^9 I( H3 [" O& r. y                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
) p. @. [" [. H7 {% W                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
) k* D( b# o$ L# G, u                end;
- O% Z0 }' W  D6 x                m:=m+PartsTable[2,i];
1 n& B- ?2 M+ {% M, |                print m;
* g- c& y: p* s8 _! G# O5 M        next;
( K  u8 e$ e2 g* ^: t+ F& M  x        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
3 e  ], M" a' U; k7 v+ `8 W不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
. T3 L  L+ q9 a' s" h- e$ fis
- E- C" i4 f7 r+ Q5 k        i,no,m:integer;       --定义整型
: a5 h: g9 F' j' u2 k3 |        Buf:object;            --定义object
do
        m:=0;
  ?+ p; u( j0 v4 p% V4 C5 H        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
) V( z/ I/ S/ G, Z5 X6 }4 u                        @._From:=PartsTable[5,i];            
0 F& W# Q# l0 z+ x, X. F% \                        @._To:=PartsTable[6,i];
) _* d4 y0 P  ^                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
- u# y7 j0 q3 l; f% e: h  N
                        end;
                        i:=PartsTable.YDim+1;
                end;
  H% z' y) l! x                m:=m+PartsTable[2,i];
6 p' Q7 A' _3 i( j! e& m        next;
# r. B. R5 R+ t1 A  U) r# D$ q- a       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
  {3 D; w" w& [/ U这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

/ a; n3 i- i0 i* ?  \0 U7 _' o非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的