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

热翔啊

is
  Z- r* Y4 [2 r* l2 n- L+ U        i,no,m:integer;
        Buf:object;
" a) q8 k; O: m' T. a, r/ _do
: S' }: u# _' W# _6 V1 |        m:=0;
        no:=@.getNo;
, b8 j( F( b% j5 x% n) M2 D        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
! }9 J& p- L: a* ^' H: s                        @._From:=PartsTable[5,i];
" [" R4 V# k, |2 Q' u                        @._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];
                print m;
        next;
9 m2 l' ]" x; P! F* o        --先将零件送到From位置
$ g  w- l/ w5 @        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
/ k0 J1 x& Y) p5 [5 R% l6 g$ A* ?end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
+ k" _9 p  g1 V& P- U$ `3 }        i,no,m:integer;       --定义整型
0 A0 X2 c# j, L        Buf:object;            --定义object
+ [( X5 C/ z( S! g0 r9 {do
        m:=0;
1 _' b$ L5 I  n        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
& s: O1 v" _* ?( k8 c                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
" a6 z* {6 J) I4 V& M2 ]                        if no=PartsNo+PartsTable[2,i] then
8 x5 F" r) P. V5 o1 c                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
- g- ^$ |( @% _+ J( }5 X8 ]
                        end;
, J7 Y  _+ |/ Z  s0 C/ S                        i:=PartsTable.YDim+1;
. \$ W$ S4 U2 ^% }3 s                end;
. r* z: T2 `3 h' A7 @& \                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
8 d3 t( o% x" \( ?2 _5 o        @.move(Buf);
end;

热翔啊

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

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