is d4 X/ ` \3 s" M
i:real;
; ^) m" d k& q7 d9 v a,b:integer;3 S# \! G* w. m Y4 M9 N
do1 { z0 G/ y- _- ]9 @; R9 b
i:=z_uniform(2,0,1);
% s- c$ d- l6 ] if i<0.67 then
( F8 U; n. V7 P, Q a; W& W from a:=1;
+ S$ |4 ~$ c7 y8 L4 x until a>6 loop8 p, o) @! g4 u2 m8 C; p
.models.pan.create(.Models.Frame2.SingleProc);7 X6 H$ T8 b- a) N
a:=a+1;
# B* n7 X' A0 U end;6 Y2 d. B. F- N
else; F' @* B# O2 h( h+ j. ]- _
from b:=1. z3 g' `1 M5 O1 f* E
until b>8 loop1 z6 i& h" f$ S% e' L
.models.ban.create(.Models.Frame2.SingleProc);. ?* l: Y0 m7 t6 M
b:=b+1;
8 P0 Y: w2 g2 J8 l0 ` v3 o4 P end;
+ P' O C* y7 z& f7 L0 K end;/ U P6 Q4 o3 J5 ]$ p
end;' W3 n/ J. ~ w) S' O
|