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

热翔啊

is
$ Y: ~0 j( F) ]  k) ]# G        i,no,m:integer;
4 R3 a) N) t* G7 E9 V& x7 B. U9 B        Buf:object;
do
. y2 I1 q( i% {& w% _* a        m:=0;
# o  t$ e2 K, {) j( ^* e! F$ v        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
# n7 ^" I: K% r+ I                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
0 U! T* V: B/ ?" a& Y' v                        if no=PartsNo+PartsTable[2,i] then
" l7 l- ?$ y- v  G% Y/ [& f                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
5 k% t4 a2 O. \/ y: K& F+ ^0 a                end;
                m:=m+PartsTable[2,i];
8 @) p3 V/ A1 w0 h                print m;
9 \0 r- z+ @- V3 H; r2 T        next;
$ g7 W8 F: f! b        --先将零件送到From位置
8 ?" h$ R! U. j- |+ ^) g$ [        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
4 T3 v" N: D/ U        @.move(Buf);
end;
8 Q0 W/ d2 U' M) M6 H+ P4 L
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
# W0 h2 t! S6 v* sis
        i,no,m:integer;       --定义整型
  F# k* Y4 Y5 }/ G* r        Buf:object;            --定义object
+ a$ |& Q. M/ S0 y$ Vdo
- o8 {1 ^: h+ H2 s& a9 f" p        m:=0;
; I% Y/ w, @% D0 z( w0 }        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
& j" p; E7 q5 ^' B                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
% V1 m& |$ F4 ~5 t0 S; I2 S- }1 H                        @._To:=PartsTable[6,i];
8 O. M2 s7 P  j( ?5 O  q                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

9 p/ ~" y. H6 l8 ~" Q                        end;
) r' `1 A% q2 E6 W  K7 y' _, D                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
3 b! q( ~: V, o$ k! Q        next;
7 |7 J. {. m8 v, G% `       
* Z: C- m7 r# l# R/ h% I8 P        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

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

! w; J, Y, {- u% T$ {非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的