is; e% |" d6 p1 {( ~1 S
i:real;
8 e( `. b, x) x. X a,b:integer;9 D% D# w, \, Y5 Q8 Y* h/ S& q( @
do! W% n9 V8 e4 Q) x" S
i:=z_uniform(2,0,1);
: Z' K. S0 w0 S' J% A if i<0.67 then4 z5 G! m( y5 P
from a:=1;
8 b2 l. f, O, X1 k" f until a>6 loop# q, U0 U- ]/ @2 x
.models.pan.create(.Models.Frame2.SingleProc);
" `! J8 M9 n6 J a:=a+1;0 U% m2 }7 J9 b
end;) I z% n! N( ]$ Z" e0 a
else
/ o L- \0 [& w7 z+ S from b:=19 o2 j$ |5 `* I8 G$ ]
until b>8 loop. v$ v) Z1 |, [/ D: {8 X
.models.ban.create(.Models.Frame2.SingleProc);2 Z! h% ]/ A3 V0 C6 ?6 l
b:=b+1;
' d! I& D3 B% g4 Q5 H5 A* V# ? end;* d$ g' e2 ^8 N1 ]8 E
end;
/ P3 m+ T7 q& B# gend;6 X( q2 }7 `3 W* M+ a" ?
|