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

热翔啊

is
* p( \5 e" Y" {  j        i,no,m:integer;
( F& j0 y$ {9 J2 n' \; O        Buf:object;
- Y& N# \; I3 G; \/ {9 ydo
        m:=0;
7 M5 t, g4 g- X; i5 V. `2 C9 b        no:=@.getNo;
8 g7 _' L, m) S& k" B; L3 Z        for i:=1 to PartsTable.Ydim loop
" ?/ e5 c! H4 p; F8 y                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
6 T  d$ k& B" W7 M                        @._To:=PartsTable[6,i];
; Q2 ^" W2 J  {4 H. e                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
' I% S9 Q% X. l; o8 ^                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
        next;
        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
. }7 S$ z" a: ~2 b6 H2 O! D% xend;

% m5 P9 O2 a: w8 R0 X% _# z这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
2 j) R4 ~  n) q* q3 [不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
# ]+ d! G& X2 K7 K        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
3 ^' [! K& Y( i! r4 `- Y3 c        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
2 v7 }, s2 q3 V% j9 Y( k5 n                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
. I5 p1 z% Z% k6 R. Z4 U                        i:=PartsTable.YDim+1;
$ S+ v3 I% c: o: l* ]0 k                end;
                m:=m+PartsTable[2,i];
7 P" g2 F, `! n8 C. \) }        next;
* t$ F& F& L) _$ r: b       
        Buf:=str_to_obj(sprint("BF",@._From));
4 H; d* C; b5 ~2 A        @.move(Buf);
$ F) y- N6 ~) n2 x' b# G7 @9 X/ }( [end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
& r. A! S5 {) U6 E% S+ a5 G1 x6 V/ Z这个例子昨天正好看了，话说那本书的例子都很不错~
0 b9 U3 L6 B- k; I6 a$ [不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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