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

热翔啊

is
/ T0 Z; N2 [: Y4 ~+ H: j3 b9 R        i,no,m:integer;
        Buf:object;
do
        m:=0;
        no:=@.getNo;
. X+ g, V  }3 U  S9 M8 h        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
0 `# Q( G2 T3 k9 c+ J4 O3 v                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
+ X% A- E* M! s' F  U8 [% Y7 p                        i:=PartsTable.Ydim+1;--跳出循环
                end;
( u7 p) G- b5 a                m:=m+PartsTable[2,i];
                print m;
        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
- H# b$ }/ u' M- B( F6 T: jend;

( v) F! ]! i/ M& ?4 |这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
+ P" f, O. B8 S% M3 P& B        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
; H) P9 C7 H; k+ Z0 Q( i4 \% [        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
; Y" @% d6 r1 G, U5 A        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
" O- T4 r8 G4 a9 \/ o- G5 V  }, Z                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
4 v8 z. t; k3 Y& N7 m( Y                        @._From:=PartsTable[5,i];            
/ L% q2 W2 j: e' S6 S  W                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
$ K  ~) u1 `0 e7 m8 B                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
( U- r2 X1 X0 K  j1 ^' C- C
                        end;
, H0 \7 d" u- _6 K5 A: Z) N" L+ L                        i:=PartsTable.YDim+1;
5 Z, k) w. L. s& E& @                end;
) J4 @  A5 a/ p0 X( y                m:=m+PartsTable[2,i];
        next;
       
& Z$ `, ?( U( c2 f  [& O4 |. Z        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
# z+ x& @" P. H& [  ^end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
/ j( ~3 g5 f, A2 M) R6 a$ j# D这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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