is
! J4 ?; r- }8 x9 ^8 l i:real; N2 T$ Q" ?# a" }* U8 E( A9 M1 E
a,b:integer;' ]" k8 U- q. q
do# ^5 s$ L" i8 X# x1 B) e
i:=z_uniform(2,0,1);. `& k. K' V$ J7 I
if i<0.67 then
p' L, o. U$ ` S; V9 V F from a:=1;
$ n8 j4 R6 @% G until a>6 loop1 Z+ ]) O; t8 Z, i x
.models.pan.create(.Models.Frame2.SingleProc); I$ i: J2 T0 H& W; @! q" W! m; C
a:=a+1;: B& H9 u$ x' H1 H' Y, W
end;8 d" R0 j3 p& c$ q& c; ~, r" [
else1 ^3 N# k$ I" d8 [3 A0 T" P
from b:=1, I/ j% S4 H: v0 M+ e7 ?8 E2 z
until b>8 loop
! j5 N% [# p" T" D$ q: ^ .models.ban.create(.Models.Frame2.SingleProc);
# U" g9 A/ _5 E6 M1 E2 P b:=b+1;8 C, Q: [- T) T) a& j
end;
" k$ C6 M: v! W- q end;
( g- S* c" M1 F+ x0 O# }1 J$ d; B" Mend;
8 x/ B5 ~! {' N |