is
5 Z1 G' @- J6 N' P1 T6 j: w i:real;
' T& k. B8 ^% E+ X2 N& t4 Z- y a,b:integer;
/ p' P4 x4 \& G3 udo* }. [/ [5 @) {8 {
i:=z_uniform(2,0,1);
5 |7 h( x' n( k+ S( A if i<0.67 then
; J0 s5 R/ ?( y; o7 X7 o from a:=1;) P: G+ ?& z6 h( R' P3 X; O3 U
until a>6 loop
9 e! N& Q0 n( E; l' K .models.pan.create(.Models.Frame2.SingleProc);
2 ]; f: ~1 C, { a:=a+1;
8 ?9 I, e8 g5 D7 { L8 b% G end;. g% R* r p1 V8 y5 a5 w
else3 ]& Q, Q6 Z% q( [, ?- \
from b:=1
# }. Y' w ~6 V9 K until b>8 loop( ]% n6 r u0 {" n" `* p9 Z
.models.ban.create(.Models.Frame2.SingleProc);
6 s- D$ I: ~' L$ F b:=b+1;
: v" E% `# c7 y$ P: F: a2 |* u end;6 _9 j4 z$ g2 a2 C
end;, z! P, S9 \6 t! R" S8 z
end;2 R( \- u5 v3 D6 e) k
|