is& U7 z' V$ {" _. V# \3 L
i:real;- T' z. h+ D* A M* e2 W s+ G, H+ k
a,b:integer;
+ D5 w1 L c( k, Y* {0 vdo! ^* \: g/ t4 C: s9 _. K
i:=z_uniform(2,0,1);
2 q4 O# k' O8 m. l0 X/ | if i<0.67 then1 U4 B, [8 v# d% ?
from a:=1;
( v% V& r6 i$ t" U" o0 o# ~2 j; b until a>6 loop
o4 p' z) w5 L7 S: _ .models.pan.create(.Models.Frame2.SingleProc);
$ I) u8 m0 F) v0 h8 L9 h a:=a+1;
- F5 U, S$ z$ x! v$ M1 ]; x end;
1 U1 W2 B, R P- }' y- v' g else. v! u: O& V+ k
from b:=1& c* N3 @. w' {! ^$ s7 s( x G
until b>8 loop
6 s$ r! R! u) Q .models.ban.create(.Models.Frame2.SingleProc);
! T2 A6 o6 S ?3 d8 j3 Y b:=b+1;8 j& y& Q3 H% J5 t9 Z
end;
\8 M/ F$ ^/ K7 A- O S end;
6 h+ j% [( `3 V# V7 }4 T7 M+ G; H& Bend;6 r4 b: S$ I) J$ m" e! q
|