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

热翔啊

is
* X6 l  [0 Z6 S        i,no,m:integer;
3 n9 \+ w( A; D& p        Buf:object;
do
% K3 O/ T2 n9 f. `( x        m:=0;
( i3 N, M8 q" }) ^        no:=@.getNo;
$ G+ t9 d3 n4 G* d. ^        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
. p/ H/ C3 r) X4 t$ Z( k                        @._From:=PartsTable[5,i];
! G. v4 R) B1 w# P+ V! G  _4 y                        @._To:=PartsTable[6,i];
8 Q0 @; E* [, t) o( k2 a4 X! G2 d                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
- [  B; l) _+ d( P- X3 D' |& O                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
! h) K) y0 m6 }: w* h1 u                end;
                m:=m+PartsTable[2,i];
/ ~3 L6 r) j- i1 J) g                print m;
        next;
% M: @9 J0 B% D3 y) w) }, Y        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

& s8 k. O  x5 d: Y6 \/ L7 g0 S  E这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
0 B2 _, s9 Q, U$ a" }  H, k不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
% j$ h# W* g; q        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
7 |3 k0 z9 h: J0 q9 S0 S5 B        m:=0;
$ S- h: D* y/ l5 M' D        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
9 n+ q  f) g! }* e( ^        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
- Y" O2 x$ Q8 m" U                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
) J8 p& T6 O# p: @; l3 d) J( D                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
) }( P) Y9 o3 D5 E                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

6 _/ S/ k$ j  X& ~6 O                        end;
( ~5 J6 W( z- A/ w/ z% ~                        i:=PartsTable.YDim+1;
                end;
; B2 t) N/ D  w" t+ Z/ b0 e2 S                m:=m+PartsTable[2,i];
$ j7 l% {' L, M        next;
$ t* L9 ~. A* O2 j" k! `       
0 z& R" s% A9 u; T9 S        Buf:=str_to_obj(sprint("BF",@._From));
2 i5 r# n' [' o1 L- A$ T6 n) A        @.move(Buf);
; e$ X) X& ~1 |6 eend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
* c3 d6 S0 V1 ]( k4 r+ w这个例子昨天正好看了，话说那本书的例子都很不错~
* z. A$ u* o% {1 x( ^0 n. @不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

/ f0 g* w. m7 M# P9 ^非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的