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

热翔啊

is
        i,no,m:integer;
        Buf:object;
& n3 {1 m0 n$ h- K& G) D/ U+ b* Tdo
        m:=0;
  N: L7 Q+ C" ?/ k        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
7 x! k0 s) S8 X6 p. D                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
; u& r! A3 J6 @5 c                        @._From:=PartsTable[5,i];
+ I* c! U  G, F                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
8 L, ]6 I* `, U" m9 b  j                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
* b% B* a" w% ^! }2 ]* m                print m;
        next;
        --先将零件送到From位置
) q* _3 ?* K5 s0 d' X2 |. S        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
- a% Z. \/ i8 c. n) r        @.move(Buf);
5 O6 m" c; P3 ?4 N1 p! O; Aend;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
1 W7 `+ b1 n2 r) ^6 e, g8 S不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
+ e+ u$ X- Y: A: J9 v2 c* _( }- ?9 qis
        i,no,m:integer;       --定义整型
' |/ n! y) a- c- L" I1 e0 s        Buf:object;            --定义object
do
9 I. D/ s2 R, H( ]  @/ ]        m:=0;
6 D& y$ E# G8 N        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
- |% |: F5 r. S5 @        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
9 A% q( a; \1 h6 @                        @._From:=PartsTable[5,i];            
& z8 M; D1 W& K6 h' ~$ @9 H* k1 T                        @._To:=PartsTable[6,i];
) [8 Y! i7 Q9 ]8 C                        if no=PartsNo+PartsTable[2,i] then
# h! M6 O- Z  J4 c3 b. B1 `                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

. R2 L7 m# @% s. \; m3 m                        end;
                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
, A2 G# J( v+ e       
        Buf:=str_to_obj(sprint("BF",@._From));
  c/ C2 d/ D. z5 R: k4 t5 [" {        @.move(Buf);
) @6 H8 {( @5 h, e: pend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
+ V- G; ?% [. _这个例子昨天正好看了，话说那本书的例子都很不错~
$ U+ V, W" ]* e  W不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

7 h# ^1 k& X9 E3 y7 [* l: ~非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的