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

热翔啊

is
2 S4 J# d4 }0 a! s2 h        i,no,m:integer;
        Buf:object;
1 e/ v3 w: `# p$ x. |; A2 T% sdo
: M, s0 x( ?% m) X: E1 e% {+ \        m:=0;
5 l8 }) e  {7 H9 O  T        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
6 Y  ^: Z+ ^, j                print m;
        next;
) {, A- u9 u8 R1 \        --先将零件送到From位置
0 u0 t* Q5 z# v* a1 [0 W* Q        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
/ @6 Y3 m3 E% W4 i' o* ?* N, Xend;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
1 M& v6 `$ D, i* r; ^不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
7 G6 ~: `# l% m  z/ dis
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
: P/ V) |( i8 l: O* O+ q" s        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
# s+ [0 h: A( v3 `/ t                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
1 D  O9 u' g/ k, i
3 d" c+ \- ^5 N0 b9 ?: J5 R                        end;
                        i:=PartsTable.YDim+1;
2 p; V9 d- Y0 q( n2 g                end;
0 Z* R/ g; G( B' M1 I) U                m:=m+PartsTable[2,i];
4 F4 e* M$ y) @        next;
' f# ]. d6 D5 P8 B* T6 w( {       
        Buf:=str_to_obj(sprint("BF",@._From));
* J& {, k: j& C/ V) e( O. i; x4 S& G        @.move(Buf);
end;

热翔啊

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

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