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

热翔啊

is
4 s& x- [& S) h( X& Z" `3 L( ]        i,no,m:integer;
        Buf:object;
! k! U. U: v8 kdo
        m:=0;
) t' Q$ ?8 V8 g( o' Z        no:=@.getNo;
$ G: V0 ?' [4 C. x5 s1 Q1 h0 T+ |        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
, Y/ }' W0 B; @                                PartsNo:=PartsNo+PartsTable[2,i];
8 p; E; F' C9 u7 r* ]                        end;
! w1 E" F4 t' i6 p                        i:=PartsTable.Ydim+1;--跳出循环
$ u( S) Y- S( t8 J' w                end;
                m:=m+PartsTable[2,i];
& b+ H5 o) U+ k6 G$ k/ F8 K                print m;
        next;
! m8 z0 W( l9 M  N3 p0 D8 g        --先将零件送到From位置
# K0 ^% {. L  N' Z, {2 U: K; O        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
4 f' y7 h7 _4 g        @.move(Buf);
. [' Z& P1 ]- Bend;
' M2 ^$ q  u( Q( \: l* k9 o; L
. u. J( N, T2 ?1 p4 h+ l这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
1 Y; S" r& @# a6 L9 i        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
7 b/ Z7 [2 I" N& A. z# r7 g                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
9 [# x$ N0 b$ A' U; \& a+ G7 d                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
* ]0 }2 i7 R0 w, b% X! m                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
8 u8 [' E3 M- ^6 W
4 B) k0 Q. H  J* `! k* q( \& o                        end;
                        i:=PartsTable.YDim+1;
                end;
9 l9 |) w  B7 l3 x3 \) u) E. }, J                m:=m+PartsTable[2,i];
        next;
0 a: m4 p1 D9 [; r9 w       
: m* {4 ]# J5 Y# d( r- |6 {) e        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

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

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