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

热翔啊

is
, ]- n( x; ?3 X' [; H        i,no,m:integer;
        Buf:object;
+ ?' o' V5 n* q* ]" l: A4 t% o1 O% pdo
: K/ T9 E- m; @& m2 H* L9 `8 f        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
$ X" @$ R. {0 v& H' d                        @._To:=PartsTable[6,i];
! i  V5 c# D( t0 W                        if no=PartsNo+PartsTable[2,i] then
$ @& W+ T- T* X' q9 x                                PartsNo:=PartsNo+PartsTable[2,i];
8 f- `( T3 U- K                        end;
' C6 ]6 t% A2 b& E                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
0 W* A5 @2 u( I& G/ l8 e  L        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
. V+ l; w, M/ {0 q3 ^. `% ^end;
% I7 f& \6 s0 V0 ^4 b* G$ I* ^/ R
, ^9 e1 H" r( o/ x2 ^) h这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
$ a. \- s: C& J2 p. a        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
4 K4 T) g, |' X9 w. Z' C1 Y# Rdo
- O& T- W& B8 L( k. V        m:=0;
! u( l! G! C+ L- G/ M7 o        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
) `% ?9 a; i& y( }                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
! V8 J! z5 F9 V0 l4 O                        @._From:=PartsTable[5,i];            
% m# m" r) P, f2 u% c- @" n) ?                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
5 R5 y) r+ ^9 d% }( P
                        end;
                        i:=PartsTable.YDim+1;
1 G( D' `  f9 l. c& b3 m1 V                end;
3 `4 h, }& w* ]9 r, W% H                m:=m+PartsTable[2,i];
: g" z0 C/ k1 c& q4 K        next;
       
, w' r2 E& l( M5 |4 l        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
* W. m. g" n. O8 G  ]end;

热翔啊

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

0 t, d8 u6 D: y4 X非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的