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

热翔啊

is
        i,no,m:integer;
1 f1 Z6 Y! o: q1 \" l8 ?        Buf:object;
do
        m:=0;
6 R3 Z% Z% @! _9 z3 ]( D        no:=@.getNo;
3 Z, k* h5 ~! C0 {  E, ?  B9 O7 \1 B        for i:=1 to PartsTable.Ydim loop
4 J7 i# V) _# R  s" `2 v                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
: r% u, x! q4 p- _) c" j                        @._From:=PartsTable[5,i];
2 {7 R: v6 ?; N: U. Z6 W$ k8 i                        @._To:=PartsTable[6,i];
2 S! r7 v2 M: C$ ?5 H: H8 f                        if no=PartsNo+PartsTable[2,i] then
2 H# B) g; c3 q) x, x                                PartsNo:=PartsNo+PartsTable[2,i];
2 Y5 m& ^) O& ~% \) [" A1 V4 I( T                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
6 Y& g- n( |+ Y# O8 s                m:=m+PartsTable[2,i];
7 o1 @+ D$ b7 \- L, s" g! \, d                print m;
        next;
+ s6 E2 G. S0 c9 _4 ~# x        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
4 n0 T# ~. r4 @* d# o+ R$ ^5 jend;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
( E. S4 p3 R# J6 mis
        i,no,m:integer;       --定义整型
* h7 U% q4 g# o8 f" {- h        Buf:object;            --定义object
% h) c  |  K2 \9 e  ?# pdo
        m:=0;
. a: H$ ^' ~( w1 y: ^  y' q$ a. \+ N        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        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];
/ T& T# ^6 s$ @" i" t4 a+ N4 E0 Y                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

2 C! F9 E7 \" }, e                        end;
( ]  G! K( _  z4 c, x                        i:=PartsTable.YDim+1;
                end;
' o" a0 Z) k7 p( ]- u                m:=m+PartsTable[2,i];
! Y; ^3 X! Q9 F1 O! t        next;
/ q6 H9 _2 v4 O: ~# i- ]       
) \; n1 [0 o, R/ N# t5 m        Buf:=str_to_obj(sprint("BF",@._From));
* T1 w  _+ {% L- W8 j        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
4 b1 Y3 `, z: }9 B& s0 y1 J" \" P这个例子昨天正好看了，话说那本书的例子都很不错~
& h/ `0 q- P& Y不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

. O9 O0 h$ X" _# X! T非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的