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

热翔啊

is
# k" b) P7 g: |7 x/ v) @        i,no,m:integer;
        Buf:object;
do
        m:=0;
7 M7 U2 ^9 f# o. E/ c2 K        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
8 n- b: {* e/ f/ `- V                        if no=PartsNo+PartsTable[2,i] then
0 d: T, V, k" C3 u8 y                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
  _+ z( f1 w7 c/ o& _# R; a' r$ b                        i:=PartsTable.Ydim+1;--跳出循环
1 a0 r. H/ W4 B, d, G7 ~8 K' m* a                end;
& V' e( R1 U6 s5 o, u* [                m:=m+PartsTable[2,i];
* h2 @6 M5 n5 V- v% U8 U1 P- ]                print m;
        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
/ E* m3 i/ X) p        i,no,m:integer;       --定义整型
- A. t/ o# D* u/ [% o        Buf:object;            --定义object
5 f& O  x- ^* H4 N5 Mdo
        m:=0;
- u' d) W6 {" `+ q* Z" h        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
8 S, w. s& ?7 p5 \. K. U$ B3 H        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
0 U6 z5 i4 X. C& \+ l                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
' n8 |  ?; q8 g2 R3 n! M, [% X) ?                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
$ a( a2 w3 Z- i7 v                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

8 N3 |1 _' p9 e! [' ^) P# r5 |' Y1 I                        end;
                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
/ m- h7 B# u1 a) u5 W+ y9 V  _* ?4 j        next;
8 Z3 g% y4 X) ^4 _. c; z0 @8 Y       
        Buf:=str_to_obj(sprint("BF",@._From));
- P9 M& _% g+ O" z/ @/ u        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
. q) H, v+ u4 ~4 m! T这个例子昨天正好看了，话说那本书的例子都很不错~
5 G0 d. l1 N8 s, Y  C& m不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

5 W& i# K" f: T# ?' m; B/ O非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的