is
" Z+ s. V9 o- o* _4 t6 N i:real;5 q# V5 k1 ?) k8 O% R
a,b:integer;
- y! {) O8 E; p3 j5 E. I) @do% \+ f7 h: ^" b8 z% O3 c5 K
i:=z_uniform(2,0,1);, m G [) }* K& d4 w9 Y5 @
if i<0.67 then" A- ^3 z0 s- a* }- F- [
from a:=1;3 _+ c6 p) A+ u1 j* `
until a>6 loop7 L z2 r" S" W4 `0 w
.models.pan.create(.Models.Frame2.SingleProc);! E% P* O( P* ]; v0 |
a:=a+1;8 l1 k, P* j; \% L5 R
end;. l1 L. Y! `# c# I( l
else/ A- |& _" G: W7 d. t
from b:=1
! E- N! b2 g" O* y/ ~+ q, k) f until b>8 loop
1 N, j0 ^: z1 ^: P: J2 x .models.ban.create(.Models.Frame2.SingleProc);2 H7 |7 e7 Y* _9 O1 J4 m
b:=b+1;5 t. r7 s& S0 T1 h* g5 b1 Z( w, l" q" w
end;
/ N' [5 b8 o" m- ^4 t end;# T6 T/ p- i5 F+ |/ a5 z [3 R5 k# Z
end;0 L2 P& p. Z/ U+ w
|