is
! f6 P/ E* a4 g# `7 Y. a i:real;
/ n& F0 @5 a4 {6 N) P B a,b:integer;
5 a2 U& ]- m' Y- a, ? G. [. |do9 u! N' P r2 h3 g7 r0 F0 p
i:=z_uniform(2,0,1);
! |6 j- ~% M P+ P' d* [) J if i<0.67 then! V8 w0 Q% t8 ^! b; @. m2 w
from a:=1;
- G6 S9 F( ~0 Q; h# P$ L until a>6 loop& j6 N( W3 ?7 L5 p! R% ~% i) ]
.models.pan.create(.Models.Frame2.SingleProc);# A* k) G5 [7 F2 d
a:=a+1;& \# a1 U5 v' X/ ^
end;+ ~. Y' D8 }# S. U6 q, H" @
else
/ {0 ] e: D3 t. g from b:=1
4 Z6 R, {# ]1 R9 E! L) v until b>8 loop
' P n9 \4 O) a# c& O5 D .models.ban.create(.Models.Frame2.SingleProc);
* M: I0 p8 l0 Y+ c0 d3 y- o, a/ b9 S b:=b+1;, e, E: I- _3 s1 Z+ N! s
end;
' U* M* [0 ?$ t# W5 ^5 c end;2 {: B$ r& q0 j8 k1 _
end;
/ ~1 n J) D) W |