is7 a5 `1 W' i' O* }. p
i:real;
# a; {2 `( G( J9 t6 l6 O/ Q4 R2 N a,b:integer;* J/ @- I' n1 ~, k( Y
do8 L, Z- J+ X% \. ~+ E
i:=z_uniform(2,0,1);
, r8 T. ^5 N; }& S if i<0.67 then
4 ?6 r. d3 m- N g from a:=1;
& W! e+ i0 \' Y; }' r# C; g until a>6 loop1 x8 L; v( _0 m! e2 p8 f9 v0 g( l
.models.pan.create(.Models.Frame2.SingleProc);- k9 y) i E5 M# y: b# c* }5 L
a:=a+1;" {1 n g/ T3 H j
end;4 c+ W+ \$ Q3 V5 ~
else
7 R. Q4 N7 B% ~- Q, Z1 e from b:=14 v/ I2 C! c# c/ ]8 a. U
until b>8 loop( c: N" d: }$ @! Z- _! ?: |2 V
.models.ban.create(.Models.Frame2.SingleProc);% K- z0 V9 t0 D n$ V$ j# I/ D
b:=b+1;
2 h0 y6 d1 ^0 s' z) P end;: z4 \4 ?( z3 ?* i5 G- U: U
end;1 B; d- V; x3 P Q) W) C
end;
0 f" \% g) V# E: O, i3 w |