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

热翔啊

is
) S* C- B/ C! s/ n# O        i,no,m:integer;
        Buf:object;
do
1 j( l& c7 P) I. V+ g) s1 u        m:=0;
. Z* T; Z' w6 I9 K        no:=@.getNo;
8 [  F; f  {- k) N1 ~* ^8 e# u# d        for i:=1 to PartsTable.Ydim loop
4 _& p  o/ f" {1 y9 U8 h. u/ F                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
! K. {) L- ^- F! r0 c8 @$ v                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
* v3 E- |$ w" z2 k3 a' l, d                                PartsNo:=PartsNo+PartsTable[2,i];
8 V9 Z" X$ c/ \/ I3 y# A                        end;
3 ]! w7 K! l; K9 n                        i:=PartsTable.Ydim+1;--跳出循环
% j3 Z- r8 `3 ?+ U$ M/ w# s                end;
                m:=m+PartsTable[2,i];
1 e1 n7 m5 {' p+ I                print m;
        next;
# p  R1 e7 f) C8 G: j( Y4 R        --先将零件送到From位置
        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
2 @! S# Z# W' ~6 H9 s' g        @.move(Buf);
7 Y  n1 p/ S2 }end;
3 _5 c+ y% m% {  U
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
        i,no,m:integer;       --定义整型
" p+ F# q$ m4 o; V        Buf:object;            --定义object
) T" S) h/ l: n2 g1 Y8 Ido
        m:=0;
: d+ |) G) X5 U& h& h        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
; y' s! A9 w+ B: K1 s                        if no=PartsNo+PartsTable[2,i] then
' w; W+ k. m  N5 [                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
- y' i+ W$ Z9 t3 q6 C& |5 ~. n& z
                        end;
$ k8 h  L9 V* c  d                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
% o5 V7 z5 [5 \4 a: V9 k        next;
% ^; n3 M. D8 e5 C       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
& {; A: t9 U2 C# K, z) e  t这个例子昨天正好看了，话说那本书的例子都很不错~
  B; A5 b; X& r4 [% }; N1 Y  s9 j不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

, e9 d, `: f8 P! ?  P非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的