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

热翔啊

is
        i,no,m:integer;
        Buf:object;
do
' k6 X$ J. `5 C8 w+ q8 p4 P: A        m:=0;
+ ~1 G+ ?: D$ ?9 |6 t        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
& k2 Z* {* G. M- f                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
0 v" j) E* h0 Z! a/ j& K                        if no=PartsNo+PartsTable[2,i] then
& W* y4 N# b6 R4 ^1 Q                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
0 B2 R' Y6 ^, S$ I: k- q3 }5 @                end;
# O4 u, r/ b/ n  ]; v# b                m:=m+PartsTable[2,i];
                print m;
' G4 n: d% u) r- \6 @4 u2 z5 \        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
- s/ N( l( X, y4 I        @.move(Buf);
) W0 c3 S2 Q* S5 i$ t3 B5 Kend;
/ \+ h0 I6 H' I) [4 p/ {# a
% [8 x: c9 }0 N这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
- E. T# X+ n$ h: l% c+ a, W. ]不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
4 |3 s. x# V; N# }  @* @( Y, |        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
7 c- F" Y; N8 g( a* G( X& G% B: `do
2 {! a9 l6 h- o. E        m:=0;
3 A. m: E$ `9 s8 ~6 N        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
% m4 w0 z. P, w* U+ L- V        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
( y' ~0 G" O8 i/ g& g                        @._To:=PartsTable[6,i];
  u2 j" ~; ^0 {( _, l                        if no=PartsNo+PartsTable[2,i] then
/ L" j6 B4 c/ p3 S                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
, Y& s5 ?/ i  v7 G" n% z9 ^
0 H3 t7 T) n1 ]" g                        end;
7 m; u( l2 k0 z- E% n: I, t( T                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
; ~+ Z! K* u* s8 V( h       
: }& o' H2 ]/ |0 J$ b8 n% R" O        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
5 e. s7 h& J0 X  {9 ]这个例子昨天正好看了，话说那本书的例子都很不错~
* }+ a% m4 H9 e# a不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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