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

热翔啊

is
1 P- r* A8 F, h! ?5 H8 B        i,no,m:integer;
0 ~( B* H  r9 X, z  m. x8 T9 c* `        Buf:object;
: s$ M8 G. R% |do
+ s$ j3 E' ~- {3 i        m:=0;
        no:=@.getNo;
' \! q3 {/ P1 }& r. \$ M0 h, G+ i( a        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
  C1 N/ ~7 t0 e# a) ]2 V                        @._From:=PartsTable[5,i];
6 H: }7 K% F1 I# D1 d                        @._To:=PartsTable[6,i];
. d" B- e3 D7 i; T! f4 O! k: |1 b- K                        if no=PartsNo+PartsTable[2,i] then
1 v) U& b9 W6 L% w                                PartsNo:=PartsNo+PartsTable[2,i];
& H6 S& v+ h& E) \1 U' |. q" P8 }                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
: v$ ?! e5 n; |0 ^                print m;
        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
% R, @- Z$ z4 o* T( k        @.move(Buf);
# H! m/ N0 M* a; r2 k; R0 h7 Lend;
! L. ~( c  ]' N. [( B
7 ?. F; z( b* D: I这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
& _2 t: p# k- ~; Q! i        Buf:object;            --定义object
do
        m:=0;
1 L, ?9 S1 n( G7 I        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
5 I6 ~0 X+ I) t# \  v                        @._To:=PartsTable[6,i];
  A5 N) l: y- e1 o0 @' U& V                        if no=PartsNo+PartsTable[2,i] then
, B$ K! b! j5 A! }( d                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
. {: l. z4 l; t: a7 P                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
5 Q9 @( Q: V3 R9 H+ o, c0 J        next;
& }$ |" U9 y0 ~0 g0 |, J       
5 c/ }. H! b8 e3 n; |( Z' G        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

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

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