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

热翔啊

is
        i,no,m:integer;
0 O# ?0 e5 I8 v7 g* w        Buf:object;
# A4 D# n: R0 h- G. t- Qdo
        m:=0;
) q; O# S; U0 c' r        no:=@.getNo;
; v2 ]4 Y8 r0 d0 t3 D! d        for i:=1 to PartsTable.Ydim loop
5 t8 D  f2 T6 s0 k( n                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
& `. Y; c2 Y6 }' i8 g/ F+ D                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
4 m* J# S/ f$ a                end;
                m:=m+PartsTable[2,i];
+ V1 ~: }7 f& {$ z( k7 G                print m;
        next;
0 T7 l9 }, O/ ^# h1 H        --先将零件送到From位置
% e% K% X" T2 }) c2 p        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
3 S7 Y2 G# q  g* u$ Y% o1 pis
% D, b: Z1 E/ N% V# a: G        i,no,m:integer;       --定义整型
% J% ?3 O+ [) f& ?' d        Buf:object;            --定义object
do
( O7 w, O8 M0 S        m:=0;
) d& `: R+ w) u        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
9 H3 K( c& _3 m4 c" n                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
: ?  J: _; _: }, `2 j                        if no=PartsNo+PartsTable[2,i] then
$ v5 P9 }: p3 \% M' y                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
6 L$ K3 f, r/ j, `& }                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
; k0 ]* U2 O1 [9 x       
2 g- \! F1 `# a* S        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
- v0 Q8 C! A; T( E7 Iend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
( @' O3 g# S# C0 E4 Y" E这个例子昨天正好看了，话说那本书的例子都很不错~
2 D& D6 W5 ?4 a2 H) c# B. A7 L不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的