急，请高手帮忙分析一下

vision

is
7 y- B& P: h6 h3 Flocal links,rechts : integer;
2 P$ w; ^' O. [% ]6 R: N: @4 Z7 Edo
  if @.standort.nf(1).nf(1).voll
' [, u0 W9 U$ L* z     and @.standort.nf(2).nf(1).voll
! q. \# n* g! i) i     and @.standort.nf(3).nf(1).voll
  then
    blockier_merker := TRUE;
) r% B" O5 ~4 X. |- J* ?. M' M8 j* }  else
    if @.standort.nf(1).nf(1).leer
2 x; }- ]: Z" Q7 B7 }* E( `; G# |      then
! j7 x7 R; k' U' t# @      @.ziel := "ap4_C";
      @.umlagern(@.standort.nf(1));
   else
. M$ K+ t0 z" n6 J      links := current.standort.stichE.AnzahlBEs + current.standort.stichD.AnzahlBEs
) Y' k/ @$ A0 {* V      + 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
. H" }/ N: ~" P' [2 a0 U) k      + current.standort.ap4_B.AnzahlBEs + current.standort.ap4_A.AnzahlBEs;
      if links > rechts
        then
( ^; [2 p# w9 F9 a- A, p         if @.standort.nf(3).nf(1).leer
2 v! [" ]$ z* K; `9 a         then
" l! J  b& G6 a* a7 d           @.umlagern(@.standort.nf(3));      
         else
          if @.standort.nf(2).nf(1).leer
          then
, v/ Q' ?& V0 z9 r1 d/ B; t5 |           @.umlagern(@.standort.nf(2));
          else
           @.umlagern(@.standort.nf(1));
; z% A: F% R$ z" h          end;
         end;
+ b4 Q6 R% L3 j: W# v. S9 S      else
( f$ P' }7 b' X: e( V! ^) y0 I; \( h         if @.standort.nf(2).nf(1).leer
- L" k/ l: F7 q1 A$ Y* ~- [9 r         then
           @.umlagern(@.standort.nf(2));      
9 T- S3 G6 e3 X( J0 p& d2 I         else
) f0 T( K) s% S; s          if @.standort.nf(3).nf(1).leer
! h' ~. E* A) k( [' p6 S9 s6 D          then
           @.umlagern(@.standort.nf(3));
( g7 O' `+ I, Z2 g4 A8 p          else
! H3 g% P  U8 B4 q" h6 z           @.umlagern(@.standort.nf(1));
9 \6 I4 K" {+ r8 B# ^          end;
4 h  q1 q$ p( R- E! |/ i& r        end;
     end;   
7 r" Q9 G. y5 z, j& U, N1 M2 K    end;
* `# f& N5 I7 K1 P  end;
5 t' w5 M% [/ R+ r# S1 Jif ?.leer
0 T; V0 _' W, o: I: bthen
blockier_merker := false;
end;
: H% e( @! {$ Jend;
大家帮忙看看上面的程序是怎样实现分配的，好像用了一个遗传算法的。

pipilu

最好全传上来

tglwolf85

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