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

热翔啊

is
% r) v3 l. W# }. h) b1 i7 \; V  c        i,no,m:integer;
# z) b7 ^8 `+ o3 P+ r! i3 a3 |        Buf:object;
do
        m:=0;
+ B+ Y. F: S" Y* @. E" ^        no:=@.getNo;
; ^' q; N" v% D        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
/ A5 U  P, k8 i8 H# L6 e* e                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
5 _3 M/ j" y3 @& }0 E                        end;
; x! o2 H6 R3 D, Z  N$ n; s                        i:=PartsTable.Ydim+1;--跳出循环
                end;
& m4 u6 E2 i* F' l- S                m:=m+PartsTable[2,i];
5 e2 |1 O8 f" n                print m;
        next;
3 M" @. g2 R) n6 `5 h+ J        --先将零件送到From位置
# l) i  X0 P) P6 _        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
; B/ h& V9 Z9 j! @/ @2 Z* j8 d        @.move(Buf);
end;

这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
9 l- \: ?0 \- E9 z4 Y不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
4 V. L* S- \  t2 F5 U4 D3 uis
1 Y' b; {) M: c% x$ E        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
2 }# x) u  S3 \' y* y  Xdo
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
/ S  b$ k/ L& N! K9 b$ N4 M4 w                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
' O: f  d3 b2 t8 Z; s% a! p! ]                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
, K7 |" t% Y3 {( N                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
5 n, \4 @1 ?  ^7 Y' O
                        end;
                        i:=PartsTable.YDim+1;
                end;
6 y' b( M3 j" {7 p4 a7 A5 w0 J+ A                m:=m+PartsTable[2,i];
; b. _( r+ S0 U4 N        next;
9 K6 f5 H1 \0 B       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
  ^; t8 Z  c6 \* s2 dend;

热翔啊

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

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