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

热翔啊

is
0 o1 S9 M$ K8 w        i,no,m:integer;
        Buf:object;
, V+ N: h3 F! W, \, `! T  Q2 jdo
        m:=0;
        no:=@.getNo;
9 c* S5 F; b8 T8 `4 V        for i:=1 to PartsTable.Ydim loop
2 [4 C5 K: \% s& k5 j. @$ w                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
- [, m& A( T- [! @1 R7 e4 _3 _                        @._From:=PartsTable[5,i];
5 n6 {2 l+ m; `. b$ t! Q                        @._To:=PartsTable[6,i];
9 x. g$ d8 R: q5 l, H' @& X, T3 W                        if no=PartsNo+PartsTable[2,i] then
- K( E+ i5 L- B" x# u                                PartsNo:=PartsNo+PartsTable[2,i];
8 E9 R" B5 u1 E$ Q4 q. X7 p                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
. h* ^. G9 Y5 {8 b. z& W                end;
                m:=m+PartsTable[2,i];
                print m;
        next;
        --先将零件送到From位置
7 ~5 R. g$ `! n4 A, n, T' a  \        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
- c2 [1 Y. u/ J: I& l        @.move(Buf);
# E  I( q% Q$ G: o0 J( Jend;

9 h" R) t+ G  |这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
5 @4 t% D/ J8 R; ]9 ?$ f0 D4 Sis
* ^- N/ B1 H  p) k7 u        i,no,m:integer;       --定义整型
* p0 e& b4 i6 X3 J# T( K        Buf:object;            --定义object
& _4 r5 T0 y( \do
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
  V5 n' _6 R2 ?# \0 K) C                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
2 j, w; _4 Z2 R" l+ x' z+ y$ O                        @._From:=PartsTable[5,i];            
% n, b6 U: e# e4 i: p, t  Y( M                        @._To:=PartsTable[6,i];
( b) o9 r  G7 F+ a) i                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
- V) u6 Y$ i, `- }$ @
                        end;
+ q2 U3 D6 `# T+ g9 r7 {                        i:=PartsTable.YDim+1;
! y1 y9 x6 K' @6 d8 ~. O* O                end;
0 b4 R: ~0 l4 p  I' r: x& B                m:=m+PartsTable[2,i];
        next;
0 u9 G2 S( ?7 C* r       
        Buf:=str_to_obj(sprint("BF",@._From));
: J( l& p6 y* \$ u; U        @.move(Buf);
1 i$ {, j! t  L1 @# Fend;

热翔啊

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

% q, @$ c  G! c非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的