急，请高手帮忙分析一下

vision

is
+ Z. A; x) l4 F& Ilocal links,rechts : integer;
# L4 d& i7 N. g5 wdo
6 s" u* c1 K3 p7 e8 ?4 ~  if @.standort.nf(1).nf(1).voll
/ N, d0 w0 \. M, f+ m& X5 }     and @.standort.nf(2).nf(1).voll
" @+ f9 T$ U& H* p2 S6 ^3 b     and @.standort.nf(3).nf(1).voll
  then
    blockier_merker := TRUE;
5 A5 u% {. S0 ^+ h& u+ g6 |  else
    if @.standort.nf(1).nf(1).leer
      then
5 W) }3 P; S: [6 a: O$ K# }      @.ziel := "ap4_C";
2 {. d4 e6 }7 |7 {- Z5 }      @.umlagern(@.standort.nf(1));
   else
7 ^0 v+ A+ x# m2 I# D0 o" z      links := current.standort.stichE.AnzahlBEs + current.standort.stichD.AnzahlBEs
      + current.standort.zuf_E.AnzahlBEs + current.standort.zuf_D.AnzahlBEs
      + current.standort.ap4_E.AnzahlBEs + current.standort.ap4_D.AnzahlBEs;
      rechts := current.standort.stichB.AnzahlBEs + current.standort.stichA.AnzahlBEs
      + current.standort.zuf_B.AnzahlBEs + current.standort.zuf_A.AnzahlBEs
      + current.standort.ap4_B.AnzahlBEs + current.standort.ap4_A.AnzahlBEs;
      if links > rechts
; f+ \( \: w9 Q& m        then
: J/ P3 ]% T5 |5 z* s# r# S         if @.standort.nf(3).nf(1).leer
! G+ `) v( l5 [1 U% c  w         then
7 {. l6 [2 z% {: L- s           @.umlagern(@.standort.nf(3));      
% X4 L7 u4 h, I$ p9 c         else
3 [4 G( @. j4 ~) _. E          if @.standort.nf(2).nf(1).leer
4 }$ v4 Y% M5 p1 T+ \- k          then
           @.umlagern(@.standort.nf(2));
          else
. e, z9 k8 K% c           @.umlagern(@.standort.nf(1));
          end;
         end;
; y; x  e3 u/ Y" H/ u      else
         if @.standort.nf(2).nf(1).leer
8 @$ {: l8 u) a8 T  }4 D2 i7 c4 c         then
: F: g- J- r, d% i- r8 V           @.umlagern(@.standort.nf(2));      
         else
8 g5 M& N2 F/ _4 R4 ^4 F- H          if @.standort.nf(3).nf(1).leer
5 B) F* d" J6 U9 i  @9 I          then
           @.umlagern(@.standort.nf(3));
7 R$ }2 y% t& t6 S; j( T          else
! O# j, {  a  g' @0 R           @.umlagern(@.standort.nf(1));
          end;
        end;
, y8 U/ U6 P" N# @/ Y     end;   
+ z6 @+ ^7 {% z4 k: s    end;
: S) J0 W  Y7 v6 o! [  end;
if ?.leer
then
- B' T" g* c# r9 f( d+ m blockier_merker := false;
end;
end;
( p8 p  W% T: ~' N6 e& P" Y大家帮忙看看上面的程序是怎样实现分配的，好像用了一个遗传算法的。

pipilu

最好全传上来

tglwolf85

你要把整个模型传上来，否则你里面的entity名称，根本就不知道他们的逻辑关系，也就无法判断语句是否有问题，，最多也就能判断其语法是否有错误，它在method里面直接可以判断！