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

热翔啊

is
        i,no,m:integer;
( ]$ V4 }- e* Y& l7 H: s" P( p9 u        Buf:object;
do
        m:=0;
% o1 Y/ Z: Q! u* @  @$ d# n2 W$ X        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
3 i: s- Y1 j  a                        @._From:=PartsTable[5,i];
* L; l/ L+ D9 X( Y5 W3 k, Z                        @._To:=PartsTable[6,i];
/ n. j% f: f) \0 z  y- I                        if no=PartsNo+PartsTable[2,i] then
5 r( A* {, H4 C  I% ^8 f- O# _                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
! }: I$ c3 N$ q8 A. i% r/ c) W                        i:=PartsTable.Ydim+1;--跳出循环
' V" m/ m. j% J! O; [' |                end;
* f3 ]& a  C: F3 F( w2 @                m:=m+PartsTable[2,i];
5 H) \, a0 S- m& K2 J; E                print m;
        next;
# x* h! I( N& h8 b) m        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
" e; ~/ Q. I" l" U        @.move(Buf);
' {: G/ D$ `. L# r8 b' P( J. }" iend;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
. h3 \# F8 c8 T7 |1 K( V5 a8 I; l不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
/ F. }1 f, q. b' ?" f2 f        i,no,m:integer;       --定义整型
  I( J4 a/ y3 h  k' V# x: q- _3 B        Buf:object;            --定义object
* E" \5 m$ g: M' M; jdo
        m:=0;
; c2 ]8 d  o# [6 ^2 O        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
+ a# s, E' z* x9 X                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
- U% O) m: ~5 j5 O0 ^$ l                        @._From:=PartsTable[5,i];            
- S4 R( j, c3 D. `% U  T. h" h/ i                        @._To:=PartsTable[6,i];
# n4 R1 p- b/ V6 x0 f( d                        if no=PartsNo+PartsTable[2,i] then
2 G+ A8 D; G5 G7 v                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
0 v0 P' T3 m4 F! ^+ z: T5 H
                        end;
! H0 X$ \/ g! ?                        i:=PartsTable.YDim+1;
: }6 i8 w2 ?  p" @' m                end;
                m:=m+PartsTable[2,i];
! g9 U4 o- m. U, z        next;
5 m% F2 Z, Y9 T! H3 B* ]9 F" w       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

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

1 f! q2 p: }' Q- u* y非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的