is
) E* C. V2 P6 r% ? i:real;* r Z% T+ @, K+ K
a,b:integer;
4 e. o |6 T1 k1 Pdo( r- Q4 ]- Y: ~ _6 g
i:=z_uniform(2,0,1);
' ]+ p( x+ Z9 ]3 M3 R) M( u if i<0.67 then' m+ J/ k2 g4 T. z. i9 l+ S
from a:=1;
2 [7 J' N3 w/ p, s0 a* ^. L3 z+ e until a>6 loop
3 q% K/ b6 w8 z( w( C5 J/ T .models.pan.create(.Models.Frame2.SingleProc);$ | g0 i$ r3 v! H, h: |' Q+ X
a:=a+1;
4 F/ A, ]) C! I4 A# S( x7 G W end;
% T$ k/ K+ M- G! w/ J" d else
8 M- V+ X+ x5 \5 ]' [5 ^ from b:=15 m. i' ? o) z% s/ r
until b>8 loop4 A" F4 e" S3 I$ J; I- p4 z7 m
.models.ban.create(.Models.Frame2.SingleProc);5 ~4 ^: O: e9 Y; u
b:=b+1;1 e Y& X3 A" n% Q4 L; }
end;( z0 q7 D8 V' k3 b7 R+ T
end;
1 k c! N% E% C7 N* _7 N7 qend;' M; e1 r1 U% s% V
|