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

热翔啊

is
        i,no,m:integer;
        Buf:object;
0 w; |# M. ^% z( Pdo
        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
: T/ x1 k' f9 Q( i                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
8 a* _  c# x0 {+ f2 j                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
& }- F* z8 p: N  G: D- ^                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
1 S* h/ y4 B- h6 h4 L5 k9 V- ^                        i:=PartsTable.Ydim+1;--跳出循环
                end;
: V$ w* m$ Z( D  _1 m                m:=m+PartsTable[2,i];
  h9 O# h1 s: b8 c- G                print m;
        next;
        --先将零件送到From位置
, f! k+ s7 ]  k4 m8 E        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
+ [$ I& _) e6 j: N; f& a" D        @.move(Buf);
end;

' P; f- p& O1 _8 A3 G% ]这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
5 k& C7 u# R% p* X! v1 s1 P% f# C1 cis
0 [# @: l% S+ Q0 s4 [        i,no,m:integer;       --定义整型
& l, I# {. l% a" N  n        Buf:object;            --定义object
do
        m:=0;
0 U" w! Z+ a" V$ d# E        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
0 m/ R+ D  g4 P$ S; @9 D! M5 V. M                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
; c, ]1 Q3 x2 z( z                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
  h/ L( w( t% e: V. i( h                        i:=PartsTable.YDim+1;
" m5 K" _$ Y6 T3 U                end;
8 N# m5 f- O3 h  X                m:=m+PartsTable[2,i];
- [" W# p4 O: i# f; k4 Q: h        next;
7 i) g2 h( k- s       
        Buf:=str_to_obj(sprint("BF",@._From));
2 O4 e8 j% I( D7 N, h  f        @.move(Buf);
end;

热翔啊

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

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