--track0:速度,0,1024,15,1
--track1:閾値,0,100,90,0.01
--track2:開始,0,100,1,0.01
--track3:終了,0,100,3,0.01
--check0:縁の有無,1;
--dialog:縁色/col,col1=0xffffff;縁中変化色/col,col2=0xffffff;縁中背景色/col,col3=0x000000;輝度保持,local kido=0;縁ｻｲｽﾞ,local es=2;SEED,sd=100;
------------------------------------set
local t0=math.floor(obj.track0)
local t1=obj.track1
local t2=obj.track2
local t3=obj.track3
local sw=obj.screen_w
local sh=obj.screen_h
local oi=obj.index+1
------------------------------------set2
if(oi==1)then
 if(moji==null)then
  moji={}
 end
end
moji[oi]={obj.w,obj.ox,obj.oy}
obj.ox=moji[oi][2]
obj.oy=moji[oi][3]

local fr=t0*obj.time
local iki=obj.rand(0,10000,sd+oi,oi+fr)/100
if(t2<=obj.time and obj.time<=t3)then
 if(iki>t1)then
  obj.effect("単色化","color",col2,"輝度を保持する",kido)
  if(obj.check0)then
   obj.effect("縁取り","color",col1,"サイズ",es)
  end
 else
  obj.effect("単色化","color",col3,"輝度を保持する",kido)
  if(obj.check0)then
   obj.effect("縁取り","color",col1,"サイズ",es)
  end
 end
else
 obj.effect("単色化","color",col3,"輝度を保持する",kido)
  if(obj.check0)then
   obj.effect("縁取り","color",col1,"サイズ",es)
  end
end

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