你可以试试这个:
set br=**, id1=**,id2=**
def gen_ball
b_num = id2-id1+1;
i = 0;
loop while i<b_num
loc_x = xl+br+u_rand*(xh-xl-2*br);
loc_y = yl+br+u_rand*(yh-yl2*br);
loc_z = zl+br+u_rand*(zh-zl2*br);
bid=id1+i
command
gen ball id bid rad br x loc_x y loc_y z loc_z
endcommand
i=i+1
endloop
command
prop kn =** ks=** den = **
endcommand
end