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

热翔啊

is
# K/ {8 J" [: f" r, q8 x# U3 T        i,no,m:integer;
) w+ }1 w7 ~. V% M; S) g8 H        Buf:object;
" ]/ T2 O; u- I0 g0 \do
# U( F9 Z* T- ~/ [& o4 {% C        m:=0;
# L. G# T9 u; I7 u+ }        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
! _/ U  S, s. S6 l( }$ i- E  ?                        @._From:=PartsTable[5,i];
2 P) I& G7 }  C6 z* P                        @._To:=PartsTable[6,i];
' V6 [* }! J9 |+ F0 C                        if no=PartsNo+PartsTable[2,i] then
# A7 v- K2 s8 K                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
; R6 I# y5 M# T8 j, k: g; M) ]                end;
- F! |/ `- v2 c* }                m:=m+PartsTable[2,i];
3 B9 q* r3 `3 y: o                print m;
        next;
& V' R: s7 H5 J" t9 o! W        --先将零件送到From位置
/ H  t. p# S: m, B- q/ y        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
& Z6 D' D5 Z9 D5 F        @.move(Buf);
9 K+ \6 k- u$ Yend;

& X0 e/ ~. Q2 I3 J8 L6 o" z5 N这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
; l; ~! A2 \: \3 C5 G不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
$ @8 g4 [$ _0 S2 {/ G/ g# e0 Y        i,no,m:integer;       --定义整型
) ^0 E+ m. g1 a* \9 g        Buf:object;            --定义object
do
        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
- n% l% Z/ b5 S( w2 X: O                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
                        @._From:=PartsTable[5,i];            
* }8 b8 W! p1 B& \$ l# n                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
, Q6 e& X+ C% j, e
                        end;
) A) _% g1 E' @! e: B" Z- a' u                        i:=PartsTable.YDim+1;
                end;
                m:=m+PartsTable[2,i];
! b$ F* ?  |& t" ?+ D! S        next;
8 d8 Z. n( P) K! g0 S       
        Buf:=str_to_obj(sprint("BF",@._From));
" p4 l# [) p; y( W( f% X1 R        @.move(Buf);
, H: U8 x3 [# x& y' P- R9 T* iend;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
9 l4 t/ Q2 Q7 L4 C+ c( @! t这个例子昨天正好看了，话说那本书的例子都很不错~
4 f' S' @, ~- O: }& e$ `5 E# ]不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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