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

热翔啊

is
        i,no,m:integer;
& J" m2 q2 m, c' T6 M- K" H        Buf:object;
- Q! x, ^: t3 l; |3 \do
        m:=0;
        no:=@.getNo;
0 @  X. t' x/ E( d& H- J        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
' H, J: J! N: R9 V                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
& i* c' ~- X& q( l( X                        if no=PartsNo+PartsTable[2,i] then
: C7 Z  z$ b% o8 q; Y                                PartsNo:=PartsNo+PartsTable[2,i];
! p/ D5 K$ I* c  b                        end;
7 F' {1 O/ a0 x% }7 R9 L                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
5 R* s2 ]2 p. z0 Y* f! A) O                print m;
" j. I  P0 A9 Q        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
4 z/ w% l6 V; _" j        @.move(Buf);
5 D  E& n* u! X" ~end;
; o9 o" w- Y7 x5 h; `6 l9 Q* k; x
2 V, x; C( W9 p0 ?+ U这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
  j: B5 ?, ]& ?4 X. h3 S" O& }4 J不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
' q0 z& R# d: q* Q& q& w" n- O/ uis
9 ?  a( M2 I. l        i,no,m:integer;       --定义整型
4 h7 n- K' v4 t! _; x, |" d# l& C        Buf:object;            --定义object
do
  \5 f3 K4 s' _8 }5 j        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
% N) R) k+ A+ d5 J        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
2 l+ ~6 ]) ~- V6 L8 z- ^                        @._To:=PartsTable[6,i];
  A6 s1 J3 A' C0 `2 R4 F* b$ Q* B: n                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

! q9 Y$ c7 H' h5 e: p: k                        end;
+ V" D0 j( n1 a+ ~                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
+ \' s$ O; Q" K/ M- Y% u        next;
9 E' h9 u# [9 A: U7 Z( d7 V       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
( U0 M: \  @' _3 x1 T  N$ f% Zend;

热翔啊

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

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