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

热翔啊

is
        i,no,m:integer;
2 c$ V) y8 _- w3 [1 ~7 r! u        Buf:object;
do
        m:=0;
- I# ~0 W( U$ ~; z        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
* T/ P/ j7 r' P0 t                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
& @$ W4 x0 c* A0 N' ]                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
: S$ M( W, f7 V) V                        end;
3 M- ]# ?5 B0 d+ U2 @& ?5 O' Y                        i:=PartsTable.Ydim+1;--跳出循环
- V  J) H! b* w& b9 @                end;
% T. X  X0 v) P1 F, N& w                m:=m+PartsTable[2,i];
% Q. Q5 N4 q2 |8 [. f- a8 ]3 k                print m;
  d. \6 m% j( _. G% F7 K        next;
7 P3 ~# {' x5 P  M1 U; j$ r        --先将零件送到From位置
4 Z: ], A, H( g) w8 |5 s% ?        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
$ a0 @# `2 {4 z; X& }        @.move(Buf);
2 P, M' h# m. m# w$ @end;

' j8 D0 z; H) }5 C. G* }' l3 W$ d6 C这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
1 @% |8 V- M( \' F, fis
        i,no,m:integer;       --定义整型
) w! P/ ~+ [5 U! k, I        Buf:object;            --定义object
do
5 [/ l7 @5 [: S0 W$ b        m:=0;
; `- {7 j8 P. X2 `  q& \2 b; @        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
2 J& X6 p' D5 ~3 R, n6 f3 ?                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
9 ~0 w0 k: e  y. u; W# z7 f/ g                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
3 A: ^& q7 v* U3 h. ~* m! O- E, V                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
* U8 \8 T% O6 Z2 L                        i:=PartsTable.YDim+1;
                end;
( I$ r+ \8 Z, L  M# g8 \/ |                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
* m7 u8 b% g& D7 r1 R        @.move(Buf);
end;

热翔啊

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

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