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

热翔啊

is
9 {' b, R! _+ X        i,no,m:integer;
        Buf:object;
do
9 x, h% n. H& `, \  D0 y8 ^        m:=0;
/ z9 }6 u) Y. p$ {        no:=@.getNo;
) u1 n2 |' n. Y& ]  S# I2 o) X        for i:=1 to PartsTable.Ydim loop
1 ]$ D% l4 y6 ^3 k                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
, o4 y2 k1 m/ A                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
7 L$ y" {/ e% Y* ~& G$ G                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
& m8 C$ d7 D6 Z# f1 X7 b2 D! A                m:=m+PartsTable[2,i];
5 Y% [3 c( r" F$ z+ v* B* W. f                print m;
, E8 O* T0 I3 `. L% M# ~$ j        next;
0 t/ R  G  C2 r5 p: l- ]        --先将零件送到From位置
2 `" u! e  p! x; }  g        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

. w8 ^' `* K4 j5 x8 J% f3 Y4 o这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
9 B& O: F# |, T! b不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
% ]0 h0 `# ^! n9 }        i,no,m:integer;       --定义整型
4 }' B% A$ e3 Y% w  C        Buf:object;            --定义object
& I( H1 i6 A. Q- L. mdo
$ A4 o# m3 g; h2 `5 f2 C        m:=0;
) Q% x/ T/ A9 g) w. k! s1 S) Y        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
3 x4 x! h9 \/ r8 G: x$ N- Z                        if no=PartsNo+PartsTable[2,i] then
6 H, c0 ^; X( p' [( a8 W7 I                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
% v$ B1 S3 y( v; U9 ~  u) M                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
4 g' P  n7 @6 c6 W. O        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
0 l/ j+ v, e% Q7 q! T; n9 |$ z        @.move(Buf);
2 O4 v% |5 h* A# yend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
# s: K: m! Y* J! k1 r. x这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的