is: ~" T9 J" d, Y' E; s E
i:real;
" o/ O- d) Z) ? a,b:integer;
2 }+ E# K: H5 s# Ido8 x0 G- F4 L. V7 k
i:=z_uniform(2,0,1);6 _9 O4 Z* ?& ]' D4 W! c/ Z- s3 s
if i<0.67 then: u4 M: d3 U$ h9 d% ~% R+ i L* o' d
from a:=1;
8 Y2 a6 i' J$ @# h* H: _* U! S( h* I until a>6 loop
8 N' M7 R4 s( s3 `- k6 Z) } .models.pan.create(.Models.Frame2.SingleProc);
6 [' e" i# ?9 S. ~. `7 | a:=a+1;
* E- }0 m0 G& Y" @ end;9 ^: m1 G2 I0 z( G* v
else; b- Q) H& }( ~; R& ]% Q
from b:=1
, B Z& [3 l# F; c until b>8 loop, V6 p/ c4 h! h8 {0 ]
.models.ban.create(.Models.Frame2.SingleProc);! V3 z& H. H- U. ?
b:=b+1;, b# e- Y+ _' D) w# A7 P
end;, ?+ J3 E7 f7 A1 `; V$ W( q7 s
end;, w1 r# X# O: X2 M! I2 `9 s6 c' W
end;
) {/ a# h; `& \" r |