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

热翔啊

is
& w2 Y% n. `, g: e- s) T% z; u        i,no,m:integer;
8 v, ^+ r4 \7 @1 u6 v' @: {+ j        Buf:object;
3 X( \) y4 Y7 q3 tdo
4 i3 l- L9 @) Q' S        m:=0;
        no:=@.getNo;
& g  g1 z4 G2 W' Y2 l" ~. i7 ^: Q        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
1 W5 X  E3 `8 J5 b$ ?& X                        @._From:=PartsTable[5,i];
! Q" H0 H9 M0 B                        @._To:=PartsTable[6,i];
0 r0 y( E& u: q+ E, J* @                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
1 o4 ]% z1 ^- Z0 v! ^                        i:=PartsTable.Ydim+1;--跳出循环
% N- K' R2 L6 T( M& n% W                end;
4 R9 Y4 t; x" s5 _, u                m:=m+PartsTable[2,i];
- ?+ D. E6 y! C" n/ `                print m;
+ u4 ^/ G) C; q( B: o8 V        next;
5 _" {) _! k$ F1 X        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
* _( ^$ K1 n$ Zend;

. f4 i/ T7 Y; @; }$ o2 O2 \9 @这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
1 V2 I% t4 D1 ]2 J, a* ~/ j不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
; V8 T! Y. d7 f" H# g; g* x  f8 ]7 [        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
  L" T' t3 Q3 T( z& tdo
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
9 r: U+ s% n! ]                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
! x" A' {/ M% r* t3 T                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
7 `' f+ V9 C- b' k9 n1 w# J3 ~
                        end;
) A3 W9 M( Y) [                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
) b0 q6 C4 Z+ ]+ n* V5 E/ }       
- r& c; M8 j, @; f9 G; z2 _! b/ Q2 |        Buf:=str_to_obj(sprint("BF",@._From));
; C. B) s9 D2 |2 C        @.move(Buf);
# u! V( O+ m1 s+ Z& f7 k; ^end;

热翔啊

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

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