is: z) t: x" X% ~; s6 H% {2 q
i:real;
7 ^) H: ^' z: I/ F a,b:integer;
' J5 B, Q! G. \' W0 |8 Mdo
# \' j8 p) `% ^5 Z i:=z_uniform(2,0,1);, @- S& Q* }% w7 Q& ?. E8 a% H
if i<0.67 then
\$ Q8 g I) y1 V from a:=1;
& I# P3 {6 D3 k until a>6 loop8 v+ [) G; V, _8 P5 v \
.models.pan.create(.Models.Frame2.SingleProc);' H& j' H1 |$ z% N$ x6 s# w
a:=a+1;
- a/ d9 K) j. _# j# \) K2 H$ l end;
+ G* K5 O- T! Q: ] else
4 u2 d: K# i3 E6 y/ W' f from b:=1
8 B/ ?7 X" h ^! h) J, q until b>8 loop
/ L# p- M5 Z ~* x8 m5 T .models.ban.create(.Models.Frame2.SingleProc);
( }5 r1 y8 n/ r/ a( x7 O b:=b+1;
6 C# }, e) S5 X0 [ ~. w end;- o" e% P# m& S6 [" K
end;
# T: G% a s; x, ?3 b6 Z( Aend;
5 p. a+ H$ G$ K4 i+ J" ]' R. y% l |