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

热翔啊

is
8 {6 O( [6 _+ E. U) T- h6 k        i,no,m:integer;
        Buf:object;
; H" |; E& i/ N! Y. d8 f/ d% k1 Cdo
! d' |1 a' v* q; `        m:=0;
# ]- y7 c" Z% ~; U        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
; H0 R8 {) d) A& A. H' g                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
5 V0 u& ?' {" D                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
8 s( l  v* D5 w8 n                        i:=PartsTable.Ydim+1;--跳出循环
                end;
) k0 z* C, @/ A* d6 X  M                m:=m+PartsTable[2,i];
- m5 u! g: \+ l- k                print m;
        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
# T6 B8 _5 D1 J0 [        @.move(Buf);
1 M8 T6 V& @/ }. j3 Q' N% Uend;

  \8 i& F7 I" t  Q这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
5 h& Q, V: c( d: Q# D不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
5 S4 c& a: {, V) w0 n: n$ P* g        i,no,m:integer;       --定义整型
. C9 @3 S' L+ m3 d& _! w: A        Buf:object;            --定义object
, e0 a( p$ L7 v- ]7 Z2 @do
( X7 |* T' b( @        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
% c2 q7 b0 N1 O                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
) _7 w7 u& L$ x  E$ L; i7 d                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
$ d( v+ `2 A( o1 Y' |& z% H
. p( I, u4 Y( h                        end;
4 P/ J; u: x4 @* o1 r% ?0 b                        i:=PartsTable.YDim+1;
                end;
7 f4 E* h' Z3 S                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
% R! a5 V  U3 X* Y1 e* fend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
& W* P( U& C* m4 J) I: O' e$ Y这个例子昨天正好看了，话说那本书的例子都很不错~
2 u7 D. p8 R( M4 d不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

+ c7 ^' n( ^/ y' {" E% _非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的