is$ Q) i! e& ]! E7 D( l
i:real;
7 @. U, _& }3 L: Y# h/ ~ a,b:integer;) A- p# z! S' j
do
8 Z$ j( L* _* V i:=z_uniform(2,0,1);
q, l1 m; S0 ]! s if i<0.67 then& J) r) P* ^* ^; z
from a:=1;$ ~! D7 Z6 i: s$ Q9 E, t
until a>6 loop; K. y$ w. }9 \6 T- d- B- ~! ^
.models.pan.create(.Models.Frame2.SingleProc);
) S; E' A, a8 ?& L. _$ H; @" S a:=a+1;
; \/ P: n& A2 ^5 S. g/ E end;
* h- v8 F1 R7 |1 }& ~) {1 k else+ f2 D* |1 I) A8 L L7 g
from b:=1
& \& a5 F8 {6 U& i' d0 B- J until b>8 loop; V, @$ |; B2 W$ }% e
.models.ban.create(.Models.Frame2.SingleProc);4 m/ @6 J' X/ y2 b& y' ]. m/ ^
b:=b+1;. A9 ^, S9 i9 _: p
end;
- c+ f" q8 X: i R U8 y; p% t end;1 G; L, c1 R, \. n8 ^
end;7 P- O# ?% a; b7 g
|