is L9 O2 M d/ [9 e
i:real;
' k0 U& Z7 t, L6 W% \ a,b:integer;
. D/ J! o' g# F. C, T5 Mdo
" z) w q# o. c( d4 \3 o9 | i:=z_uniform(2,0,1);
1 x. T* `/ |. J1 k; Q) Q7 T. [% t if i<0.67 then9 T( T8 T! F2 f, V& {
from a:=1;
! h) l6 A, E6 y3 a2 n# }* c: G# Z until a>6 loop& C* l; H: z/ b" ^2 t3 o+ C5 l
.models.pan.create(.Models.Frame2.SingleProc);
& F, w- x' i+ \, z( ^) w8 \ a:=a+1;
, d/ A/ L. @ `# F, j& ]1 z, G end;
0 N. D+ @0 v" J {2 m' x0 H1 | else
, p3 T3 v/ d0 |% Y/ B9 @1 L+ i2 n from b:=1
* H' Y D, x4 @+ D& t* H% h until b>8 loop% a# A: ?* ^" h4 e# } D
.models.ban.create(.Models.Frame2.SingleProc);
. O P! t9 f0 ]! f b:=b+1;
" B/ c6 L( P& _$ [7 O+ \0 \% y end;
( d. q; h# D5 Z) I, ` ^ end;
2 }+ K! x/ g7 Iend;6 V1 i" |' r1 d( A
|