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

热翔啊

is
6 U: I* q5 ?- c) v9 q+ @        i,no,m:integer;
        Buf:object;
2 |' T3 S/ F2 F) t: ]: _) N9 M7 Odo
5 F, H0 x' E9 r" x" ?        m:=0;
. d8 H8 q9 v4 d1 \' |. W        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
& @* j; r5 t  ]- J                        @._To:=PartsTable[6,i];
5 M' B6 r# m1 D1 W, Q. y                        if no=PartsNo+PartsTable[2,i] then
1 u9 s9 ?% j+ w9 B& X                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
1 R  p9 |, Y8 j0 i- |" D                        i:=PartsTable.Ydim+1;--跳出循环
                end;
# m$ w$ O. `  a                m:=m+PartsTable[2,i];
, S: ~/ f5 ^: F, u# ^                print m;
9 u) Y8 |2 b  O3 i. M( R% {8 `        next;
7 K! ^2 u; `8 J9 |7 D, l        --先将零件送到From位置
: e8 z2 n7 q- B* r        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
6 q9 V6 E; Q1 w2 A' H8 Oend;

, s) L) E. S5 u+ O& M" q这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
6 O8 J4 ?' g* @1 j不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
  n  [: b$ B0 t# Q! U; ]is
( w0 B9 |6 K8 T, w4 p' D  t6 ?        i,no,m:integer;       --定义整型
6 D  a( w* T' E( j        Buf:object;            --定义object
do
        m:=0;
: `! ^: t# ^3 H6 _# y! i2 i        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
" ~. s6 R5 I2 y9 y+ G                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
+ C& w% Y; p5 q" C                        @._From:=PartsTable[5,i];            
( {, \# @  ?4 }5 c% b/ t* j  [                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
, m: T4 t! ~. }' P, ?3 H
                        end;
9 B/ T& A) b; A) S1 }. v7 u5 b( d                        i:=PartsTable.YDim+1;
                end;
8 j$ Z* ~2 l  w+ [; J5 X: j                m:=m+PartsTable[2,i];
        next;
" K" R3 {! Q( h4 D' x       
/ j; T& |) m# d' q        Buf:=str_to_obj(sprint("BF",@._From));
0 L, ^' E4 r0 f  Y6 c7 g2 n        @.move(Buf);
end;

热翔啊

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

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