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

热翔啊

is
        i,no,m:integer;
) b. ?) U# I8 o7 c        Buf:object;
do
' E# Y1 x" h4 c7 p. F5 g$ a/ V, Z        m:=0;
+ J4 T, J* }! `: Y9 z" m! S8 C        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
3 K+ G; [3 k' |' m                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
                        @._From:=PartsTable[5,i];
% |; \3 c9 x7 Z/ K* T, n/ |                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
/ ]% a9 J' g& H$ ^                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
2 V- p0 {  z# S. C* Q$ ]                end;
2 q  B) \0 Y+ G$ N- U                m:=m+PartsTable[2,i];
                print m;
        next;
. }+ E4 L, z# c        --先将零件送到From位置
  u' }& @, I3 }        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
5 r* L4 X' C; d) P: t        @.move(Buf);
end;

7 b& }3 R# j' w1 t, d这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
+ h- t+ k3 @/ y5 j7 x/ t/ {is
+ _6 h9 r  b4 H: m* f3 l7 U        i,no,m:integer;       --定义整型
. z# g5 @) H3 m+ \. g4 ^        Buf:object;            --定义object
; u5 p' |$ K9 O# T% Pdo
7 S! E; B( i# r% G6 b        m:=0;
/ A' {6 G5 J  d; w0 n8 N! a, u  A        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
6 a) B7 b4 ]3 V, G+ X                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
; I6 q- H6 m# u* v7 K: |' l1 p                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）

- e6 A2 }' I  F0 M% L, `0 h; j( g                        end;
                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
- A! B- r' {0 F/ {6 Z: b* g& n& @        next;
       
* e+ H  ]4 J$ V; ~7 p        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
5 H( |9 t7 s2 o3 E; s) o* Yend;

热翔啊

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

! g! r" ?* J& p+ \2 ~$ |非常谢谢你 T  T 我都已经觉得问的太傻了 没人会回复的