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

热翔啊

is
& z; y3 c- G7 R        i,no,m:integer;
4 K, L. K" ]1 ?) b        Buf:object;
/ L& Q" A: Z  {* bdo
% A  d/ y# f, t& b. ~% k  p+ I: F        m:=0;
! H) \* Y, Q, y/ ^3 c- X        no:=@.getNo;
* s6 s# z! w7 h, w6 v        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
3 ^/ J- _1 i6 P                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
3 E, \. ]4 L/ K& O4 F, B  H; f                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
- C) t4 J) g) _0 m: Z9 l$ ~                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
        next;
        --先将零件送到From位置
; l6 e$ F- A- }8 K        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
. L  |/ s) w4 |: k. z- W0 Y        @.move(Buf);
end;
' X' J+ K/ ]2 `) o/ r
& E" n# a% k- H  m这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
4 N- C; N  z" r* I3 J6 udo
        m:=0;
/ ]! r0 e, V: E0 Y( M4 i5 z        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
8 m/ l! _) p# ^& J) q* v                        @._To:=PartsTable[6,i];
. c& {, F' x8 |; J0 X5 R( F                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
  i/ G& j) R$ s, F3 `* P/ G( @
                        end;
; S4 E8 K* x  s0 @6 @* N- o# h$ E                        i:=PartsTable.YDim+1;
0 c* n" |1 A) ]1 S6 b                end;
) X' t$ _  s1 h6 Y' j                m:=m+PartsTable[2,i];
        next;
       
% Z( j9 u+ d7 s/ |8 E0 h7 J        Buf:=str_to_obj(sprint("BF",@._From));
6 n, n8 @8 [; C( _# W        @.move(Buf);
$ a  u& `& l* Q  ]3 ?! wend;

热翔啊

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

( v; f% \1 T7 X" r# d  Z1 J9 x非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的