is
- m0 E4 d! i/ c! M i:real;
! L) r6 b! J, o( e, }- u& _ a,b:integer;
0 l a- }) b. K( a8 T9 `9 Edo) R7 L9 n, _: ]
i:=z_uniform(2,0,1);1 i' n! t1 ]2 u' P, u
if i<0.67 then
5 \% W. r0 N$ R! e+ c( Z" ^ from a:=1;
" i% y3 l/ t- I. S3 N until a>6 loop: N5 w3 v2 }: c% b
.models.pan.create(.Models.Frame2.SingleProc);
9 u: ^' f$ J" u a:=a+1;
% B! F; W0 w, y ^ x% Z5 W/ ~. F/ p end;, C/ G+ F3 P% w
else
' C/ a% H9 w! [7 U: L/ U& |2 \+ S from b:=12 c2 r4 G9 V% ^4 z% A0 c
until b>8 loop
; f, h. I9 d7 g5 L3 A .models.ban.create(.Models.Frame2.SingleProc);* f- i, O$ L; f* G. m
b:=b+1;& H8 y- U& z: G8 ]
end;
: @+ e; M( u- ^6 i2 d end;; `% q/ l$ }( z
end;( e6 n% W4 x! E: ^3 W4 ~$ B
|