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

热翔啊

is
' o1 }4 t$ g/ \. m: Y! G8 h+ J        i,no,m:integer;
        Buf:object;
do
" D3 K  u. H2 M- W8 j9 \        m:=0;
9 y9 z- e2 {4 c        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
% @  `* i- h  [3 X. U0 m5 R                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
/ z& ^8 |5 V; s                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
3 i% l- i7 u  Y7 M- r; y$ G# Y                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
) y7 o5 A" v. {, O                        i:=PartsTable.Ydim+1;--跳出循环
( t, _2 X5 O+ X0 ~) P8 j  e                end;
                m:=m+PartsTable[2,i];
/ S+ o& ~: M  {                print m;
        next;
        --先将零件送到From位置
0 v! [# M/ v. e- @+ T4 I        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
4 m$ {1 p7 n3 d$ ~" }; C        @.move(Buf);
end;

/ o2 \1 O7 w% i1 [5 i- H" z这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
  K8 C! W7 X9 T# @is
        i,no,m:integer;       --定义整型
7 T# K, t5 ]# u; X+ C9 ?4 G7 G        Buf:object;            --定义object
do
        m:=0;
) o: d. ?6 ~+ R' r4 g        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
; |. a0 r- M- A- }        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
0 F0 \& c$ u$ L# h) G9 t+ o8 l3 _                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
% _, u& E) f5 B' [" U                        @._To:=PartsTable[6,i];
- s: X9 M+ Q2 S& p: ~8 v                        if no=PartsNo+PartsTable[2,i] then
$ v: Y. s& w) ]+ V5 Q  F0 n                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

6 T9 f2 K* `0 U1 ^  B4 V4 S  J                        end;
6 e: x( `4 G! b( {' A8 M0 `6 d                        i:=PartsTable.YDim+1;
                end;
( Q/ x7 P' k& O2 s; b5 f3 i5 _2 w2 e                m:=m+PartsTable[2,i];
9 D# ~% ]2 {" ]% \6 F        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
# K* V0 q$ I8 p) P# x; ]/ c" {; z3 Y        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
& m+ a: x# {9 b9 U- z% V1 \这个例子昨天正好看了，话说那本书的例子都很不错~
5 r! {: l' D9 Q3 O8 @不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

2 W: \6 Q! ^" n( \9 {; k0 F# z, H非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的