is
7 |2 L4 T. N) v3 d/ L i:real;4 {# S3 z2 i4 T0 t
a,b:integer;
7 K2 Z+ O& N+ w1 P6 cdo
5 F$ @9 o }% D s ^$ w2 y8 q i:=z_uniform(2,0,1);* M! o. r" e& z6 H& }) f
if i<0.67 then; m {8 `1 T2 M3 o# t2 }
from a:=1;+ e3 r5 A+ c" M
until a>6 loop4 P: h1 ]- K( v1 K
.models.pan.create(.Models.Frame2.SingleProc);- c0 M3 z' m/ Q! O _- C0 [
a:=a+1;1 @# \" U% f, y, y( X
end;
: M! r' N' q1 I7 a( [6 e( a4 G0 v/ e else1 |7 U/ f5 \2 t, X a. g
from b:=1
; l0 a# j! s% _3 [8 [5 E until b>8 loop: G A6 w8 D: V, w* T
.models.ban.create(.Models.Frame2.SingleProc);
- ?8 g+ w2 I. Y4 ^ b:=b+1;( _ ^" M( b" d% j8 i3 o
end;
/ f+ P4 [3 p! Q7 t2 B7 R% ?4 `3 Q end;( Q1 u. M3 l5 H7 f
end;0 @) g/ ?2 {) F
|