is; T0 K3 o o0 H+ U6 j
i:real;& a7 H6 Z% V# g( f
a,b:integer;) N7 g* J# Y" K* B) j: C: [% _7 S+ U
do8 t# W; L& |4 e/ X& n' M" k
i:=z_uniform(2,0,1);4 }6 c% p$ O" ^; r9 U' A
if i<0.67 then
6 ]0 B* M6 k/ e, a( c from a:=1;; u& q7 W# x n' Q9 l
until a>6 loop5 O5 Q$ x2 U4 y: M# n
.models.pan.create(.Models.Frame2.SingleProc);
5 }) c9 V/ {. [! B" T8 d9 D5 C F a:=a+1;! C7 X) A" G- [# w2 I- z) o# Y
end;0 M/ D/ c I/ p9 L. m7 f" I( k1 C5 f
else1 `0 r- N5 w$ {* ~, [1 H
from b:=1
2 f7 V6 x w* p9 |- J until b>8 loop
8 ~8 y2 V! \& x7 Y$ Z& v8 R9 ? .models.ban.create(.Models.Frame2.SingleProc);
3 n$ R8 o G! ^- u* `' n [ b:=b+1;
d5 [( I1 l4 k end;
2 M- t. ~, Y( F end;" s" g+ x O2 H/ M5 F3 _; m- G' _
end;
* Z$ U* |0 Z5 ?. Y; E6 c( k |