is
, i/ w! [% E1 ]9 } i:real;. I% n& v" Q( w. G: h c
a,b:integer;
( ~2 w' v6 b; H# R* T) Tdo
# z& e4 H! t. S& y+ s/ ^9 |4 V `$ Y i:=z_uniform(2,0,1);
8 x* G. C/ F3 b5 Y+ _ if i<0.67 then
C* ], v" h! w# V from a:=1;- ?+ Y. j6 `) }: B* R/ Y) G
until a>6 loop
$ P* `' G1 r$ y: f .models.pan.create(.Models.Frame2.SingleProc);
2 B3 J1 ]$ }" l% Q# S$ X a:=a+1;6 q* [2 A6 f+ s6 x! S; i
end;
' S o. `- R6 i2 r; T, j6 f else
7 m5 a4 F! H# k& @7 z from b:=1
. i/ `: \3 U+ m2 V. m8 B$ R. e+ r& } until b>8 loop$ Y; o, Q( N# Q6 E: t
.models.ban.create(.Models.Frame2.SingleProc);
6 E+ M% K& k2 e% w, s; b" N b:=b+1;
- J) k. t1 ~0 o1 i. L* X1 o; U end;
& e* Z* G: ^0 L. ], ~% d$ N% G4 l end;9 W( Z% i# h1 s( [1 b1 x
end;3 l! k% I/ Z) Y" }
|