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

热翔啊

is
" Z- x0 A  e7 M6 B4 {        i,no,m:integer;
        Buf:object;
do
        m:=0;
        no:=@.getNo;
" R( o9 f" e7 ~* O  C  a/ z7 O; ~        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
/ c# E  y: Z# y7 N) t                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
: P' J5 u! t, o3 q                print m;
        next;
1 I# n; \. o0 ?8 q) c0 S        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
$ L/ u; y0 o, I- U) r        @.move(Buf);
7 l- ]6 R7 {. ?) B9 \end;

这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
' H% E) f& U( ]) a, ]        i,no,m:integer;       --定义整型
/ A; a' Y  r( P) s$ b* I, i1 b        Buf:object;            --定义object
' {7 ?# j3 y1 W6 T3 pdo
9 h$ X  k( H3 k3 m9 x        m:=0;
. w' J+ m4 [9 `8 f& {        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
: [# k8 V, O( C- i                        @._From:=PartsTable[5,i];            
  M' V2 D0 e" E% x# h& F+ t* e                        @._To:=PartsTable[6,i];
! P, c" N% I  l' v0 k                        if no=PartsNo+PartsTable[2,i] then
2 W0 @, w, f- O; C: \$ T. |* T                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

8 `/ C* B! u% l+ S6 ?0 c1 ~                        end;
# ?) t. o! _! C$ h/ j4 S                        i:=PartsTable.YDim+1;
9 ~6 r- f& j# ?                end;
                m:=m+PartsTable[2,i];
8 @3 ~" p1 g9 @2 j& d6 N( Z        next;
       
# y' S; g* b3 y$ ~$ s- q        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
# Q  t0 u$ k) N3 m* S/ K9 W0 m这个例子昨天正好看了，话说那本书的例子都很不错~
6 C5 E' }; U/ L7 t不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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