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

热翔啊

is
' ~! k" t) J9 n1 S3 K        i,no,m:integer;
" [7 K" S( P9 i  f, Z        Buf:object;
9 g- u0 l+ K5 a/ ^4 pdo
        m:=0;
        no:=@.getNo;
# `5 Y( N9 B8 ^; x% k, e        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
$ Z; E# I- N' I7 j# C6 `                        @._To:=PartsTable[6,i];
1 |% l% I" Q- j6 A# S                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
8 d' c) `2 y- w5 \3 I, S! g                        end;
4 U! `: A8 w* g7 n& I: v; R( O* V                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
* t6 v# m  g6 J# W! }5 D1 Z) `                print m;
        next;
% x  D7 R9 x* R7 P) K; L        --先将零件送到From位置
& d7 X1 b% |5 d$ @5 _        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
- ~3 F& k0 x5 ?6 U; F- C不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
" M# h/ e6 _. ^' O3 pis
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
4 f9 N0 J! p. l3 {3 t        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
) i* {* ~1 ]; K( K9 i; ~3 l% c                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
# g. E- o, E+ S' B' v9 A# i                        @._From:=PartsTable[5,i];            
( S9 D: q# v- c& r( b7 M                        @._To:=PartsTable[6,i];
2 I0 w; r" v+ g                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

                        end;
% k+ t4 M  F) d% X! h                        i:=PartsTable.YDim+1;
4 ^& S9 h/ M% Y) X0 w                end;
% {3 R8 q. z4 c7 V( \0 h                m:=m+PartsTable[2,i];
        next;
       
$ E% ^' P2 P5 g5 S. m        Buf:=str_to_obj(sprint("BF",@._From));
  s' F/ c4 l( C2 Q6 d        @.move(Buf);
end;

热翔啊

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

* W- r. w$ ~  ^$ A1 b# n4 r非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的