is
, J/ A! q1 F5 Z) O/ ~$ L" w i:real;, N- {! U& s1 S" ~' x
a,b:integer;
+ m6 F e; U* p, edo# b2 t& L' o+ g& m! F
i:=z_uniform(2,0,1);
: `9 v1 v9 m' D2 {6 e+ R if i<0.67 then* l0 G# m) ^( j7 ^! O# d3 @1 e
from a:=1;
& z: F# I" U6 _% ~+ e. J$ R: v( q. f8 f until a>6 loop. D% G& c6 U& d3 M, {8 a
.models.pan.create(.Models.Frame2.SingleProc);
3 M) ]- v7 t: ~( V6 f2 `6 [ a:=a+1;, c( X9 f$ ^% ]: w
end;" b6 X. x. C9 S, b! R
else
# M n& ]& u: ]# K9 h from b:=1
8 n+ R& ~- J8 X until b>8 loop
4 h2 Q; S9 }- S1 I& I .models.ban.create(.Models.Frame2.SingleProc);5 u4 k' T( e1 P. N% a& v/ S6 M! i
b:=b+1;
' }: ~2 {$ B* a end;
7 Y* i" l$ G+ o1 J5 d' e& L7 D end;; |3 K0 o4 S W; z
end;
5 E) I2 D; j4 N' K" R |