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

热翔啊

is
, p0 f4 J7 U: |4 b- V/ M0 L        i,no,m:integer;
" L4 y8 l4 K% W$ a        Buf:object;
5 ]: p; Q7 p2 o4 s/ L! P5 ldo
        m:=0;
" ?6 d4 d; f; M  s! |        no:=@.getNo;
        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];
                        if no=PartsNo+PartsTable[2,i] then
7 u2 f: z8 P: N* N; @                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
) T+ g1 S4 _; z* `4 C" L+ b* ]                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
% c, Y" T) P8 @        next;
- m: [# ^4 j9 C. Y        --先将零件送到From位置
4 ]" ?8 c3 B% L: {8 l        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
3 N. O' c5 x$ \, q0 u        @.move(Buf);
end;
% M* g, H/ Z- t1 i# A7 j# u
/ o9 r9 j, p& l" Y/ K这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
3 K: Q5 g: L- N; p9 p( Y& q# }不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
* Q( z6 E0 Z* e- H) B8 yis
$ ~; _3 U( \( e* @" v        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
" U# o. S0 u  Odo
  \) W- z  K4 M5 E* c' D        m:=0;
/ r$ q. p" L- f        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
0 f- G0 r2 z+ A9 r$ t                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
( e; v: e" J$ {! Z% F' J( M                        if no=PartsNo+PartsTable[2,i] then
+ K6 g8 A, C  D$ Y) H1 F                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
0 m9 E% i0 R6 q
! E# j7 g6 D& d" _                        end;
* `5 t* F& c( `! y2 L9 l                        i:=PartsTable.YDim+1;
9 {& v1 l! @! c                end;
                m:=m+PartsTable[2,i];
        next;
       
# Y# @. f* |* x! c6 F        Buf:=str_to_obj(sprint("BF",@._From));
1 S  y) N0 k% t7 r# k' ]        @.move(Buf);
6 K$ U: j( I- h- u( yend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
这个例子昨天正好看了，话说那本书的例子都很不错~
3 G& d- E+ q0 Q# H( R" o不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

6 d7 v6 b% r2 j' T6 i; U非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的