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

热翔啊

is
        i,no,m:integer;
8 k8 {1 c9 ^. @0 L. ~. l6 ^( L        Buf:object;
, Q  T* R0 y* f! f" a0 Vdo
% o0 E% L7 N7 p4 Z; x7 s7 \        m:=0;
        no:=@.getNo;
1 ^* K9 g* T# D        for i:=1 to PartsTable.Ydim loop
3 c3 Z6 V8 m3 `! E) e9 Q                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
! s1 F1 K* l1 p1 D7 F$ Z                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
+ b7 I* J/ c. L# q; G( d3 i                        end;
9 R9 ^) o9 r1 T4 `( c                        i:=PartsTable.Ydim+1;--跳出循环
                end;
7 j$ D: f$ N2 Y3 A# `4 p9 J                m:=m+PartsTable[2,i];
                print m;
9 O+ [2 _) {! z* r7 @        next;
! H" x7 a5 z8 z3 y# f* M        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;
) Z, V6 K0 C" i! K, s! H
6 v, v  R" i, C' y" M3 B  M! D这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
( r* |* O# k- H2 K: I1 C不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
+ o8 Z/ T; f3 g" N6 d        Buf:object;            --定义object
& f) x( T! L" v/ Ydo
; r" v5 c# x8 {* M5 a& e6 r        m:=0;
4 B3 s% R" U% B, g. J3 t        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
, H7 @6 e) c; d( a& F  R                        @._To:=PartsTable[6,i];
6 G  m: V$ M$ }$ C0 m: D9 ]                        if no=PartsNo+PartsTable[2,i] then
+ T5 A# h& P) I% d2 ^: C) b2 o2 h) G2 x                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
1 v$ x! [* h; U, w# L' y& a7 i& d                        i:=PartsTable.YDim+1;
/ O& ~7 j, q+ z3 g                end;
) m% i/ H# k" X3 H: _. g: N) F, [' a5 Y                m:=m+PartsTable[2,i];
  d, l  ?! o9 I" x) ~$ e) i        next;
4 Y4 F9 x1 O1 e9 \  I       
1 U4 b1 \) x; X/ v/ X        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

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

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