is
: ~6 j7 h* S; S# ^' P i:real; Y/ \+ _0 f3 ]' i4 N4 y
a,b:integer;
; z' D c* b+ Y5 q' ]5 W( mdo
+ `, e. x) V) w7 W1 H i:=z_uniform(2,0,1);' H5 x) o* u# r, C# r h7 O
if i<0.67 then& t: c# r: h' f& k7 h7 A7 S$ _
from a:=1;
+ E+ y2 d- s: { p, G until a>6 loop8 O6 U* l0 H( b' [1 t0 g
.models.pan.create(.Models.Frame2.SingleProc);
- n: c( d/ H/ w1 j8 }- E- [ a:=a+1;
3 k. t/ H" h) T1 X4 J4 v* x end;
, y% y- ]7 R# T5 ?3 E* i( d' Y else0 [% e4 I) E$ a# s
from b:=1
7 N: n$ S, m8 n6 e3 o4 ^ until b>8 loop
C5 R2 W- Z, `7 q2 @, } .models.ban.create(.Models.Frame2.SingleProc);
; | }4 o, Y" o; l b:=b+1; K& K* N) \% t* X; P
end; z; M" g8 r5 b4 i2 N0 ]6 T
end;( ^# M# \- i7 ^- n: J8 H& V
end;
( d; A# K) B; D |