is% s6 V+ z9 T+ y
i:real;
. r7 T- a7 Y% w+ N3 W a,b:integer;
: L6 \2 U( s1 O; Pdo
5 ?2 V, _7 q/ i* K/ S" e( M: N i:=z_uniform(2,0,1);/ Q0 w/ T+ D8 r
if i<0.67 then
/ h9 m9 \3 T9 n2 h# C. [( S from a:=1;
$ W( e1 D; J. z' [ until a>6 loop# X" C( Q, x5 @$ i# u
.models.pan.create(.Models.Frame2.SingleProc);2 r0 m) l2 I2 C% z6 Y* ~
a:=a+1;
7 c6 e3 n+ Z& H# J, R5 \ end;
, K" o: Q+ y* _) Z; T$ M" Y else; w) p8 w/ Q O% ^. B( E, \2 T
from b:=1
2 p3 O6 D+ H' A until b>8 loop
$ j! M' [" y7 W! v .models.ban.create(.Models.Frame2.SingleProc);
% ?" O; |0 P) l) K4 H b:=b+1;5 R8 r: p- w$ P5 v
end;& w- q2 ^6 Y6 p! e1 t8 T
end;" F5 A! t5 c! }3 H8 t; @9 m
end;
N0 I7 M1 u' R' c$ n |