is
4 E2 Z- I7 x" h/ h& l, y" z+ p i:real;/ a8 a, l& O: p+ _) }1 @! C7 K/ ^
a,b:integer;
- M9 M8 l, r7 N% A8 Hdo
: D) P6 e+ u" N+ B9 s; c i:=z_uniform(2,0,1);
& C1 d, d, z$ c2 f+ E if i<0.67 then
6 M7 q9 h5 S8 z6 }0 { from a:=1;
# ?9 @' B) S* C! I1 m0 z% l0 I" I until a>6 loop$ A/ z' Y2 E; G1 l! C6 T% y
.models.pan.create(.Models.Frame2.SingleProc);
" Z% l$ F* j# l i. T$ } a:=a+1;1 V. A% r- ^5 M
end;. B4 B5 T* X3 S/ g' C
else
0 L5 e+ u o1 s3 \9 ^$ U7 p: f from b:=1
- i$ _# b7 I1 B: p% t until b>8 loop7 ~6 S& k: m) e& h. ~7 L# P
.models.ban.create(.Models.Frame2.SingleProc);
3 j0 {% n: V |( T& X t/ P b:=b+1;: j! l/ J8 L+ a7 s
end;
+ G+ w5 H; p5 O end;& L4 f3 d' c; N! a6 g
end;
D; T, B1 D7 f0 r; P |