is5 e1 L, Z, P1 T" E! Q* _. j" E' [
i:real;
' y- h6 W# g: \1 x8 x; f a,b:integer;
3 {' N* _+ ? b# Mdo/ |7 i7 J2 [, z4 O5 Y7 u
i:=z_uniform(2,0,1);
5 C" O$ u: A$ J7 a+ n if i<0.67 then
; ]& `( w) R ^! L( H7 y from a:=1;/ s8 U& {9 t+ H5 }
until a>6 loop
1 X% ~3 }, s1 N4 G1 O: H1 f' w3 m .models.pan.create(.Models.Frame2.SingleProc);" O: \2 T( C( n( v+ R
a:=a+1;* {5 c3 n1 g8 z. |: Z
end;1 c* T2 N! R$ m% ]( J2 Q0 I
else/ @* p# Z. v7 ^! `4 q4 e/ n' j
from b:=1
- O; J/ J: i* T+ T) l f until b>8 loop9 h) A7 f0 B! m1 Z, |. ^5 x
.models.ban.create(.Models.Frame2.SingleProc);
5 _( G0 X* S/ ?6 G% T. x- m b:=b+1;
_) Y0 D$ E- Q2 }+ b6 z2 B end;3 y) a7 P2 X$ P* x) q
end;
6 W' f! d/ s( ~! c3 w* ?end;' A0 v( J# o! z4 {* ?3 u) g. M
|