--track0:個数,1,9999,300,1
--track1:揺れ幅,0,4096,100,1
--track2:速度,-2048,2048,300,1
--track3:モード,1,3,3,1
--check0:Z収束,1
--dialog:File,local f="";図形/fig,fig="円";ランダム色/chk,chk3=0;指定色/col,col=0xffffff;サイズ,local fgs=10;Z深さ,local zlen=4096;R透明度/chk,local chk4=0;X範囲補正,local xx=1.00;Y範囲補正,local yy=1.00;R回転/chk,chk1=0;効果/chk,chk2=0;SEED,sd=100;
------------------------------------set
local t0=math.floor(obj.track0) -1
local t1=math.floor(obj.track1)
local t2=math.floor(obj.track2)
local t3=math.floor(obj.track3)
local sw=obj.screen_w * xx
local sh=obj.screen_h * yy
local ogvzm=obj.getvalue("zoom")*0.01
------------------------------------
local md = t3
local spd = t2
for i=0,t0 do
	spds = obj.rand(0,spd*0.5,sd,i)
	hh = obj.rand(0,t1,sd,i)
	if(md == 1)then
		dx = (obj.rand(-sw,sw,sd,i) * 0.5 + obj.time * spd)%sw - sw * 0.5
		dy = obj.rand(-sh,sh,sd,i) * 0.5 + math.sin(math.rad(obj.time * spds)) * hh
		dz = obj.rand(-100,0,sd,i)
	elseif(md == 2)then
		dx = obj.rand(-sw,sw,sd,i) * 0.5 + math.sin(math.rad(obj.time * spds)) * hh
		dy = (obj.rand(-sh,sh,sd,i) * 0.5 + obj.time * spd)%sh - sh * 0.5
		dz = obj.rand(-100,0,sd,i)
	elseif(md == 3)then
		dz = (obj.rand(-zlen,zlen,sd,i) * 0.5 + obj.time * spd)%zlen - zlen * 0.5
		if(obj.check0)then
			dx = obj.rand(-sw,sw,sd,i) * 0.5 * (zlen * 0.5 - math.abs(dz)) / zlen + math.cos(math.rad(obj.time * spds + obj.rand(0,360,sd,i))) * hh
			dy = obj.rand(-sh,sh,sd,i) * 0.5 * (zlen * 0.5 - math.abs(dz)) / zlen + math.sin(math.rad(obj.time * spds + obj.rand(0,360,sd+1,i))) * hh
		else
			dx = obj.rand(-sw,sw,sd,i) * 0.5 + math.cos(math.rad(obj.time * spds + obj.rand(0,360,sd,i))) * hh
			dy = obj.rand(-sh,sh,sd,i) * 0.5 + math.sin(math.rad(obj.time * spds + obj.rand(0,360,sd+1,i))) * hh
		end
	end

	if(chk1 == 1)then
		rx = obj.rand(0,360,sd+2,i) + obj.time * spd
		ry = obj.rand(0,360,sd+3,i) + obj.time * spd
		rz = obj.rand(0,360,sd+4,i) + obj.time * spd
	else
		rx,ry,rz = 0,0,0
	end

	-- fgs0 = obj.rand(fgs*0.5,fgs,sd,i)
	if(chk3 == 1)then
		col = HSV(obj.rand(0,359,sd+5,i),75,100)
	end

	if(f == null or f == "")then
		obj.load("figure",fig,col,fgs)
	else
		obj.load("image",f)
	end
	if(chk2 == 1)then
		obj.effect()
	end

	zm = obj.rand(1,100,sd,i) * 0.01
	if(chk4 == 1)then
		alp = obj.rand(1,100,sd,i) * 0.01
	else
		alp = 1
	end
	obj.draw(dx,dy,dz,zm,alp,rx,ry,rz)
end









--[[http://madeinpc.blog50.fc2.com/]]--