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

热翔啊

is
; t' s# Z! C. q: [        i,no,m:integer;
        Buf:object;
do
, H! U3 C1 e2 s4 X/ h# v/ |+ M- m        m:=0;
        no:=@.getNo;
        for i:=1 to PartsTable.Ydim loop
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then
! z9 `- @9 ~2 _  h                        @._From:=PartsTable[5,i];
# o; z& u' O2 ]3 a                        @._To:=PartsTable[6,i];
; o' V+ U" j  F/ M7 r( B3 d                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];
                        end;
                        i:=PartsTable.Ydim+1;--跳出循环
                end;
                m:=m+PartsTable[2,i];
( t7 A2 d/ M* H5 v) U! K! d# m0 A; y5 J$ f                print m;
3 j3 m& {& |6 @: c: [  L        next;
        --先将零件送到From位置
5 C9 b# g. ?1 Q6 c' T& z        Buf:=str_to_obj(sprint("Machine",@._From)).buffer;
        @.move(Buf);
( h* Y5 U% G) lend;

这是教材上的，我想要详细的语句翻译，编程基础很不好~~~~(>_<)~~~~ ，所以先谢谢

乘月以待晓

这个例子昨天正好看了，话说那本书的例子都很不错~
% E' a; F9 ~) T0 v  c+ H% T* D不过你还得把前面的表格看明白了才行，不然我这边解释也不行的。
is
4 ~7 ^( R9 u$ `) Q) u4 C4 x! b        i,no,m:integer;       --定义整型
# R5 J  [$ Q2 U8 g        Buf:object;            --定义object
do
0 z$ u2 H# Z5 Z1 T+ e6 ~/ c        m:=0;
        no:=@.getNo;   --拾取进入系统的实体编号（每一个物体系统都会默认的给他一个编号的，出来你自己定义外）
, Y9 ]9 M' {$ N" |7 ^        for i:=1 to PartsTable.Ydim loop       --YDIm就是指这个表格一共多少行
                if PartsNo=m and no<=PartsNo+PartsTable[2,i] then  
+ B$ Z! ?; S1 K( k                        @._From:=PartsTable[5,i];            
                        @._To:=PartsTable[6,i];
                        if no=PartsNo+PartsTable[2,i] then
                                PartsNo:=PartsNo+PartsTable[2,i];  --这边整个语句实际就是在说，PartsNo就是要运送的数目（表格第二列的都是运送数目），而no与m就是用来辅助不断向下读取表格的数据的（这个逻辑你要自己推敲，说的话可就长了，把数字一个个带进去）
1 @: J4 `( _; f( b7 x
                        end;
4 x( }  F' w3 s4 \: @# C                        i:=PartsTable.YDim+1;
( Z/ O! m3 s9 b" E6 Z( R                end;
& z0 Y/ X% a* n! z: M# s, o  [1 K                m:=m+PartsTable[2,i];
  R, {6 t; `* p# ~4 F/ c, t        next;
       
  r6 K. \+ v- }! y        Buf:=str_to_obj(sprint("BF",@._From));
        @.move(Buf);
, x6 s. ^0 Z( _" p: V7 p2 d; a2 ^end;

热翔啊

乘月以待晓 发表于 2013-4-23 15:11
这个例子昨天正好看了，话说那本书的例子都很不错~
" l# g9 F. n, i6 a+ c* G" M1 G$ Q4 p% U* v& J不过你还得把前面的表格看明白了才行，不然我这边解释也 ...

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