is+ `8 g$ L Z6 Z; U" ?& V/ p n
i:real;
1 |4 x; b* }3 l a,b:integer;% \ l9 |. ]& U9 [0 k& p
do
- r4 {6 e/ N3 R( k& D8 y8 O i:=z_uniform(2,0,1);2 d; K$ o1 P, [' u8 t: c% ~
if i<0.67 then
* _8 X0 W! v) l( v* i, p! C8 r7 u from a:=1;6 H4 B ~. ?) _5 V3 R: R
until a>6 loop: N5 c! _! y7 Q+ J# a9 b4 W( Z5 J6 |
.models.pan.create(.Models.Frame2.SingleProc);
! {% n3 @0 P7 K a:=a+1;3 l( @( {& @/ A$ l8 [. B' p x3 C
end;+ M; s5 V; M& | M I
else, g7 O5 n& w: `5 i8 R( M9 o
from b:=1
) \+ F+ f; c+ ` until b>8 loop0 m" Q+ ^+ @- I% @5 k2 v
.models.ban.create(.Models.Frame2.SingleProc);! |7 c/ f0 Q3 b+ Z
b:=b+1;$ J q8 n4 a' c( l9 R8 `
end;) F9 \. d" J, v' \2 r D
end;* l3 |5 t2 `; I( P/ t6 L6 p
end;+ m0 e1 H0 d3 I+ h) l
|