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

热翔啊

is
( p4 d! p1 y0 }+ ]' o5 J        i,no,m:integer;
. y6 `5 n+ B* [( Y: k, Y6 l+ u$ r+ Y* z        Buf:object;
do
9 Y& i2 g  d  M* V! I        m:=0;
        no:=@.getNo;
9 y! }  ~# z6 V2 d( C1 O) ^4 R        for i:=1 to PartsTable.Ydim loop
. d6 O5 B2 b0 ]  f; T* m) l% J                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
% I# I+ ?: O# U                        @._From:=PartsTable[5,i];
7 c* d+ [* }, A$ R8 s; W                        @._To:=PartsTable[6,i];
' M, a' ?; j" z1 k5 G0 `, \                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
' S3 o- s- O$ h+ K- w5 p4 D                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
# A( M2 d: p% |! q& X4 o                m:=m+PartsTable[2,i];
5 \( p( g7 W  O, Z8 |; b" s* F                print m;
        next;
# z) n0 l6 R0 Z" [+ Z- k        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
3 A5 A* \# Y! S  K1 {        @.move(Buf);
& [; O1 E* p' U: H  f# m9 M( pend;

/ j) p2 k3 h& C5 c9 Y这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
$ i) y4 _6 |; j4 S不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
. o9 I( l7 W* U0 G7 i( Mis
! [. z5 e  X- f2 _3 y        i,no,m:integer;       --定义整型
; x4 e/ a& h1 }, ]6 N        Buf:object;            --定义object
do
0 C( h5 G8 i# _        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
9 G+ O3 K0 M2 e7 {        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
: x1 U; t9 \" [, l                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
) Q. E8 N- T# R                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

7 R+ b0 T, d0 K                        end;
; z+ u8 Y, O, K1 @# K3 l  f                        i:=PartsTable.YDim+1;
: C1 a2 K6 y2 k  ?* Z+ S2 m* h                end;
" y5 f. e' c  |- m                m:=m+PartsTable[2,i];
' v4 `4 M5 ^  R. d  b/ g        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
2 q4 ~% |6 T) H' u1 t        @.move(Buf);
+ p9 m) i# d* k6 R. |end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
& q3 ]1 ?. j' F这个例子昨天正好看了，话说那本书的例子都很不错~
; i& B# a6 g- d$ C" V4 C) C7 P不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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