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

热翔啊

is
/ K7 |0 O/ t. v* \# `9 R6 [5 L        i,no,m:integer;
- `: B9 I$ G0 c! }( r8 n2 C        Buf:object;
do
) _( v& l! P  k* G- y- h" I        m:=0;
# \3 P9 q  _5 p/ J. G        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
: d: p9 v% I9 w! A% A/ Q  u                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
7 n) n" E1 L7 r0 k: Q3 [1 z                                PartsNo:=PartsNo+PartsTable[2,i];
3 ^( s- z7 Q$ f9 j5 v, {6 ]                        end;
5 n" x  e. m7 U; h" x                        i:=PartsTable.Ydim+1;--跳出循环
                end;
/ a& v$ k! k; i* X/ e% w                m:=m+PartsTable[2,i];
' v3 x* x( h1 L: l8 K4 N                print m;
        next;
        --先将零件送到From位置
6 o8 I! F5 Z0 @3 a, A4 u0 e: {        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
  t( _+ y# L2 O% n# a' [        @.move(Buf);
" ]2 x, m: `+ B  R8 A0 P$ Oend;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
& C/ ^4 y% B$ Z$ h" @) p        i,no,m:integer;       --定义整型
6 ~2 `/ r# V6 d: s        Buf:object;            --定义object
do
/ T. A+ u" r; ^        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
7 T) ^" ^# u& V- M8 H                        @._From:=PartsTable[5,i];            
$ S- y5 Y; |) L# K! j8 \4 o. i7 G, J                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
/ k& _; Q: `, r- O                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
! l$ ^* t/ T  |7 R4 ]
, x% p- o1 n% K$ I                        end;
8 b2 b" i( G8 G  ~. B5 u6 X% A                        i:=PartsTable.YDim+1;
& N6 K# ]  \. Y# d' P! E                end;
7 E: {3 h4 a4 f4 R! |3 A4 o                m:=m+PartsTable[2,i];
        next;
: n0 G. F) ^2 ^# \  \       
        Buf:=str_to_obj(sprint("BF",@._From));
: K4 q. N( F7 b* N        @.move(Buf);
" K: [: W" o' Y7 M& Y' F1 m: zend;

热翔啊

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

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