is
9 s6 c# p! I0 e i:real;- G5 F( X( `* ]* \ |8 s. S
a,b:integer;
. s K) _6 C& j9 I! Z! ?) cdo4 x6 q# t( X! J2 @4 T
i:=z_uniform(2,0,1);; G) O& P6 D8 n4 |9 O
if i<0.67 then0 L+ ]+ S6 H; b
from a:=1;# X9 |- r8 ?+ w0 [
until a>6 loop
3 R1 z8 u& E4 Z0 f5 o6 h3 B; I .models.pan.create(.Models.Frame2.SingleProc);
& l8 S: c: K( N a:=a+1;9 S0 I/ T; u( {/ ^0 j! p, f
end;
3 C4 t" |9 {8 V% m else
& W7 G4 e. g0 K% x! Y9 G from b:=10 s( B3 e+ J* { q4 r
until b>8 loop
: x1 |, b# Y( m! y* H8 N .models.ban.create(.Models.Frame2.SingleProc);$ A* y. f+ _: ?1 Z
b:=b+1;! K5 n7 a0 ^5 }" G3 Y Q) [ W3 I
end;/ |- @4 h# a& _1 [: X
end;
. G$ @1 Z. V+ Yend;+ o0 m5 S9 x* [- h1 {8 r" N# q
|