is
3 `, M% n/ s+ Q3 D" [ i:real;$ v' D0 I$ s. K6 J$ f
a,b:integer;' ]1 o% a& h$ P' c1 w4 J1 Y
do
) S# a( B2 }) e1 q i:=z_uniform(2,0,1);5 a8 B# w& k" L1 j3 x1 u/ ~/ c0 ~
if i<0.67 then4 w" K/ v8 |# H" m' w+ Z+ {
from a:=1;
/ t* w4 [3 S1 l( z! O7 v8 l until a>6 loop
* x0 e+ W" M# y" Z .models.pan.create(.Models.Frame2.SingleProc);& {2 v7 P# J: m/ _5 \1 u1 d0 c# D
a:=a+1;
* D8 S, l8 C6 c$ f; `; x* Y4 _' S end;
/ u0 x0 N8 z. N! d6 k else. j% s7 H% v6 O$ y0 U
from b:=1, Q$ V% K% t1 }) M: F! }
until b>8 loop! ?3 p* s0 X8 L+ _, L7 h: W7 c
.models.ban.create(.Models.Frame2.SingleProc);
6 Z( r( y, N( ~" ?9 C) W' { b:=b+1;" g' z9 q/ h% E: p
end;
* ]- M0 m6 m4 w/ C/ }' k* `' u7 q; T" N end;
' H3 X$ |" Z/ w% l0 w: Nend;
! m# t: ?5 C3 S" w# K: S |