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

热翔啊

is
& u, U/ q+ o6 x" }1 f5 V' S        i,no,m:integer;
3 }  ~! U1 H9 ^9 W        Buf:object;
' |- V+ Q1 r  m' Z7 v, }do
        m:=0;
. e6 l) u4 i( h- j        no:=@.getNo;
6 O" g, K+ x% S1 @. K        for i:=1 to PartsTable.Ydim loop
; d& x) y: J$ |  A2 H( M' a                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
+ E' Z  ]5 l$ g  r6 E: H4 T; G% w                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
/ q7 |. Z' f5 t4 T                        end;
! m7 A9 C- J# e6 B- T4 ~5 |                        i:=PartsTable.Ydim+1;--跳出循环
7 a2 z- a& h1 R2 M                end;
- J4 g5 i7 s* E4 O; C$ G* o                m:=m+PartsTable[2,i];
% Y# F% }7 v5 d4 h                print m;
        next;
        --先将零件送到From位置
9 k, T. {/ \8 o- e# V* k        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
# x# W0 `4 e+ \, }# W6 X8 W        @.move(Buf);
+ p7 r8 _2 [  J) Y- [! aend;
3 k3 O5 F( \, H3 F! D6 [: N
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
, v4 u7 C& i) a: `( ^9 l8 a5 I        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
% x& ?3 p2 H+ s        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
3 k1 P8 B5 Z! t* @" Y( S; Y                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
; P$ b2 ~- M1 ^' M4 S& b( \7 E                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
2 a  d0 `7 t3 R8 {1 |9 @; T! D
                        end;
9 U* [6 H+ P4 g7 b3 |: r                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
: k6 ~' `3 o! a) Y- O* R        next;
       
1 [! Z4 _3 r- K1 ^+ S5 r) V- m        Buf:=str_to_obj(sprint("BF",@._From));
  V* v1 k  ~8 z) U* T( g7 m        @.move(Buf);
end;

热翔啊

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

' x3 F# E( r# {8 ~' h6 D非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的