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

热翔啊

is
        i,no,m:integer;
        Buf:object;
do
        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
1 V. j! G/ Z  g0 _) c* Z/ d                        @._From:=PartsTable[5,i];
/ [( [: s+ ~( v2 O6 t                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
$ h/ z# y$ S6 ?  r                                PartsNo:=PartsNo+PartsTable[2,i];
' p9 o6 u) B$ `# _; V% J                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
0 f# |) @$ A$ T4 v2 Y+ P5 @, `                end;
                m:=m+PartsTable[2,i];
                print m;
2 ]  O8 E% \. {/ B2 Z        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
  i. I$ t# Z, [end;
9 M3 L% N& H& e6 K
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
4 G% {  x  }* L1 X4 q3 N        Buf:object;            --定义object
do
& M' f, c' b) a9 `8 k  R" [        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
) t7 D$ v# z9 @, S) J" s- \                        @._From:=PartsTable[5,i];            
. r0 ^. V. l! g6 t" l9 q                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
6 x7 Y8 ~  C9 h8 B- n                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
8 }# E0 v' r0 r" z% E  j* q  Q
                        end;
                        i:=PartsTable.YDim+1;
) P: u% I" i1 {                end;
                m:=m+PartsTable[2,i];
% \6 s* R- Z& M3 j        next;
       
- A% j! Y- _" e        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
5 P) K2 V8 Y( a0 rend;

热翔啊

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

+ i  F- K6 W8 V) m1 T! f非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的