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

热翔啊

is
        i,no,m:integer;
0 Z. h- I# h7 x        Buf:object;
do
# Z/ b8 H- A$ o3 M- Z& C9 w        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
1 j. P- [% L( C                        @._To:=PartsTable[6,i];
" I+ W3 s3 e/ Q* ^; a                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
, K% |% K: N6 \0 Z' a$ ]                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
        next;
$ p3 p: M( y/ X6 P        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
4 B2 z: y; q9 `- E. C4 J' }1 zend;

6 K2 j- N0 o- ^/ j: d4 r  h这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
1 Q# N0 \3 e* I- f不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
- v& }) z3 q% Iis
        i,no,m:integer;       --定义整型
+ p/ ?& {& W4 R1 V3 I8 n        Buf:object;            --定义object
* M$ Y# q6 ]- @7 f8 Ndo
  p$ a& R4 w4 a% ^0 ^$ A% ~        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
- a3 P6 u8 T: F7 b5 C. g. ^1 v        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
! f( |- g; k* Q- c                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
  X& E" ?: D; i! l. i! c+ U                        @._From:=PartsTable[5,i];            
1 z9 ?7 A. e7 w# R                        @._To:=PartsTable[6,i];
" R- I# `" N  n' t) J8 Q8 p% U6 q                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
9 }+ b; M* m2 R
% H) `# i& j1 Z2 A                        end;
4 ^9 D" M) r7 X                        i:=PartsTable.YDim+1;
5 P& N8 b; R- v3 z+ z% J6 f! x                end;
                m:=m+PartsTable[2,i];
        next;
       
# T8 g# O+ {# t1 g, M1 [        Buf:=str_to_obj(sprint("BF",@._From));
: y4 h+ o4 @2 Z! @        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
. q& R1 \' |1 d3 p" g% `" j这个例子昨天正好看了，话说那本书的例子都很不错~
6 L! }/ P* ?4 N4 a1 ^; ]不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

8 ~1 ~- B1 U$ v1 W非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的