--track0:ŒΒ”,1,1024,32,1
--track1:ŽžŠΤ,0.01,100,1.50,0.01
--track2:Alp•β³,-100,100,0,0.01
--track3:θ‡’l,0,100,80,1
--check0:Guid,0
--dialog:}Œ`‘I‘π/fig,fig="‰~";Color/col,col=0xffffff;»²½ή,local fgs=50;ό•,local fgs1=200;Seed,sd=100;Frame,local fr1=100;ΧέΐήѐF/chk,chk1=1;X•`‰ζ”ΝˆΝŒW”,local ww=1.00;Y•`‰ζ”ΝˆΝŒW”,local hh=1.00;
-------------------------------------set
local t0=math.floor(obj.track0)
local t1=obj.track1
local t2=obj.track2
local t3=math.floor(obj.track3)
local sw=obj.screen_w*ww
local sh=obj.screen_h*hh
local ogvz=obj.getvalue("zoom")/100
local fr=obj.frame
local alp0=t2/100
local lyr=obj.layer
------------------------------------set2
if(timeCntLst==null)then timeCntLst={} end
if(timeCntL1==null)then timeCntL1={} end
if(timeCntL2==null)then timeCntL2={} end
if(figpx==null)then figpx={} end
if(figpy==null)then figpy={} end
if(figFlag==null)then figFlag={} end
local num=t0
if(fr==0)then
 timeCntLst[lyr]={}
 timeCntL1[lyr]={}
 timeCntL2[lyr]={}
 figpx[lyr]={}
 figpy[lyr]={}
 figFlag[lyr]={}
 idxr=1

 for i=1,num do
  timeCntLst[lyr][i]=0
  timeCntL2[lyr][i]=obj.rand(0,t1*100,sd,i)/100
  timeCntL1[lyr][i]=0
  figpx[lyr][i]=obj.rand(-sw/2*10,sw/2*10,sd,i*2)/10
  figpy[lyr][i]=obj.rand(-sh/2*10,sh/2*10,sd,i*5)/10
  if(obj.rand(1,100,sd,i*4+fr1)>t3)then
   figFlag[lyr][i]=true
  else
   figFlag[lyr][i]=false
  end
 end

 if(num<#figFlag[lyr])then
  for i=num+1,#figFlag[lyr] do
   timeCntLst[lyr][i]=null
   timeCntL1[lyr][i]=null
   timeCntL2[lyr][i]=null
   figpx[lyr][i]=null
   figpy[lyr][i]=null
   figFlag[lyr][i]=null
   end
 end

 num0=num
end

if(t0>=num0)then
 num=num0
end
obj.setoption("drawtarget","tempbuffer",sw,sh)
for i=1,num do
 timeCntLst[lyr][i]=timeCntL1[lyr][i]-timeCntL2[lyr][i]
 if(figFlag[lyr][i]==false and timeCntLst[lyr][i]<=t1)then
  if(obj.rand(1,100,sd,i+fr+fr1)>t3)then
   figFlag[lyr][i]=true
  else
   figFlag[lyr][i]=false
  end
 end

 if(figFlag[lyr][i]==true)then
  if(chk1==1)then
   cmin=128
   cmax=255
   r=obj.rand(cmin,cmax,sd,i)
   g=obj.rand(cmin,cmax,sd*2,i)
   b=obj.rand(cmin,cmax,sd*3,i)
   col=RGB(r,g,b)
  end


  dx=figpx[lyr][i]
  dy=figpy[lyr][i]
  if(timeCntLst[lyr][i]<=t1/2)then
   al=timeCntLst[lyr][i]*2/t1
  elseif(timeCntLst[lyr][i]<=t1)then
   al=2-timeCntLst[lyr][i]/t1*2
  else
   al=0
  end
  al=math.floor((al+alp0)*100)/100
  if(al<=0)then al=0 end
  if(al>=1)then al=1 end

  rz=obj.rand(-36000,36000,sd,i+idxr)/100

  fgs0=obj.rand(fgs*0.2,fgs,sd,i)
  obj.load("figure",fig,col,fgs0,fgs1)
  obj.draw(dx,dy,0,1,al,0,0,rz)
  timeCntL1[lyr][i]=obj.time
  if(obj.check0)then
   output=i.."/"..tostring(figFlag[lyr][i])
   .."/cnt:"..(math.floor(timeCntLst[lyr][i]*100)/100).."/al:"..al
   obj.setfont("",fgs/5)
   obj.load("text",output)
   obj.draw(dx,dy-fgs*0.5)
   idxr=idxr+1
  end

  if(timeCntLst[lyr][i]>t1)then
   figFlag[lyr][i]=false
   figpx[lyr][i]=obj.rand(-sw/2*10,sw/2*10,sd,i*2+fr+fr1)/10
   figpy[lyr][i]=obj.rand(-sh/2*10,sh/2*10,sd,i*5+fr+fr1)/10
  end
 else
  timeCntL2[lyr][i]=obj.time
 end
end
obj.load("tempbuffer")


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