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

热翔啊

is
6 V- Q, T/ E' p5 q, p        i,no,m:integer;
& g0 {8 B4 `$ e        Buf:object;
7 l  y9 _3 k' ~/ M- m7 @do
        m:=0;
, I2 b  \0 o( ^2 K. T        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
+ B' w  I* k, f& u  i$ N' V% J                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
  E2 n7 q+ j* r' O- d, M1 c  ]2 c                        end;
  D# z; w. q9 j1 E7 ^+ O                        i:=PartsTable.Ydim+1;--跳出循环
                end;
: q0 w% o" A& I4 t$ A  v$ Z& I4 h                m:=m+PartsTable[2,i];
% m$ F1 J) E' {+ y+ ~# I5 ]0 Y                print m;
7 @  w7 l0 h* n! y! i$ Q! W        next;
2 g5 N6 l1 T) C4 R" X) G        --先将零件送到From位置
( j5 S: g, ^' n9 b; s) ?        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
& \% l* K* |8 I# {( ?; Pend;

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

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
1 M% o# Q4 }) W+ b4 e不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
: M' ]- h$ {* n  h$ T2 K# Gis
        i,no,m:integer;       --定义整型
! d3 H  y3 g5 W& w% X3 F        Buf:object;            --定义object
9 T; b# p1 ^! z9 jdo
: k$ r/ [: m4 ]$ M" V& Y! s- |/ ]        m:=0;
; I& [5 y, z- }: u6 E' L& b. Z        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
, u6 G6 x7 f! |: q; Q3 a* M3 c                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
% o0 D4 F$ [8 E/ F. {                        @._To:=PartsTable[6,i];
; O" h, k. n. C0 s' s( F/ X4 R                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
- @& g, m7 D9 x% E' h6 H
                        end;
                        i:=PartsTable.YDim+1;
                end;
# H; [2 M2 v+ m$ B" w! D" x' Y, u8 e                m:=m+PartsTable[2,i];
        next;
       
9 w8 n4 n* j- P: [- c6 @# j3 e( Q( `# q        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
/ _: M" Q9 f; u0 W, b! e- ^end;

热翔啊

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

& z/ V/ I8 c' Y6 _非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的