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

热翔啊

is
' z$ Z: O2 Q. o4 V        i,no,m:integer;
        Buf:object;
4 |& C  U4 y. ]- {& s3 S: ido
5 \8 z, g' i! y+ s+ O. q        m:=0;
' W) }: g8 U: w/ ^) T        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
/ c. L4 g, b% s5 I; r                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
4 x) v( ^1 F* G& m                        @._From:=PartsTable[5,i];
/ l0 V/ ?! T8 k9 R7 V                        @._To:=PartsTable[6,i];
! L" @. k- N+ n1 J% h                        if no=PartsNo+PartsTable[2,i] then
' p6 l- U. x% B- I6 Y6 Z                                PartsNo:=PartsNo+PartsTable[2,i];
1 `$ @- s5 o: |! A- F  \, V                        end;
5 d. P' i' |- n4 @                        i:=PartsTable.Ydim+1;--跳出循环
                end;
2 I  W7 K" A* b4 o8 T# U4 L                m:=m+PartsTable[2,i];
                print m;
        next;
' N3 O6 f0 S5 {8 W( D0 y1 Y        --先将零件送到From位置
6 q  b5 u4 h! q8 W, h' _        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
5 |) L0 U- J# r% e6 u        @.move(Buf);
end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
$ t1 N) B/ [( d# ?5 [* m* c; Wdo
  U. R" m5 N! ]: D/ \        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
0 _. ?- P2 h* c( o3 [) C/ \        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
4 c% Z/ Z% Z- P+ ~( O                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
, y) _: a0 m( U, W
                        end;
; p! ]# T7 [8 _) T- Z2 S                        i:=PartsTable.YDim+1;
" t; c8 d# M7 G  G, D                end;
                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
' C& l' W  \4 @! ]8 J0 B5 ~/ s; }        @.move(Buf);
end;

热翔啊

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

! l) l/ y6 d$ o: ?非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的