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

热翔啊

is
        i,no,m:integer;
        Buf:object;
, p, B* u+ }2 Qdo
        m:=0;
+ w3 z5 ]* a9 y# g' q! q0 g        no:=@.getNo;
6 g& M7 f1 [. [+ s: y, d: W        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
; f5 X8 j# _) x# u3 ]$ ]+ ]                        @._From:=PartsTable[5,i];
                        @._To:=PartsTable[6,i];
* W7 }3 K! O3 v. X* c) h                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
                print m;
% s. O/ o! K0 Y% d& A7 A        next;
        --先将零件送到From位置
8 S  P/ ?/ j" ^! l1 v        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
! V8 M2 _3 m5 K6 q- G        @.move(Buf);
# [. N& w/ [, L7 S+ n# Kend;
3 P& F4 P* h- [
0 ?7 c+ w* d+ R. `5 p3 [这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
3 c% f! T; P+ Z) k& i/ I5 [is
        i,no,m:integer;       --定义整型
        Buf:object;            --定义object
do
        m:=0;
5 i& \6 x$ P$ p# A  a  s4 ?        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
. t% z" n# s' ~. m        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
0 ?# t5 _  o* n                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
  }- K  [$ t# l! Y                        @._From:=PartsTable[5,i];            
+ F- G- D5 Z8 o- X# v                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
1 D' s* \+ m: X8 Q                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

: y+ @; |  t- x; r# _; ?                        end;
                        i:=PartsTable.YDim+1;
$ |6 f. r3 m) }  [: |) R                end;
2 O$ Q0 d3 t$ O0 d; q# ]# c' E                m:=m+PartsTable[2,i];
9 u2 E/ r9 F5 k; D        next;
       
        Buf:=str_to_obj(sprint("BF",@._From));
, p+ M4 T9 A, x8 S% o        @.move(Buf);
# T5 g& r: I3 w  g1 d5 d! @end;

热翔啊

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

' x% K. k9 _  k. `非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的