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

热翔啊

is
        i,no,m:integer;
        Buf:object;
do
& E0 O& Q, F: x( b2 X) \; G        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
' P, O" H* L) }$ Q8 `; t                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
1 _. x. q/ ^( Q4 e( W# l                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
) S3 A8 {4 p! |. M* k                                PartsNo:=PartsNo+PartsTable[2,i];
! d) y5 T( r) E  ]) r+ j: |0 c                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
  D2 j% R9 P; b3 Z0 p; E                m:=m+PartsTable[2,i];
4 t4 I0 N! {% t5 z0 v+ j  e' W, H                print m;
        next;
& q' D5 s0 g1 R5 d; k2 O        --先将零件送到From位置
- D# }* M0 N8 r        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

: h  m  g; _% K3 S7 t这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
3 g7 Q1 b  Z5 b不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
/ \6 k% y, T2 K6 r, Kis
0 d" k9 Z1 p3 Z3 l  B, i* ?        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
( L% `5 |+ X/ t' v, ~9 {" j" Z        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
5 O: \4 A0 N4 G5 y5 a* k0 |        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
+ Q2 A; ?) u7 [& s) V                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
, N# V2 n# ?; _8 F9 }& n* v% G                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

3 N2 A& K/ D3 |/ a5 O                        end;
                        i:=PartsTable.YDim+1;
" t0 W2 L/ P+ x3 V  m5 u: \# K                end;
                m:=m+PartsTable[2,i];
2 L+ H. n7 y( N2 ~3 Z        next;
3 ^% Y& X9 D( N1 s; N       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
; _1 C6 r% d9 A$ ?# Q这个例子昨天正好看了，话说那本书的例子都很不错~
2 J* T8 M, _% e. y4 P6 B( G! t5 D不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

" h1 S5 ~5 {. J4 \7 b6 u7 [0 K% e$ k非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的