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

热翔啊

is
+ u" u) Q/ ^% p  O% t0 m+ Z: g        i,no,m:integer;
( {( S$ A5 t1 N* w; P        Buf:object;
do
        m:=0;
        no:=@.getNo;
; ?- k! Q) `+ I- d5 P1 J        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
5 n2 Q8 g& R0 w# D                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
9 m. g/ K  f$ o8 w8 Y3 S% Y                                PartsNo:=PartsNo+PartsTable[2,i];
! F  A% o: E8 o4 L0 j5 A3 m                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
3 T1 u! Q6 i: `& s                end;
+ E( R$ `- z6 @8 X/ b                m:=m+PartsTable[2,i];
                print m;
        next;
* l% u: W% h0 X3 M+ s0 x        --先将零件送到From位置
9 Q# n3 q/ |( }. W% f        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;
$ z0 f5 A" u5 J3 W" J4 {
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
- D  a. H7 c- A不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
0 m3 }6 H2 s6 D$ S; y; uis
; t, S( l- b/ p        i,no,m:integer;       --定义整型
, e5 T7 \& P; m; m6 h: R        Buf:object;            --定义object
( C4 C. @4 ~8 Kdo
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
1 p8 s; e; C! x- y8 y# a3 c        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
% c3 F  a1 g7 u0 U                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
, N7 p, r7 Q4 U6 ?, Q                        @._From:=PartsTable[5,i];            
- G  T$ C1 L  G+ H                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
- j8 g. \/ u1 M" B, s- |# ?3 w
                        end;
& ~5 A- W' P' ?) k. v                        i:=PartsTable.YDim+1;
7 y+ ~" y# v. n, P4 y! x; z( K                end;
( ?( g( C2 \. K6 H. r0 J& D                m:=m+PartsTable[2,i];
7 ~$ o2 O2 S' _, _( {7 J/ l/ `        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
8 y" P4 P: I! }! V' U1 n  {        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
3 z  {, J) v9 I. g/ Q这个例子昨天正好看了，话说那本书的例子都很不错~
& h: b7 ?0 ]3 a% \3 d. C5 @; A不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

7 O8 X8 l) u! s# Z$ m% W! G7 ~非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的