is$ C7 s. E k7 e
i:real;
+ q& u% c" W- [8 C* Z) ? a,b:integer;: Y8 {' h# p0 L9 a/ ~
do! z: |0 H, ]+ y% L& T
i:=z_uniform(2,0,1);' i c5 U* K9 |; |. ] }8 G
if i<0.67 then6 L4 R" V5 {. I- S Z& ]% ~8 n/ K
from a:=1;8 U5 ~1 e! V( G+ p& Y; Q
until a>6 loop
, }* M( }7 c7 w% p .models.pan.create(.Models.Frame2.SingleProc);
& P5 J; V6 D" ~ a:=a+1;
; o. ]9 z6 R: o1 t+ ^8 A2 Y end;- c4 ]! c+ h" f$ Q9 u3 i
else# N( N" t' [' s. l2 E
from b:=15 Q l- l; l/ c6 q2 Y7 X6 h
until b>8 loop
/ d- F; |0 W u1 k) r, ~ .models.ban.create(.Models.Frame2.SingleProc);& s0 C! z: K3 T
b:=b+1;
& \+ ?9 P. q0 {9 w end;
4 d9 f. H, l6 a2 O: F& S end;7 ^. ^* Q4 `; @, M
end;
h8 b4 X2 ?0 [ |