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

热翔啊

is
6 c; ~4 @# b% r! `, n        i,no,m:integer;
        Buf:object;
! C" |& p7 W6 Xdo
        m:=0;
        no:=@.getNo;
! y  q( E; b  U! h        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
5 z* z, \$ g- [5 }) M8 u                        @._From:=PartsTable[5,i];
% f( N, z3 v8 l                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
1 q' F% b" z1 @2 n. r. V                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
" k- U" P) y  _5 ?8 I                end;
' j( O! R0 K  {- K2 X' f                m:=m+PartsTable[2,i];
. Y1 x) K& t0 J5 @" |                print m;
8 ?! l& n" F/ S2 l) `        next;
  ]0 A) p- _8 h# C/ }# n$ |2 T* e$ g8 [        --先将零件送到From位置
( n3 P2 f, }7 y" Z        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
' o" Z7 R" h' n% S+ h4 ^$ Dend;
% K6 w: o+ C# k$ N  x3 Y5 w
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
$ w( y2 r/ K6 y; Qis
0 m8 |' i9 a9 X  i" T1 z$ s' X        i,no,m:integer;       --定义整型
7 S7 M' t0 H+ g0 D8 o5 J0 A        Buf:object;            --定义object
8 y. Q6 N1 g$ ?# `) ~5 d/ Zdo
1 \4 l# M3 I; }        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
. U% X8 V) Y, J# ^        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
) z* {" {7 K' I                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
# @& ~5 t: \8 q; P* z7 d3 t* Y                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
6 T' i/ z2 P  k. H% v$ H! C8 d
                        end;
! r% u* @  p3 d                        i:=PartsTable.YDim+1;
' A5 J5 E. f) O7 W4 E$ G5 Y. h                end;
                m:=m+PartsTable[2,i];
        next;
% X  u7 o1 P) ]" k) ^       
        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
( `, {$ R% R. C+ vend;

热翔啊

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

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