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

热翔啊

is
        i,no,m:integer;
        Buf:object;
do
4 c0 m" Q; ?; e: ~9 {        m:=0;
5 Q  L. Q5 z% I- ~! Y! @2 u9 b        no:=@.getNo;
5 |* r. U7 k& v4 a+ r        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
! X9 T, ~* z8 s( ^& [% ]$ ]- F                        @._To:=PartsTable[6,i];
- R7 Y& Z: p4 R& {, W, v                        if no=PartsNo+PartsTable[2,i] then
! T' y6 A$ N$ Y* n                                PartsNo:=PartsNo+PartsTable[2,i];
' B/ X1 n2 _5 w. ]8 {7 u                        end;
: J' C' [$ U' I2 D: ?                        i:=PartsTable.Ydim+1;--跳出循环
( p" j: ^( ~: V. [2 {5 k                end;
                m:=m+PartsTable[2,i];
                print m;
$ U, P/ X0 |% U, w! i  O9 N        next;
        --先将零件送到From位置
( C3 n/ L; \5 {' |        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
. L! q3 c6 A: E% E- u! g* _! O        @.move(Buf);
. J" a& X3 i# t8 Eend;

) `, ~- O" m3 ^' D这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
1 z3 b1 w. D: s6 P5 p/ _- s& Y不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
; L  Q9 h1 L7 @/ b4 k& Xis
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
4 Z: ]0 b# h' y, u' z0 \" o1 Kdo
! E2 F3 `7 i. I& w' _  W% Y) Q        m:=0;
. \" a; k3 p" H: J- _; K4 g) P        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
! ]0 W3 N) t8 e: Z                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
' K0 r" p2 v: v# i* @! k( a& ^. |                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
* {: y" w, N- k) H4 h, T
7 H% y3 Y3 M8 c8 G2 H/ G. N! `+ R% Z$ H                        end;
                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
6 U9 P( E% Q6 }  V       
/ }/ ?3 D4 t4 w3 g. P        Buf:=str_to_obj(sprint("BF",@._From));
5 V$ N2 x5 Z# r# b( o0 W4 L        @.move(Buf);
4 N: ~. `  F& l& j  n, Uend;

热翔啊

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

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