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

热翔啊

is
        i,no,m:integer;
$ |' r0 W" t5 h6 c, \+ }4 x- X        Buf:object;
do
        m:=0;
        no:=@.getNo;
9 b2 o, D- r! [7 |# f        for i:=1 to PartsTable.Ydim loop
( ]6 y- R5 e, [1 U  ^9 V/ _                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
. R5 x; L1 I- U+ Z0 O" m$ E# z                        @._From:=PartsTable[5,i];
1 F: P5 x6 H1 R* d                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
/ a7 J6 V6 T) @" p9 M                        end;
; J: O+ ^' D+ j- A. K+ s                        i:=PartsTable.Ydim+1;--跳出循环
6 i$ v/ y; {% \- G, m6 W                end;
) h# d" s6 v5 N4 {4 W. p, v) R                m:=m+PartsTable[2,i];
$ `& u$ X# }! r$ E, ^' l' c                print m;
/ l% G3 A5 A# N$ w9 q        next;
        --先将零件送到From位置
; Q9 u% U/ F- P5 W& z) H+ s        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
* W" C" {2 k* t" P        @.move(Buf);
end;
$ F9 Y. a/ b+ a# w
- a8 |# e) L& s这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
% _: j* ^5 z; his
, V" t4 V# N* g7 c$ V4 Z, I        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
) K2 Z: R) S# k$ Qdo
        m:=0;
! \7 M3 u3 h& S, E% Q# }0 @* [        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
! G7 V  d3 y, `7 w- J                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
/ v3 I: F9 G# d9 Y+ v4 Y! o                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
0 A# O4 L7 _- g4 l: ~0 I! T
                        end;
                        i:=PartsTable.YDim+1;
9 L8 G7 [0 b, g                end;
* V, _+ l8 K& ], R% L' V& ]- n                m:=m+PartsTable[2,i];
        next;
       
2 l6 A# u1 S/ e- y/ {! {, V        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
这个例子昨天正好看了，话说那本书的例子都很不错~
0 A: P, Z( s/ y  }不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

& T+ ~2 k% t! T6 w/ }& L- H非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的