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

热翔啊

is
; Y% j: |, Z4 H! v4 T( \        i,no,m:integer;
        Buf:object;
+ t0 K! k3 ?& \: Ido
" w6 }* o  H6 ~: Z& `# C        m:=0;
        no:=@.getNo;
7 T4 [7 ^& Y' r  z0 _* N8 i        for i:=1 to PartsTable.Ydim loop
8 R' n8 I( d  c  _$ i5 Z3 f                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
# b. L% q+ a3 k  s1 Q' q                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
: M9 F) m$ E7 D& I. z% f                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
% |, g2 J; [' O( M2 c# B                        i:=PartsTable.Ydim+1;--跳出循环
: L, l% E: @* x0 ]( P, J6 U                end;
                m:=m+PartsTable[2,i];
                print m;
        next;
4 ]- N5 S* Y; r7 \" i; b, n        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;
6 E: T& A, d6 d# T% ], ~
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
/ r1 x5 H8 b2 T, O% u6 h3 w$ {不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
% y$ g4 l2 f" n; u- j. p        Buf:object;            --定义object
do
        m:=0;
2 n$ D, D0 B4 G- f0 J# m3 w0 X: E        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
) y2 l/ X" C$ k. B' Q, B, I                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
8 t8 ?( S' u! A7 N1 }6 z  n4 q                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
7 T3 s8 r- _2 l
                        end;
                        i:=PartsTable.YDim+1;
9 m4 R! v' I/ o/ J9 ~% `: x6 F                end;
                m:=m+PartsTable[2,i];
        next;
       
6 f7 k+ {, m+ s/ y        Buf:=str_to_obj(sprint("BF",@._From));
1 ~* Y, R2 @! V9 j8 B; @        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
. E( b# ]: q0 }4 r3 h2 q, L  S" B7 i, _这个例子昨天正好看了，话说那本书的例子都很不错~
+ h) O7 x" N* D9 S; p5 v: O不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

) J, v$ l6 L* ]7 Z' ~2 E; s1 m7 V0 B2 i非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的