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

热翔啊

is
6 W" ~0 S2 Z( i) g6 w1 s        i,no,m:integer;
7 a* `; G' J; H8 ]        Buf:object;
do
9 W7 M! R: g" @7 F" x' d+ x        m:=0;
0 ?  T* \$ N) c2 o. `$ O7 ~        no:=@.getNo;
' }7 x- z) d( t        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
. i- T* A9 B) L. G                        @._From:=PartsTable[5,i];
4 d, S' d5 K3 B1 |                        @._To:=PartsTable[6,i];
4 i+ f' x% Y" x/ w+ G1 o) I                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
# L9 m; {3 N# m7 \7 v                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
1 e9 j% T8 e, E6 J. Q: w0 b! D                end;
3 _7 O- [$ Y% H1 Y                m:=m+PartsTable[2,i];
                print m;
. @1 J9 t( m) T7 l: ?# i' g        next;
8 ]0 ~8 W6 s/ m. s, e" `) j$ w        --先将零件送到From位置
4 H7 R5 j8 m# ?: s* _        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
) U$ U5 P: j8 p5 u        @.move(Buf);
# g& H( A5 R/ Eend;
3 e5 Y, T, y9 c! w
" L1 k7 O6 N# P  b% Z* u( I这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
& \* n) h6 w" U$ R不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
# F3 g- ?3 H: U  N' bdo
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
# a2 x/ D9 j, a/ P5 a9 Y        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
4 v3 A+ p4 D$ \( T# K                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
6 k+ O& u. F8 ]! w1 a2 e2 b& C3 O1 o2 r                        @._From:=PartsTable[5,i];            
( {6 t, b' }' F& [! \0 n                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
0 l+ E1 B( l, T- d, d: [; e                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
$ j( R" y/ P2 |& }
4 N/ U5 D- V' g* s+ G8 u, F                        end;
  f5 i& z  }1 k" ], J! v                        i:=PartsTable.YDim+1;
$ E- ~! H% {5 D# n                end;
                m:=m+PartsTable[2,i];
        next;
7 ?+ ]- e, K- `# `+ O: E       
. z* u( y) X0 t' m) h8 j2 |1 D1 `        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
& |$ D6 M  ^' V2 P8 cend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
) Q% h( Y) U9 l, h4 c4 ^. j; |这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

. }7 Z* V' Z+ I非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的