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

热翔啊

is
        i,no,m:integer;
        Buf:object;
do
        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
( f' |6 L! H* }$ C5 W4 d                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
. d1 B/ z8 B$ e6 ]                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
2 F0 ]$ o' h  o7 T2 f. J                        i:=PartsTable.Ydim+1;--跳出循环
                end;
* f5 C  G" {1 |% S                m:=m+PartsTable[2,i];
                print m;
        next;
- Y# ?3 W9 Z: O  J2 Z: t: P        --先将零件送到From位置
0 d. M, n% ~  @7 x        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;
& o! o4 e8 q5 o% I: U- U* |, \
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
: O2 Z6 V( M% B  P) o5 b        i,no,m:integer;       --定义整型
8 G  H! j% E  V2 |        Buf:object;            --定义object
% a$ D8 f/ m, T' a  h4 Udo
        m:=0;
4 y( j& {3 O3 i4 n! j7 q, ~  [! i2 h        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
7 h" O7 h" u9 x1 \5 D( S) P1 n        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
7 y7 i% O7 ]1 v) `                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
6 |! U) x4 `4 d" ~8 k! r                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

+ y& |  u/ `! P8 e# x4 E/ d5 d                        end;
0 t/ ?2 ?  O# E1 [2 q7 H6 |                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
$ r; B, |" j5 P, i2 [' C/ d4 m        next;
8 K/ {; p. J4 L# y7 P. n       
! U7 o3 J. E) F0 m- ^        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
9 t" }: Q# C8 f, Fend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
& X$ D8 Y! `2 s) ~; l0 W这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

5 i$ G; `3 w% X. k% F/ u非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的