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

热翔啊

is
) ?; s6 B& y9 L        i,no,m:integer;
( k; Q0 V. x. B4 f2 W+ V        Buf:object;
do
        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
4 |: B- @8 ]0 c) j9 P' ?% w                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
2 q/ `1 w: L. ]: t* q7 U  A                        @._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;--跳出循环
) `/ ]7 J7 b( o                end;
6 u  T* t# Y/ M7 Z/ I- i                m:=m+PartsTable[2,i];
                print m;
        next;
( @9 f: D: L0 w. o* V) }        --先将零件送到From位置
/ F. ?, l1 @5 L1 \        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
! ^! K3 j+ z5 ~) c5 e. F, wend;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
* c$ v4 k& K; b) N# F) m) I& x        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
' n% L- q* M2 C! h' ~) mdo
0 x( t0 B. _5 p$ i4 v; v0 {        m:=0;
7 r8 x9 g, M" q9 e0 `# }. ?! @        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
1 h7 d+ J6 q: ]2 j        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
9 N) y# R# L9 P2 D  R$ @                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
/ o# v$ j% @- U2 d* `: r: j                        if no=PartsNo+PartsTable[2,i] then
  n7 _5 s: e2 I0 e( r: ]% n7 _                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
5 b8 H5 S, ?1 w  o                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
; R+ }( K- v( r9 S! g9 g        next;
, o' S/ h- Q# l7 f" Y+ H4 S: L       
3 j. b- ^- K3 Z$ l        Buf:=str_to_obj(sprint("BF",@._From));
% U' g1 ]. p0 d        @.move(Buf);
end;

热翔啊

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

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