is
. h9 u P; b" }7 y- w i:real;' q! ?8 V" @- X$ N- E7 {( x9 W
a,b:integer;
/ X: k1 l/ ~1 f- d/ a5 f7 sdo9 Y1 a' U1 m) n5 o8 M1 n
i:=z_uniform(2,0,1);
" x: t8 \" A: R/ ~- O5 v2 ? if i<0.67 then# S N9 ?7 L# B' ?* n9 L5 j
from a:=1;/ Q7 ^ ~1 F% [3 U& x
until a>6 loop5 r( A% b% J* p P0 Q4 ^
.models.pan.create(.Models.Frame2.SingleProc);, x, B5 m& o8 L" ~
a:=a+1;1 X/ ^- V" q" S2 N
end;
- Q! T# o# T& |& [# j$ l, u else7 i8 b; W7 G1 i- M
from b:=1
0 d6 S0 u/ x1 x0 p7 P% N+ k+ e$ d until b>8 loop
. |2 y* K9 D g d: H .models.ban.create(.Models.Frame2.SingleProc);# w0 @6 h: h: b7 T% p- ?$ Q
b:=b+1;
- v# c: F- _+ r end;
6 N- p3 g% X; z0 a8 O; p- c end;
% C5 l7 U3 |. r' f( x$ \. Fend;
9 |5 S d9 y2 l7 j5 I |