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

热翔啊

is
4 m: u/ J6 ~1 |" h2 v        i,no,m:integer;
        Buf:object;
do
. J" x/ w# N; Q/ ]9 {, a$ R. }; p% k        m:=0;
        no:=@.getNo;
! e; w  |) _) C4 @/ u        for i:=1 to PartsTable.Ydim loop
" `: U2 |: P+ q! z# |) C/ X8 y' w4 y                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
6 m9 w) i! F) y& L                        @._To:=PartsTable[6,i];
3 V. f% C4 x4 D9 J' b3 F! _! U                        if no=PartsNo+PartsTable[2,i] then
1 m3 k) D" a; W0 i) p' T                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
7 ^- P# _0 r( ]                        i:=PartsTable.Ydim+1;--跳出循环
6 w; t: q5 G; N4 v  Z                end;
/ x; [, l# h9 ?. u) z                m:=m+PartsTable[2,i];
4 L0 U/ ]: Q7 C. ^! `: F* B4 r                print m;
3 N4 r6 \* f) D; T- M9 Y8 V$ H        next;
        --先将零件送到From位置
$ w0 G) o) m) I4 t' n6 G        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
3 H* m* }: j+ \! U7 o) o        @.move(Buf);
end;
+ [( `4 D4 u) N. A# q  T3 |% L
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
: ?( U& M' n! I) [- U, H6 h不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
8 ?7 Z3 m9 N  Y: ~( H3 D+ u        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
& b) i8 N4 Z  F! ~5 |& tdo
        m:=0;
7 g' H* I& w( b: r9 |8 Q% s' v        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
; {% J8 r; M5 f& }* t) ]        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
9 {, R8 S* q* K* ~* S) V
                        end;
                        i:=PartsTable.YDim+1;
' a  g( ^  X: C; r                end;
                m:=m+PartsTable[2,i];
& m& W( f- U2 J        next;
  d2 \# g3 Z- u, o# H( ?, d% Q       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
6 @2 m4 v" w1 E4 [, J+ [& Pend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
3 _- n: f1 l0 m) x5 f9 E; M; B这个例子昨天正好看了，话说那本书的例子都很不错~
3 O9 @! J. W" W7 e不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

9 A% Y# S: K3 x* Q& ~' K非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的