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

热翔啊

is
6 I- E8 {* q3 J" A. ^; _        i,no,m:integer;
& u1 }! ~1 ^, J& a) H' o& }        Buf:object;
do
8 P. Y; t/ D$ \7 r; C. H        m:=0;
6 p+ P- k* J& g5 }5 x        no:=@.getNo;
! t1 ?' K9 I. F        for i:=1 to PartsTable.Ydim loop
: y/ y8 u0 `  x% _                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
3 j% |+ C# j6 z- ?9 r( X: A+ Z                        @._From:=PartsTable[5,i];
% c& C. X7 g# e+ m5 d                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
9 \) T6 T, ^( ^; N) [: A, I8 w                        i:=PartsTable.Ydim+1;--跳出循环
4 \+ R3 D. K; b  T; Y6 _/ W                end;
2 |. P4 W! }+ z6 i$ {                m:=m+PartsTable[2,i];
! k$ s, j, S4 m7 {: X/ V( {& P                print m;
        next;
1 f6 m2 |% L) n6 x4 M& G& o8 R8 ^        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
! r+ M: G1 o7 Q0 n3 L) p        @.move(Buf);
end;
) a" L5 y% p4 K& V" l3 C
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
) g- R- B" V. u, B        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
- J  {( s, Y. c9 ado
4 m/ I  Y( h5 e1 f        m:=0;
7 O( `( p; v* c# x+ Y6 b        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
- K8 B% Q# i; d7 x) [1 a        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
  U4 A2 l; j1 \. |                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
( q) z& F  w/ J% I# S                        @._To:=PartsTable[6,i];
. I, T& H  s* v                        if no=PartsNo+PartsTable[2,i] then
3 q$ u) g7 f3 M: |  s                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
* ?5 Z6 M0 C' G
                        end;
                        i:=PartsTable.YDim+1;
3 L- |# s- U! _                end;
" E$ S9 Q2 Q( l. _  _1 y                m:=m+PartsTable[2,i];
        next;
/ N: G  m" ]7 Z7 B6 a& x       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

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

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