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

热翔啊

is
        i,no,m:integer;
2 Y& }! E* q: K- a) @7 |( f        Buf:object;
. j. Q  n0 d, k5 ]do
" _( h& I+ e# t% E        m:=0;
/ }7 y4 [0 b+ A" P. Y& F4 T        no:=@.getNo;
" N, U% C) p6 b! C1 }- A8 L        for i:=1 to PartsTable.Ydim loop
7 {& `. v- U/ o- N! \* \                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
3 w& W9 i" o8 {* ]( f                        @._From:=PartsTable[5,i];
) G  u3 t/ m& E8 n9 J4 e                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
9 q( r1 }4 L3 E. a                        i:=PartsTable.Ydim+1;--跳出循环
                end;
8 O  p& X# N0 X- z                m:=m+PartsTable[2,i];
& [6 S& m. _& [2 e6 x                print m;
) ^& U0 j9 m# p" P. a8 _" s        next;
) M8 T6 e. t7 f; \+ d        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
2 v2 P3 e+ \2 F/ I" l        @.move(Buf);
5 R1 ~5 p! j6 ^( ^0 }end;
4 ^+ i. [* J, S. x% _/ y  }
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
3 s5 n, b  j$ Z6 J7 c4 \& r$ m不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
, a: u  q, s9 L- J) S1 K/ Vis
$ f7 x  l- e* z* [1 ?3 a+ z' R" C4 x        i,no,m:integer;       --定义整型
! f8 X5 A6 @) W: v3 v6 t/ j        Buf:object;            --定义object
( J8 D, c: V% d! ldo
        m:=0;
' E. e' D( [7 U5 ^        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
0 e# Y- r( S, V4 Z                        @._To:=PartsTable[6,i];
5 U8 t* W0 ]0 y* ]) A$ M4 ?                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
$ A- _2 I% N9 m1 d
                        end;
                        i:=PartsTable.YDim+1;
$ r1 J+ b+ n4 ?6 s" O# o! k, X                end;
$ f: z0 s( N: ~: Q                m:=m+PartsTable[2,i];
        next;
# X6 i2 |( V0 {2 x+ x6 H- G       
        Buf:=str_to_obj(sprint("BF",@._From));
. F8 P0 m  k( }0 t; ]0 }" B        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
+ s4 M5 h( \; b1 V这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

8 n! ~$ T# }5 j- e0 w% j$ h7 `非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的