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

热翔啊

is
, s8 _! d0 c  r; n( J7 W, R0 X        i,no,m:integer;
& F7 g. Y, h0 b8 P        Buf:object;
0 h7 O* m/ Z; U8 Z7 N9 e* gdo
        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
+ c  t% c5 ^0 R/ D                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
% n* K3 m! K( c( t3 C0 K9 I                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
+ V" P8 m" g! Z- A/ ~& v                        i:=PartsTable.Ydim+1;--跳出循环
, U! Y. k$ o& c$ @* c! ^                end;
                m:=m+PartsTable[2,i];
1 e- _7 H2 u' U# M+ }                print m;
        next;
& M! M9 K7 Y8 {1 r        --先将零件送到From位置
; D. A- u5 u* r        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
5 _6 v6 {  ~0 {8 X; u        @.move(Buf);
$ f* e+ q  H7 Y8 H, r9 Gend;
3 G) E& O% O5 O1 k
这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
# J! o# Q3 q' _" G$ W3 S( ^; g$ C$ E不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
6 f) U: n$ s+ w3 \is
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
0 r# }5 q/ T9 i/ K. Y6 o4 |        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
7 K3 d0 K9 n4 s) m! x0 k) m# R2 `        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
* Y7 f1 q1 t0 n; C5 P                        @._From:=PartsTable[5,i];            
( X- Z2 P; [. z! Y3 V                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
4 P8 ^( y$ q" ]* K8 n, [! c1 j                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
  ~3 u, B. n6 R  U
                        end;
4 T- L- {" d' k9 y( a                        i:=PartsTable.YDim+1;
: I- A  A. Q& O' \+ j# W                end;
                m:=m+PartsTable[2,i];
. t, |5 W2 x* T2 m8 x        next;
/ J8 i& K, W: Q5 i       
6 A6 r. f% {0 [% }* r        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
: c5 W; z6 q' o+ C# ^; uend;

热翔啊

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

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