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

热翔啊

is
        i,no,m:integer;
$ \4 s; o, `7 n) l0 v: T' r  l9 f        Buf:object;
5 H/ m0 [/ S: G4 _, xdo
: O: f* x3 @% s/ H% p5 n7 T) R        m:=0;
        no:=@.getNo;
& z2 j  d& n; @$ x* L        for i:=1 to PartsTable.Ydim loop
. S3 O; a# O# F( ?                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
2 D) `# a% p' h# j                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
% e1 ]+ X% y' j* a/ u+ l! K* j+ t9 f                        i:=PartsTable.Ydim+1;--跳出循环
+ @+ G2 o( f: E. s$ v/ m9 t                end;
                m:=m+PartsTable[2,i];
! D+ t( u- O. F# c0 T                print m;
        next;
        --先将零件送到From位置
+ {  s+ F& N+ u6 m2 v        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
end;

! [2 `: b2 T* R) n9 A( n& d这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
* A% t( M9 [9 A( R6 b7 b        Buf:object;            --定义object
. j5 [4 j' |) x% m8 p4 `do
4 X; b7 g1 ^, {1 i3 C# @) w% ]        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
! o' J" p0 x  n        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
, v* s3 {! U1 K' e                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
2 E5 ]' E* H$ D* @# T1 m                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
# H( c% N- c" X& k& ?
                        end;
% X: E0 _6 V/ ]7 u$ ~: J( F                        i:=PartsTable.YDim+1;
                end;
( H  m2 @" ^  ^                m:=m+PartsTable[2,i];
        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
: r& ?, c  [! c% {* W9 E  \& o        @.move(Buf);
& y% {0 @  ^# g3 h+ Vend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
6 n: f. a! V; _6 \& X; ]' l2 ]* h这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

* a9 }  c0 t  k! t# M& @非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的