is
9 i1 J0 |( B. \/ F! w: J# B i:real;) A' b. E+ x7 n' `: P) r0 B* k
a,b:integer;
7 H2 T7 z2 |0 j5 @- y+ q$ [do
% ~( C( |! w v3 X$ t i:=z_uniform(2,0,1);
! c4 @% Y7 i% ~* l* i5 _. b) A$ L( M if i<0.67 then
6 G+ M& F, o" G from a:=1; V4 f3 V; V, ~% o! E
until a>6 loop
& R) J1 `( @3 h .models.pan.create(.Models.Frame2.SingleProc);
9 x' v& z" P: f$ I7 s7 m/ Y- X a:=a+1;
( I( D) J* K, e$ }9 V2 S, e; V end;; u$ u) s' g- M3 E0 i D M9 X
else: G: J4 `! H) Z
from b:=1
! f; ^1 j/ V# K: b, G8 P$ ^ until b>8 loop
3 }$ ^7 d3 O* A. D; T3 ~3 ~+ I .models.ban.create(.Models.Frame2.SingleProc);. f3 }2 W. o0 E3 g& v
b:=b+1;; Z2 R4 i% {; v% r8 a+ c
end;
4 Z/ @9 K E, O5 _ end;4 v" f# K. k& {7 {# \5 w& A' p1 ?
end;
3 }5 O8 e8 Q" O |