is
1 {9 Y# w. ?) }" Q8 q. T3 ^ i:real;
1 U6 X1 L% x. O9 W. U a,b:integer;; U, p5 P+ Y7 j
do2 [, G# F# X4 \: ~, X0 _
i:=z_uniform(2,0,1);: a3 m! r1 _% l( u
if i<0.67 then+ B& A' j8 X5 ?, Z* g
from a:=1;5 O. |4 z) p% w7 o
until a>6 loop
E' C& F9 A+ q+ b/ S% b* Q) g .models.pan.create(.Models.Frame2.SingleProc);( w6 L7 G; |$ h, o3 ?
a:=a+1;
: [6 E7 _/ _* w, l) e) R# [ end;
T2 p6 M1 ]# X7 T, V) D- [ else* p7 N7 h5 k* v3 Z: s* {
from b:=1
& M. T5 e$ J- V. U+ h; @& `5 N6 K! P until b>8 loop3 k& G* w d6 s/ z' |9 F5 _
.models.ban.create(.Models.Frame2.SingleProc);
" w y# Q5 l' b- D- c b:=b+1;
3 i2 x1 W/ ?( a6 o( o* M end;
; H, V! p& H8 W end;
) b6 F; `( F" B# Q2 D' [end;: u3 V5 t" B* `% G9 g" }
|