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

热翔啊

is
$ K! F1 P& ~) b        i,no,m:integer;
$ ~) ?3 {1 p! n/ o6 @        Buf:object;
do
        m:=0;
        no:=@.getNo;
7 P% a2 Z, s2 H. }! d        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
$ d9 h5 q8 V/ |/ Q7 a                        @._From:=PartsTable[5,i];
0 x6 I% H- J1 J: z) C2 y  q                        @._To:=PartsTable[6,i];
! e) }! c+ c- u! O% {                        if no=PartsNo+PartsTable[2,i] then
3 G) ]! b: B* Z( q                                PartsNo:=PartsNo+PartsTable[2,i];
2 }' ?7 U2 k/ A; A, P/ D- c                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
' J+ R) |: ]0 S                m:=m+PartsTable[2,i];
/ X3 O0 d1 G0 Q* V' m! U                print m;
0 q0 m( Q/ E: P6 o* p; w/ ~        next;
2 E6 \) ?  v2 Z  h( m% W* Z# N        --先将零件送到From位置
: X  _+ c1 {# t  n. e        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
" z+ }# G, x# A% Z8 ]9 ~" l' g        @.move(Buf);
end;
, @; C0 X) n- o+ L: L* Y
+ O6 K$ t3 M+ e& `+ r: U这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
( _3 R) E# [6 c8 {# Q不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
6 K) P9 E7 B# F6 H5 Ais
( V% Q0 h& \' @( j8 O" y        i,no,m:integer;       --定义整型
6 ~6 E4 @; c# Y2 }        Buf:object;            --定义object
do
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
6 l9 ~& g5 |) B0 n        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
4 j1 a! V  X; e: c' [" b* w) e8 O                        @._From:=PartsTable[5,i];            
" D* e- I, f# e" }                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
5 j$ w3 J2 o" A8 K& i                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

1 z- `* R1 z! i0 Y( ?; a2 z. S; n4 m! h                        end;
                        i:=PartsTable.YDim+1;
" L- [4 B3 Q/ _- H6 g' [( a+ v                end;
' m8 Z8 K% h8 X" ^7 w                m:=m+PartsTable[2,i];
+ V6 p+ u* E' \$ A3 K- z        next;
6 ~) D/ X+ x) B6 w  D. J       
3 M* k, M! |4 W6 _9 U8 Z7 s        Buf:=str_to_obj(sprint("BF",@._From));
% M' O5 m/ M. R: w. Y0 C        @.move(Buf);
5 J1 E1 O4 H  x1 ?  t+ Kend;

热翔啊

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

1 l7 s/ E$ O0 b% q' r% c非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的