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

热翔啊

is
1 U0 n$ \9 T% u        i,no,m:integer;
        Buf:object;
0 C2 X* a; p/ Y0 Z7 Mdo
3 }0 P* @# M# h        m:=0;
4 M3 L5 m7 R% h+ g        no:=@.getNo;
. x8 g% j( n5 f0 D        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
0 c6 e% K) q3 M                        @._From:=PartsTable[5,i];
7 E+ L2 I" N& y9 L4 y6 O' C* t                        @._To:=PartsTable[6,i];
8 q9 c4 E4 s2 a2 A- V5 B                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
$ M( Z8 P* o' _3 h                        i:=PartsTable.Ydim+1;--跳出循环
+ D; F( r1 f; [                end;
                m:=m+PartsTable[2,i];
, ]+ y4 m% w( H" n& _* D1 {! M                print m;
- ]& j5 F/ G4 s' Y9 {        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
+ p) q5 z8 {6 r8 H; n. t        @.move(Buf);
  V4 X* ~1 I  y2 R/ z. bend;

( f3 v6 @% {" @+ M3 a这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
* k1 E' ]( e9 T" U( w' ]& H% O不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
* t" V6 x9 X- }4 C6 g: \        i,no,m:integer;       --定义整型
1 I& `7 T4 `$ z$ v0 p        Buf:object;            --定义object
' j  T  U/ J. n) l+ N: U1 Udo
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
* l2 a7 `- P- x; r4 H9 k# f        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
$ d9 u# D: w6 l/ o$ {                        @._To:=PartsTable[6,i];
; ]3 C' f/ o: ]( j9 v; d8 R5 n                        if no=PartsNo+PartsTable[2,i] then
6 R; q1 h) Y3 h& q2 @0 H1 x                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

7 q, g2 C" I# x& {" B                        end;
- r5 V4 B) I6 C  c( K" h                        i:=PartsTable.YDim+1;
  ]4 g. a$ y! l                end;
                m:=m+PartsTable[2,i];
        next;
* V8 |3 c6 S, ?( D7 k% I       
        Buf:=str_to_obj(sprint("BF",@._From));
4 ]/ d' ~7 ~4 G        @.move(Buf);
' b1 |7 e/ U. i- b( x( q( dend;

热翔啊

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

非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的