local x0,y0,z0=0,30,0--起点坐标
local dx,dy,dz=60,60,60--外切长方体横纵竖长度
local count,all=0,dx*dy*dz--计数,总数
local m,k=10000,0--单次生成方块数,无用循环值
local x,y,z=0,0,0--当前坐标
local de=math.random(2,19)/2
local id=600--方块id
--是否在几何体内
local function isinside()
if (x-dx/2)^2/(dx/2)^2+(y-dy/2)^2/(dy/2)^2+(z-dz/2)^2/(dz/2)^2<=1 then
return true
else
return false
end
end
--主体
return function()
if (count>-1)and(count
for k=1,m do
x=count%dx
y=((count-x)%(dx*dy))/dx
z=(count-count%(dx*dy))/(dx*dy)
if isinside() then
Block:setBlockAll(x0+x,y0+y,z0+z,id, (x^2+y^2)/de^3) end
count=count+1
end
Chat:sendSystemMsg("Crafting:"..count)
elseif count>=all then
Chat:sendSystemMsg("End")
count=-1
end
end