is
y3 d. R A+ s6 S2 d: b i:real;: c4 a) A0 h/ ? g5 d+ ^- f$ N
a,b:integer;
- Z& y5 v; p! Ido: t' v1 D7 h7 n- e. e' T Q
i:=z_uniform(2,0,1);
, i2 m! O* e9 B& f: L if i<0.67 then
/ A1 v1 [) s7 f. f& f from a:=1;
" l! U6 S. o' H until a>6 loop# a& e' c% t/ `1 |6 a) R
.models.pan.create(.Models.Frame2.SingleProc);
; x! P/ Y2 ]# S" \+ w- P a:=a+1;9 i7 L2 Q9 F/ t0 A( g
end;7 C) S, H- B4 N/ I, E6 U
else* Q( D1 v, r( H" D1 h7 r8 p I
from b:=10 c) n8 x& _8 P
until b>8 loop F5 g; \0 ~7 o6 V7 t R& |! `8 h
.models.ban.create(.Models.Frame2.SingleProc);
3 q6 _% x6 B$ T- o* N b:=b+1;
4 S3 P M, Z% W: o$ G6 k8 b0 u% t end;
' U0 L J* f4 p, M( R4 I9 m& j end;$ I- R E8 j0 T/ }) d6 \
end;3 x# t8 g) n6 j( D( C+ J+ c' M
|