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

热翔啊

is
        i,no,m:integer;
! w% L6 R+ x# E$ x9 M0 E: u3 J4 a        Buf:object;
do
7 N, N: s1 p* G$ ?. t$ }; h        m:=0;
        no:=@.getNo;
8 H; X5 h$ I2 `1 P* H        for i:=1 to PartsTable.Ydim loop
" b/ h. ^" N6 @! W. W) l2 [  K                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
, l: y5 A, L3 C; r0 X                        @._From:=PartsTable[5,i];
; h3 z& X+ l# d                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
4 J2 R6 I3 }. ?  g$ H                                PartsNo:=PartsNo+PartsTable[2,i];
; d3 `9 ~# x6 {3 Z3 w/ ]7 Q; c% [* C                        end;
0 ^# y7 P& x; h                        i:=PartsTable.Ydim+1;--跳出循环
                end;
8 U3 i7 G  _' C. O$ ?                m:=m+PartsTable[2,i];
                print m;
* E3 d& F* e/ u- u! g" o        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
' d  c  Z: |6 L! p- [: T8 vend;

( R7 G" q# F; N; I8 A这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
0 F& R% m. ~9 ~2 ]is
        i,no,m:integer;       --定义整型
3 E6 w, {; d2 Z6 t" M        Buf:object;            --定义object
' A3 F# a6 \, A9 F5 x2 R4 X# p! ado
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
8 W+ L- ?  }( H1 K. w5 A0 @0 X, m. V        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
0 V( @* |/ w2 N) ]( [                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
2 ?6 _4 z( z: h  y                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
( K# ^0 V. j/ p/ ]! {7 w
                        end;
" B! i* y$ p* l/ `2 X0 y. L  r                        i:=PartsTable.YDim+1;
2 _7 y5 `8 B' X9 {" C                end;
                m:=m+PartsTable[2,i];
        next;
# w" L& R6 O7 v       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
/ |% F0 Q  ]. H* r( h' M8 ?* k9 r4 Yend;

热翔啊

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

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