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

热翔啊

is
' d1 i1 T% Y" `. c, \+ q        i,no,m:integer;
% S7 h3 N+ e% H0 v& m. G        Buf:object;
do
: T) s7 F' j7 M( T2 r5 H' `: @) L, {        m:=0;
        no:=@.getNo;
! }! x2 G5 B, `+ a) I& Q+ ]        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
" q2 k8 \; f8 e4 |( w4 T                        @._From:=PartsTable[5,i];
: `0 J- ?5 w8 I# O6 q/ T; D                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
5 k7 t5 z: d# Q8 C1 g1 n1 o# a  g+ h                        i:=PartsTable.Ydim+1;--跳出循环
+ A) }$ [/ T% L$ L% u: T                end;
                m:=m+PartsTable[2,i];
                print m;
6 T: A  m. y1 ^$ A% g  @, M+ Z. {5 i        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
8 y% h2 I" s2 u1 F( x        @.move(Buf);
end;
+ X$ C" V% Q* _6 V, k( C
: E  a, o  O. {: h+ l* g6 j这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
* L+ ^+ \0 r# s5 h/ X1 I9 j不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
  V# Z8 V& c/ K# }" Wis
( l7 |- E2 M- [1 k; R7 B        i,no,m:integer;       --定义整型
$ c# A2 {. ]0 N5 t        Buf:object;            --定义object
do
; I! s% c- Y) u" i# ~        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
8 r& G9 W1 m5 \/ |$ W( J        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
* ^5 `& b8 ]6 g/ y# ^                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
9 @, \8 Z( U6 ], ?" O                        @._To:=PartsTable[6,i];
2 |, w, V, E1 r- s$ {                        if no=PartsNo+PartsTable[2,i] then
& F9 @8 }, j- O' w! X' c$ {                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
) |: M' I" H' P$ Q
                        end;
5 F9 G, ^% G" v( L7 `$ k5 D                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
3 ~1 k: U, [& K' ^7 Q. x        @.move(Buf);
end;

热翔啊

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

. W, B* O* U& |非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的