is |# p; f+ W, Q( H& K, N' B1 m
i:real;6 s( K' b) O u6 D$ k- U
a,b:integer;1 K5 A/ `- }# q, O; Z2 E
do6 S" O; s6 h S2 R( w6 v
i:=z_uniform(2,0,1);
, C' L4 Y/ k. h3 Z if i<0.67 then- {, n" w! S5 P3 D9 Z# Z+ Y! o
from a:=1;% `+ _) |9 a# C7 c/ _5 m
until a>6 loop
% B5 R8 {* N1 W) }4 A s! {) v .models.pan.create(.Models.Frame2.SingleProc);( l* Z) ^* f. Z" [( j
a:=a+1;
& o4 o# c2 ^; n' P end;
% L) @4 ^( E2 W1 ?* `- f else
4 x; X1 b6 V# ~1 [! S& a) U) U( p from b:=1; g$ q) H3 o0 r
until b>8 loop7 e* Y c y' w7 t3 C% q% S
.models.ban.create(.Models.Frame2.SingleProc);! y+ X# z0 ^) P; A# A
b:=b+1;
$ I) Y6 y, i/ X end;
& [! i4 `* t$ V* x& |4 I end;
9 G) l3 o5 l# d! U8 B. Send;
$ ~& l- A" n5 G |