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

热翔啊

is
        i,no,m:integer;
( X' X* V( m& i8 L: S        Buf:object;
do
2 K" @1 R% I" K7 S        m:=0;
+ S. @9 p/ |. [0 a        no:=@.getNo;
* m  E* R. b; b        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
- T# m+ Z6 \( k* m6 D6 I                        @._From:=PartsTable[5,i];
$ j& i( K& V! C# ]. n4 _9 O0 X' N0 j- w                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
) f; [. ?0 V. v4 I5 B1 n$ g+ S3 g9 t                                PartsNo:=PartsNo+PartsTable[2,i];
2 E5 X/ a7 o! O                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
- r) D4 U* `, p0 Q* r" J- v                end;
/ [: F. u& A  p  e- d2 M; V                m:=m+PartsTable[2,i];
                print m;
2 Z4 c3 n' U2 ^9 S! p, y& L        next;
/ V$ |6 J8 T; I        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
: v4 a( l2 B: L        @.move(Buf);
) `" D2 }; x- K, Y- ?end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
9 c' j) o  j& ~( w' m6 ^is
        i,no,m:integer;       --定义整型
5 N% F4 A$ _. X. c( k- u        Buf:object;            --定义object
) D' b+ C# P' Pdo
        m:=0;
1 ]7 y* Y$ s- n, V        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
" i+ i) D/ d3 }& I        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
' A/ l3 J* F0 A: b                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
' {5 }6 h- x! j+ y/ F5 v                        if no=PartsNo+PartsTable[2,i] then
) l6 M9 f0 `$ f; G7 V3 Y                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
- w4 C; Q9 n# `5 R1 A
                        end;
                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
- o+ v* }' A7 r( b' U        next;
+ A4 _! \& @/ m. S! p8 p& d       
        Buf:=str_to_obj(sprint("BF",@._From));
% D8 w! [% g8 j- i3 z* V        @.move(Buf);
end;

热翔啊

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

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