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

热翔啊

is
& O7 g/ j( u8 k; a" f1 A9 k: x        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];
- a% W( I4 v1 h8 [* H( E                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
- K" h3 _* j) ^& b4 p5 P                                PartsNo:=PartsNo+PartsTable[2,i];
! o( J! B/ M& o                        end;
8 M  ]+ A3 Y( Q                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
* b7 \  l! R0 ~/ j1 ]) u                print m;
* L3 F# A5 i  b; K1 E" J: r        next;
4 k* u, E7 I6 x& F. b        --先将零件送到From位置
# h7 K. h/ [1 w2 T        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;
; y6 S& p) |7 Q* s. d' g* `1 _
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
' n' g! B" s* T* Fis
( c. ]& n& S' ]% R4 S; x7 m1 E4 J1 ~) o        i,no,m:integer;       --定义整型
9 D+ o* m. ?. R; U        Buf:object;            --定义object
do
& }+ Q3 Y2 e2 q+ N( |        m:=0;
& \9 d: h/ [' w: {& `+ h        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
2 G: J4 r7 U# c2 v        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
1 q* o# O5 f5 B1 t8 s6 k! s                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
# x6 b* D. _6 u0 a1 Q4 ~  u                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
5 Q3 s" `3 h. c  N                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

) {+ _& m- X# ~6 j* L! h7 T                        end;
+ P/ n6 m0 ~, H& |! U) u                        i:=PartsTable.YDim+1;
) U' F4 R/ ~5 p$ V- G$ J                end;
                m:=m+PartsTable[2,i];
( ]- {3 Q; M3 U* a        next;
       
3 d" w5 U5 @) P6 r        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
这个例子昨天正好看了，话说那本书的例子都很不错~
6 u7 C( v4 I$ c/ s" E. p8 ~( Y不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

6 W3 A( X4 B/ g# @' _1 F" A非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的