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

热翔啊

is
        i,no,m:integer;
        Buf:object;
do
        m:=0;
3 ?* q% \2 m; a/ ~" _- }+ i        no:=@.getNo;
& d8 j: Z* p! \- [0 S        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
3 _& k8 g* b4 j% z3 f                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
- ?. r# E# j) X) j                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
5 l: K$ C7 j/ G1 u5 K* q                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
        next;
        --先将零件送到From位置
6 y1 K. ?- L6 s% x) I        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
" O7 W$ `7 u9 M5 W5 A9 T5 ^end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
  X" [( ~% n$ ?6 c+ W8 i% q4 M不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
9 P2 [& x7 v- _# \/ ?7 p        Buf:object;            --定义object
do
4 K9 j* `- t) E3 Z4 v5 N        m:=0;
% R( r) z7 d  \0 n        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
, _0 F' W: N) F% @5 ~        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
' I4 f/ i2 Y8 {+ X$ K                        @._To:=PartsTable[6,i];
( g9 n/ l9 Y( \; ]9 O2 L8 l9 ~7 i                        if no=PartsNo+PartsTable[2,i] then
3 ^7 M) ?# V' k: X9 s8 T# B                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

0 \: L( d6 X  {8 T. M                        end;
                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
       
5 P: [$ {8 x! \        Buf:=str_to_obj(sprint("BF",@._From));
" U5 O& x" i& i! F' q& Q        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
* _1 Y/ d5 ]0 [3 S6 N4 J& [# Q这个例子昨天正好看了，话说那本书的例子都很不错~
+ L) f: G( v: h* Q* Y6 c不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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