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

热翔啊

is
        i,no,m:integer;
        Buf:object;
) f0 s* F+ x3 o  L$ x0 p/ Xdo
        m:=0;
( I; G7 @! D# @" r+ a8 q        no:=@.getNo;
/ `( L* A  n: [3 l+ j        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
9 A* g. [3 V4 U& I( q) g& b2 D                        if no=PartsNo+PartsTable[2,i] then
: t" m) w. L8 R8 P                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
) f) u7 V/ E; }( R- d! y  _  b                        i:=PartsTable.Ydim+1;--跳出循环
: S7 g/ H7 }/ Z5 s                end;
4 {. w$ {" f3 V9 `$ ?                m:=m+PartsTable[2,i];
/ J* W# r7 b3 t0 j' s! e/ ?# [                print m;
        next;
: k1 {+ f2 t6 f& N        --先将零件送到From位置
) C2 M- P4 w/ U3 l  |( {3 w# l+ s        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
; Y% B; C0 W1 H/ R8 ]/ R        @.move(Buf);
end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
8 k4 A+ t; G  g8 I+ r/ J6 i# `不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
6 I3 S( G. \$ R% T$ X! H7 z# Y! _" Bis
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
5 d( B) w, h+ R# A& Z2 m                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
  {' C9 ^7 C" I! z9 \+ i                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

) Z$ g" P5 B" ^: c& a; L4 F- U) ~                        end;
                        i:=PartsTable.YDim+1;
                end;
6 |) X2 P4 V" O( s. ^) F, _3 L- P                m:=m+PartsTable[2,i];
: g  `7 x6 O. b# S        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
+ k2 x* Q) }  ~" q- i) R7 I6 X        @.move(Buf);
end;

热翔啊

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

( w' N( h1 B) z6 u) c% H* G非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的