@80”N‘γ•—W’†ό
--track0:ŒΒ”,1,1080,120,1
--track1:’·‚³,0,4096,720,1
--track2:κ–Κ,0,99999,100,1
--track3:‰ρ“],-3600,3600,0,1
--check0:Random Color,1
--dialog:ό‘Ύ‚³,local fgs=6;Color/col,col=0xffffff;ΧέΐήΡ’·‚³,local tcf2=200;’†SŒa,local dst0=50;Šg‘εŒW”,local zmc=1.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
local sh=obj.screen_h
local ogvz=obj.getvalue("zoom")/100
if(tcf2==0)then tcf2=200 end
------------------------------------
obj.setoption("drawtarget","tempbuffer",sw,sh)
ik=fgs*0.5
for j=0,t0 do
 cidx=0
 timecoef1=obj.rand(10,90,sd,j*5)
 timecoef2=obj.rand(10,90,sd,j*7)/tcf2
 dst=obj.rand(0,t1*100,sd,j*4)/100
 
 if(obj.check0)then
  r=obj.rand(64,255,sd,j)
  g=obj.rand(64,255,sd,128+j)
  b=obj.rand(64,255,sd,255+j)
  col=RGB(r,g,b)
 end
 obj.load("figure","‰~",col,fgs)
 
 for i=0,dst,ik do
  ang=obj.rand(0,36000,sd,j)/100
  r=math.rad(t3+ang)
  cs=math.cos(r)
  sn=math.sin(r)
  dx=cs*(i+dst0)
  dy=sn*(i+dst0)
  zm=1+i/dst*zmc

  c1=t2-timecoef1
  c2=c1*timecoef2
  if(c2<cidx and cidx<c1)then
   obj.draw(dx,dy,0,zm)
  else
   obj.draw(dx,dy,0,0,0)
  end
  cidx=cidx+1
 end
end
obj.load("tempbuffer")


@‰Τ•Ωor—torW’†ό kerokero9696
--track0:•ϊŽΛ’·,0,4096,145,1
--track1:ŠO•,1,1000,30,0.1
--track2:’†SŒa,-2048,2048,0,1
--track3:–§“x,2,120,30,1
--check0:—F,0
--dialog:Figure/fig,fig="‰~";colorF/col,col=0xff0000;“ΰ•,local t4=0.0;X•`‰ζ”ΝˆΝŒW”,local ww=1.50;Y•`‰ζ”ΝˆΝŒW”,local hh=1.00;Seed,sd=100;F•Ο‰»‘¬“x,local colsp0=10;
-------------------------------------set
local t0=math.floor(obj.track0)
local t1=obj.track1
local t2=math.floor(obj.track2*10)/10-1
local t3=math.floor(obj.track3)
local sw=obj.screen_w*ww
local sh=obj.screen_h*hh
local ogvz=obj.getvalue("zoom")/100
------------------------------------
obj.setoption("drawtarget","tempbuffer",sw,sh)
local fgs=sh/2
local dst=t2
local x0,y0,z0=dst,-t4,0
local x1,y1,z1=dst+t0,-t1,z0
local x2,y2,z2=x1,t1,z0
local x3,y3,z3=x0,t4,z0
obj.load("figure",fig,col,fgs,fgs)
 if(obj.check0)then
  colsp=obj.time*colsp0
  r=obj.rand(0,255,sd,colsp)
  g=obj.rand(0,255,sd,128+colsp)
  b=obj.rand(0,255,sd,255+colsp)
  col1=RGB(r,g,b)
  obj.effect("’PF‰»","color",col1)
 end
obj.drawpoly(x0,y0,z0,x1,y1,z1,x2,y2,z2,x3,y3,z3)
obj.load("tempbuffer")

obj.setoption("drawtarget","tempbuffer")
local ik=t3
for i=t3,359,ik do
 r=math.rad(i)
 cs=math.cos(r)
 sn=math.sin(r)
 dx=cs
 dy=sn
 rz=i
 if(obj.check0)then
  colsp=obj.time*colsp0
  r=obj.rand(0,255,sd,i+colsp)
  g=obj.rand(0,255,sd,i*128+colsp)
  b=obj.rand(0,255,sd,i*255+colsp)
  col1=RGB(r,g,b)
  obj.effect("’PF‰»","color",col1)
 end
 obj.setoption("blend","alpha_max")
 obj.draw(dx,dy,0,1,1,0,0,rz)
end

obj.load("tempbuffer")
--[[http://madeinpc.blog50.fc2.com/]]--