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

热翔啊

is
        i,no,m:integer;
        Buf:object;
5 n7 m- i( r1 _! L) T# e! X$ ndo
        m:=0;
1 K- j) S; i9 O        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
5 c/ }( Q" A/ z. }' S                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
  G6 U5 p, F6 E/ c                                PartsNo:=PartsNo+PartsTable[2,i];
, b' f2 @" i4 w  Y                        end;
* B$ k1 ?  u: f) ?; o                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
        next;
1 Q' v( e4 f( M8 H: c: V        --先将零件送到From位置
7 G5 G) |& ?, Y8 I1 M. i* L. l        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
" Y% I" u! e- y$ x. B        @.move(Buf);
$ S8 _3 \( b, U6 Yend;

7 C4 r1 g0 h, E) t+ Y! m1 P$ `+ t( B4 X这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
- a9 j; s8 y7 y3 H  ?) ^) q4 @$ n/ }( _不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
9 A# I# H5 r; q. g% A7 p  z8 Mis
        i,no,m:integer;       --定义整型
: e8 L9 j- ^5 a* i. x- Z2 z% U, k  B        Buf:object;            --定义object
do
; Y0 Q+ L# k5 d5 P/ j9 g        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
3 \% [( Q) G0 \% l7 o                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
& ~; h# y. Z2 y4 q' _' _                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

8 a. u/ x" Q$ p& c                        end;
9 J- l! ^1 ~: R  r! m                        i:=PartsTable.YDim+1;
                end;
& l3 R7 h3 l9 {                m:=m+PartsTable[2,i];
        next;
6 q& \. H% `& G" V* P$ L7 x       
5 d' O2 V1 \, G        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
7 u3 r8 H  s0 @9 k3 U- Jend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
5 z  M4 A! o% D) z/ P7 M- \这个例子昨天正好看了，话说那本书的例子都很不错~
2 @( ?; J: _5 o不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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