is8 h# \2 y5 C) W: x
i:real;, m# ]( t% v E. C! a, G# Q! s7 c
a,b:integer;
0 n5 k# m4 c; m/ Y& Edo z! r8 S$ m/ w0 [5 r
i:=z_uniform(2,0,1);
+ g- c* |6 Y! O) ~$ A1 ? if i<0.67 then
1 D* n, D6 \; V* L y9 Q6 L' R" i from a:=1;% {) a) M {) ^& ^9 U d8 Y
until a>6 loop
4 W. N' p" o+ ~' G- E; n+ J .models.pan.create(.Models.Frame2.SingleProc);
$ i/ m) ~# E, U' G8 t" i a:=a+1;/ ~+ ^4 k8 s; Y! J# }; }+ t
end;
# a ~- c0 ?, W, B8 V' h# A& k S8 ^ else
0 B9 [- |% A% W& Y from b:=11 \9 `- R1 {2 I) X0 F
until b>8 loop+ C( n# R7 \+ V8 `7 \
.models.ban.create(.Models.Frame2.SingleProc);# y- T: f- i/ z5 w7 Q, I# e
b:=b+1;* A0 t" d! j+ }$ {6 e
end;: A# _( V% C7 F9 S9 w
end;
/ P0 n7 Q5 n7 ~6 A6 y4 n8 [3 yend;
" c/ l4 @& N) G# K3 \ |