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

热翔啊

is
- b# z1 P( W0 J" P3 v1 U+ `$ _- |        i,no,m:integer;
1 y6 X+ I! W, m. y! a6 Z+ l        Buf:object;
do
! ]2 f! i, e1 g- i, f        m:=0;
; c0 e: e6 P# P% I6 l% j* [% ]        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
. x3 W0 {3 e0 u' G# b/ X8 B                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
& N( O! o1 z! j- {; D                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
3 C  L) C4 P6 C! x                        i:=PartsTable.Ydim+1;--跳出循环
6 @8 h8 b$ I6 B7 a. [( a0 r1 ~4 A                end;
; p# q" o( }7 K. g! l4 X+ M                m:=m+PartsTable[2,i];
# w# h, S( E" J% t9 k0 B9 T                print m;
0 z3 j8 T1 V' r2 B        next;
2 A8 D( |7 s5 S+ n8 B* @        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
2 g  T' f; J9 O& g不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
' f! v  N1 t# }% |+ Ais
        i,no,m:integer;       --定义整型
$ O; m  @$ q/ E& ~! E/ ]* x: T        Buf:object;            --定义object
do
! w" F9 m2 k# E& t' ^9 K  r4 {8 S        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
! m' t* u0 w/ d9 _- C5 ?" {                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
7 o# S' h. e4 h' c5 @0 N$ f) m" J                        if no=PartsNo+PartsTable[2,i] then
5 R8 G$ l6 `: L* ^5 i4 Q# m                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

% a0 w- a7 \! y1 J. Y( `5 }5 D* W                        end;
                        i:=PartsTable.YDim+1;
* G( v7 f* z  {6 E" Y8 f( d                end;
5 F- d9 G: N, y4 [6 v% `" `) B3 S                m:=m+PartsTable[2,i];
3 e8 ?- p/ _) q. y        next;
       
( u; Z* J  h' b        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
+ M2 _' H9 z! P5 q% R7 R7 cend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
$ F8 V- G2 r" C  @; e: P0 o这个例子昨天正好看了，话说那本书的例子都很不错~
+ s. w6 w" R7 ]. B/ V) ^2 f2 l+ z不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

2 t) Q2 _+ \0 R$ _6 o非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的