is, k9 Q/ @8 z; ]( F. \9 V: _
i:real;
4 i# w! ]0 I* g* H/ h9 ^9 _( y) Q. s4 A3 W a,b:integer;
' ?/ z7 A i& w3 Mdo& w% P8 E5 [7 l1 n' Y# u1 j R9 c
i:=z_uniform(2,0,1);0 D6 J! l3 @ K, F
if i<0.67 then
+ s& g0 F* e0 L/ w from a:=1;. w& A* J$ E) i
until a>6 loop
& |1 S+ {- j: {7 q/ m .models.pan.create(.Models.Frame2.SingleProc);) ~6 K, m2 h M# V2 k
a:=a+1;2 Z4 j. @, w& |2 g( g. q
end;' ?. V# Z# s8 q+ [7 C; X7 R1 r' `6 Y
else5 \ S" }" ^7 q# s3 H, n& S- n; W B
from b:=1+ [5 s% h; C# D& F+ d& W5 }
until b>8 loop
4 m k% N% @* n5 }7 c s; E .models.ban.create(.Models.Frame2.SingleProc);6 B; X. W2 v( Q$ _: \6 s
b:=b+1;
" q( b7 S+ s3 R+ a2 S2 C end;+ a6 o6 H% r) T( N
end;
# f i% q4 d2 Q1 Yend;
1 @8 {9 [& u0 e% P9 m |