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

热翔啊

is
        i,no,m:integer;
# ]8 v9 T* N( P8 V+ p' y9 u( O        Buf:object;
do
: c: Q' x5 U9 C7 c        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
+ G& ~' @/ z/ Q* j! w/ G+ _                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
5 @- \( s/ H; x5 W' v                        i:=PartsTable.Ydim+1;--跳出循环
7 P* R* d( B; F: b  S2 J, I* q                end;
$ K  R$ k/ B+ Z) F% k. L& t                m:=m+PartsTable[2,i];
                print m;
        next;
- r; c  D$ E5 a* `- n$ ?  m        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
! r: P) }8 p: D/ e# I2 n7 n2 b        @.move(Buf);
end;
1 H2 T5 ^" Q6 B" A: y
. F' |* y2 h* r* ~' Y3 p4 o这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
8 z/ l9 Y, P0 I不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
0 e. a$ y( T# L7 Y: tis
8 b; @+ S$ O) `# L7 E% C# |        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
# o) c7 k9 N: _9 b8 |do
% j9 z+ H9 K# F; i' [9 r        m:=0;
( F' F$ N  I; F7 N% }# E- _4 `        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
; C% P: N+ X, E# l: q                        @._To:=PartsTable[6,i];
' k* I4 U! [9 U. ?0 _; O5 I                        if no=PartsNo+PartsTable[2,i] then
$ N9 G' n& \. p' \                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
' ^( @6 w; e& O! v/ k
/ z! o: \8 G  I0 D2 m0 U- v$ Q8 F                        end;
                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

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

6 G/ k9 O* u+ O, D; C非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的