is
0 K$ Y- o" @/ S2 \# W1 z i:real;& _) D$ c% w8 M) o' `, D) N- s
a,b:integer;
8 Y) x/ P. R! k. I" C8 cdo' S2 v" G" M5 o9 F! y) \1 T9 G' W
i:=z_uniform(2,0,1);
) j0 T9 ]8 {* X! n2 e w if i<0.67 then& b3 X% F- P% h* J, \
from a:=1;# ~7 L- e! ~1 u. g* q
until a>6 loop# x/ G& T( U8 a% l' J5 T3 g0 ]7 R
.models.pan.create(.Models.Frame2.SingleProc);
: f% l" h8 O3 U/ K% H a:=a+1;# F/ C, l8 ?2 \0 y6 N. I6 n
end;
+ e; R: R! k; E else
\) ~+ @3 W) z* L' S# p from b:=1 @$ a0 @. ^' U) N- D# q
until b>8 loop' {' P4 U! M- T& ]: Y
.models.ban.create(.Models.Frame2.SingleProc);
" d p: l' n' h2 m& T b:=b+1;
" n+ k: k# U% O) I$ f& v end;
8 l- Y5 S/ X" I3 j- H/ W! C* c: X end;+ s V' a7 @' c% }
end;
! V: ^6 j6 X+ }+ S# j1 t |