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

热翔啊

is
        i,no,m:integer;
        Buf:object;
2 k& d- R8 ^' G. w! xdo
" Q$ T2 ]0 }* ?! e; w        m:=0;
9 X- ]" O& P7 E& g" V        no:=@.getNo;
1 e' R) `) X' ^2 e        for i:=1 to PartsTable.Ydim loop
/ R) Q5 N0 a- T- T% m1 D* l- G: j3 z                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
& l) }, R9 V: u& w% o# `# r6 o& H                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
7 @  p. O( r3 z- M                        i:=PartsTable.Ydim+1;--跳出循环
                end;
0 K) T! T! Y, X$ s6 K0 Z/ u                m:=m+PartsTable[2,i];
                print m;
  ~5 L: P) j( ?7 p( w/ d4 h        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
  ~  B2 E3 }1 f        @.move(Buf);
end;
  i' E- f* O1 b  W
+ s4 L8 u# o2 n- R这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
/ f' C  T: o5 I9 N不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
% G1 i8 m, a: I$ }5 A% d        i,no,m:integer;       --定义整型
% h& c. n& v* Z; U% H6 i3 X: {+ _        Buf:object;            --定义object
2 D* N5 p5 }& s2 T0 w: Ydo
1 I! |) m- Q4 l+ `  }& o        m:=0;
8 K" M) w7 W1 z# }- [+ i& q        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
6 d0 ?9 r* t6 }( d% }1 K. [        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
2 x$ d2 A( @4 z5 e: K2 }1 r                        @._To:=PartsTable[6,i];
4 B$ h# `% d( V' Y  ^( s                        if no=PartsNo+PartsTable[2,i] then
" r* H, N" m: I3 j6 Q9 H* f6 O$ o                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

7 H7 `4 V( s+ q8 U                        end;
6 K6 M& P- Z! J+ B                        i:=PartsTable.YDim+1;
                end;
! w0 L$ W7 H' d7 U' |6 L( _8 h3 p                m:=m+PartsTable[2,i];
8 M' F' M: R. f3 K8 H+ q. K( T        next;
       
4 G# k, H" h1 [, }        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
1 P5 Z# u; r. O0 @/ T; R8 Q# I. ~end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
7 \# n7 \- m- w, q4 l# \这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

+ m, d! I% a* J( n9 Q/ Y* ^非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的