is
9 D+ u/ u" T. w+ X i:real;, E) W) z7 [6 v7 }5 Z' S$ c
a,b:integer;6 M- Z1 f( S- v/ @
do
& Z6 H6 Y1 [" V z i:=z_uniform(2,0,1);( Y* \! r9 w: R% F5 O; e( s9 _
if i<0.67 then
) n2 G6 b* T; U: p# K from a:=1;
" G& }- J9 r" i0 O until a>6 loop! T& z1 I o+ ~6 B( e
.models.pan.create(.Models.Frame2.SingleProc);
3 f& E$ P2 E" ` a:=a+1;/ U5 X3 |* e* A1 p2 t1 m) S# O
end;5 m$ G$ o5 L& g7 z, V, Z
else
7 N! {& k$ p7 s: U6 d* e( d from b:=15 y5 ?& C$ u+ ^0 [9 F- G4 u( `7 |
until b>8 loop; a. l# S9 b W: i9 p- T) z
.models.ban.create(.Models.Frame2.SingleProc);1 u' c8 Z8 q4 E0 [
b:=b+1; Y* I! i& ~( m! q# t& j3 [; P2 o
end;
) ?: M6 N; g; n$ X8 R3 M/ J0 ^) j9 q4 T end;# m. i4 D- J& H5 S
end;& y$ d8 Z* Y* k' D
|