is/ C$ p' K4 \5 W8 j/ }* e
i:real;
5 K! |# z c* Q0 x a,b:integer;$ z1 b Q) \- m# N& d
do7 ]! q! O7 g, y; D. H
i:=z_uniform(2,0,1);4 B4 J, A/ F1 ]' _" s6 c5 C7 L
if i<0.67 then7 o0 d- k3 E+ [4 j" ~
from a:=1;
: d/ R# }# s. B0 { until a>6 loop' |# \" e( l) l0 ~. U2 a
.models.pan.create(.Models.Frame2.SingleProc);
, v3 b" r9 g' T8 C" V) M a:=a+1;% B0 |; I4 j! W/ d
end;
4 l/ }$ B0 D! r$ _/ _0 u else! F: ?. P8 K+ \: E0 x* {; L
from b:=17 Y& ?3 ]4 V8 a9 s. j/ k
until b>8 loop
' w4 D0 ^ ^$ B. ]+ `. f7 `/ L# p .models.ban.create(.Models.Frame2.SingleProc);
1 R& x* E' m5 E" J$ j b:=b+1;
k6 w2 l: w* m; i6 Q end;
+ x/ [. J( z& P% p3 ~9 B& x end;) J. d! y3 j& G. X ^
end;
5 u3 o3 }9 U% x D% ^7 J. n |