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

热翔啊

is
" S5 ^  H3 k% v* X- ?        i,no,m:integer;
% Q/ ^9 T  r. W( O/ t8 M        Buf:object;
do
- a5 N; S: }* u0 k8 s# {        m:=0;
4 V+ r: v0 W+ W  n4 }6 t        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
3 K" \  `5 p! s+ T' {                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
5 M, H1 e" I3 ]& p7 M! f                        @._To:=PartsTable[6,i];
: e* d' j1 S' H/ \  o. r                        if no=PartsNo+PartsTable[2,i] then
6 N% {+ e) _% t- P0 I- L* K                                PartsNo:=PartsNo+PartsTable[2,i];
& w" f" }. E  |- H                        end;
! J- u, h. [1 G5 Z! f                        i:=PartsTable.Ydim+1;--跳出循环
: Z3 G: e: y  V9 r' O+ V: X                end;
                m:=m+PartsTable[2,i];
( I2 m. n" q" _                print m;
        next;
6 c1 T* x- Z, D* A" H- d        --先将零件送到From位置
5 v+ W4 W8 I1 s7 S# L6 d" _        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
+ B2 D# G8 M/ J% |end;
% J8 f$ h& c# t* ]5 C' u! {
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
, e6 M' b7 K7 e  n% j- Y& a不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
  C, D. h' A$ S) [7 Kis
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
0 Q4 m2 p2 E: W: I3 a3 ~        m:=0;
7 S  \4 q3 |: q- Y        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
+ Q# V+ S, K; l, n        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
  {7 Z* s  l& E" C9 M                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
% [: P/ M6 d' Z7 C: {0 S. ^( T                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
1 {& v  U7 h& E% E                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
2 d% `, a* o4 O' l8 P
                        end;
9 l% L+ Y+ @2 S8 Z+ i                        i:=PartsTable.YDim+1;
) h: X# G, l; a6 z% P                end;
" }) B  X; p. w/ U& W- V                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
  K$ t0 |3 I% W. f/ J& i% L: f        @.move(Buf);
end;

热翔啊

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

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