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

热翔啊

is
- K% \( o: D+ t        i,no,m:integer;
) M5 B8 k+ f- O  A" ~        Buf:object;
do
        m:=0;
3 b# \: F3 _1 `) {, S7 Q        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
# R/ Q) J5 R7 [5 T. L" ?# ]                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
. M( a3 ]5 u0 S                        if no=PartsNo+PartsTable[2,i] then
) {: J4 e5 N& M( [                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
9 r% h* f" L. [% ?  L                        i:=PartsTable.Ydim+1;--跳出循环
1 N- C, ^% ]2 P3 c" M+ T! r                end;
6 h2 \# p( h/ @* c6 O                m:=m+PartsTable[2,i];
                print m;
        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
: S% n  `4 O* p1 m# ^3 S8 S, n        @.move(Buf);
' p" |* |' S# n. B% a$ d. pend;
! Q  E" M. i  {
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
$ Q; ~: @! _$ _is
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
' X% G% H' F) C% [do
        m:=0;
6 r9 ?% V% C, J        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
: \' [4 w2 _& }7 O2 `" f        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
, h( W1 r) i+ r6 K# L, ?                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
. w& a9 H, k. U2 i* Q% w                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
7 l% L# x! r0 B3 w                        if no=PartsNo+PartsTable[2,i] then
* W4 U; |& B( ?7 V! ~                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
% P' K" G  E3 {- p) e' B8 D                        i:=PartsTable.YDim+1;
                end;
/ h# u0 c& Q+ \9 [# Z9 o/ A                m:=m+PartsTable[2,i];
" ~7 a6 Z/ i+ g0 y" V2 @        next;
( U6 y/ R1 t3 [* {  L! r       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
8 a& ^9 G1 Y; f6 M& r4 T: {( m7 Fend;

热翔啊

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

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