is1 U' X0 ^1 j# p P
i:real;, Z4 X+ Y: x2 \3 P2 Y
a,b:integer;
3 F: U7 d, M5 Kdo
, t, z& G2 Z% Z! z% I i:=z_uniform(2,0,1);
4 ]: {# F2 D5 y9 z2 [9 Z% P if i<0.67 then+ |9 p D3 w8 o2 m
from a:=1;
! Y! u( S9 n6 T: v until a>6 loop
1 a# m. L8 [0 Q, S* B( U7 } .models.pan.create(.Models.Frame2.SingleProc);
E: R. |) H/ Y a:=a+1;; m5 N) M3 k/ T& s6 Y# O
end;$ j9 b7 W) G8 {. G
else5 L$ C7 F& J* Z8 b" Z( d" e. J. M; p' Y
from b:=1
* ^: Q0 ^3 O9 I# P z until b>8 loop0 j i% j/ G8 ~ s
.models.ban.create(.Models.Frame2.SingleProc);, \/ @0 t1 [# |) U" H
b:=b+1;2 k4 n/ |8 U8 t- x5 e
end;8 E' g9 E; ~' }$ y
end;% ]9 K, M; e6 H0 Z& M0 p
end;
+ f/ A- B( l1 Y" W/ w7 Q |