@TA台詞＆歌詞追従ver2 kerokero9696
--track0:拡縮効前,0,1000,55,1
--track1:拡縮効後,0,1000,85,1
--track2:字番号,0,9999,1,1
--track3:効果,0,100,12,1
--dialog:color/col,col=0xffbd00;色反転/chk,chk2=0;効果/chk,chk1=1;項目1,p1="サイズ";項目値1,v1=3;項目2,p2="ぼかし";項目値2,v2=10;項目3,p3="color";項目値3,v3=col;項目4,p4="";項目値4,v4="";項目5,p5="";項目値5,v5="";項目6,p6="";項目値6,v6="";

	ect={"色調補正","クリッピング","ぼかし","境界ぼかし","モザイク","発光"
	,"閃光","拡散光","グロー","ライト","シャドー","縁取り","凸エッジ"
	,"エッジ抽出","シャープ","フェード","ワイプ","マスク","斜めクリッピング"
	,"放射ブラー","方向ブラー","レンズブラー","モーションブラー","振動"
	,"ミラー","ラスター","波紋","画像ループ","極座標変換"
	,"ディスプレイスメントマップ","ノイズ","色ずれ","単色化"
	,"グラデーション","オブジェクト分割","反転"}
--------------------------------
t0=obj.track0/100
t1=obj.track1/100
t2=math.floor(obj.track2)
t3=math.floor(obj.track3)
--------------------------------
sw,sh=obj.screen_w,obj.screen_h
ti,tn=obj.index,obj.num
--------------------------------
if(ti==0)then
 if(op==null)then
  op={}
 end
end
op[ti+1]={obj.ox,obj.oy,obj.oz}
--------------------------------
if(table.maxn(ect)<t3)then
 t3=obj.rand(1,table.maxn(ect),t3,t3)
end
ts=20
if(t3==0)then
 t2=0
 obj.setfont("ms gothic",ts,0,col,0x666666)
 for i=1,table.maxn(ect) do
  obj.load("text","効果"..i..":"..ect[i])
  obj.effect()
  obj.draw(0,i*ts*1.5-sh/2-t0)
 end
end
--------------------------------
idx=0
for i=1,ti+1 do
 if(i==t2+1)then
  obj.ox=op[i][1]
  obj.oy=op[i][2]
  obj.oz=op[i][3]
  obj.zoom=t0
 else
  obj.ox=op[i][1]
  obj.oy=op[i][2]
  obj.oz=op[i][3]

  if(idx<1 and t2+1>i+ti)then
   if(chk1==1)then
    obj.effect(ect[t3],p1,v1,p2,v2,p3,v3,p4,v4,p5,v5,p6,v6)
    obj.zoom=t1

    if(chk2==1)then
     obj.effect("反転","色相反転",1)
    end
    idx=idx+1
   end
  end
 end
end

@TA一文字変化ver2 kerokero9696
--track0:拡縮効前,0,1000,55,1
--track1:拡縮効後,0,1000,85,1
--track2:字番号,0,9999,1,1
--track3:効果,0,100,12,1
--dialog:color/col,col=0xffbd00;Z座標,zzz=0;色反転/chk,chk2=0;効果/chk,chk1=1;項目1,p1="サイズ";項目値1,v1=3;項目2,p2="ぼかし";項目値2,v2=10;項目3,p3="color";項目値3,v3=col;項目4,p4="";項目値4,v4="";項目5,p5="";項目値5,v5="";項目6,p6="";項目値6,v6="";

	ect={"色調補正","クリッピング","ぼかし","境界ぼかし","モザイク","発光"
	,"閃光","拡散光","グロー","ライト","シャドー","縁取り","凸エッジ"
	,"エッジ抽出","シャープ","フェード","ワイプ","マスク","斜めクリッピング"
	,"放射ブラー","方向ブラー","レンズブラー","モーションブラー","振動"
	,"ミラー","ラスター","波紋","画像ループ","極座標変換"
	,"ディスプレイスメントマップ","ノイズ","色ずれ","単色化"
	,"グラデーション","オブジェクト分割","反転"}
--------------------------------
t0=obj.track0/100
t1=obj.track1/100
t2=math.floor(obj.track2)
t3=math.floor(obj.track3)
--------------------------------
sw,sh=obj.screen_w,obj.screen_h
ti,tn=obj.index,obj.num
--------------------------------
if(ti==0)then
 if(op==null)then
  op={}
 end
end
op[ti+1]={obj.ox,obj.oy,obj.oz}
--------------------------------
if(table.maxn(ect)<t3)then
 t3=obj.rand(1,table.maxn(ect),t3,t3)
end
ts=20
if(t3==0)then
 t2=0
 obj.setfont("ms gothic",ts,0,col,0x666666)
 for i=1,table.maxn(ect) do
  obj.load("text","効果"..i..":"..ect[i])
  obj.effect()
  obj.draw(0,i*ts*1.5-sh/2-t0)
 end
end
--------------------------------
idx=0
for i=1,ti+1 do
 if(i~=t2)then
  obj.ox=op[i][1]
  obj.oy=op[i][2]
  obj.oz=op[i][3]
  obj.zoom=t0
 else
  obj.ox=op[i][1]
  obj.oy=op[i][2]
  obj.oz=op[i][3]

  if(idx<1 and t2+1==ti+2)then
   if(chk1==1)then
    obj.effect(ect[t3],p1,v1,p2,v2,p3,v3,p4,v4,p5,v5,p6,v6)
    obj.zoom=t1
    obj.oz=zzz
    if(chk2==1)then
     obj.effect("反転","色相反転",1)
    end
    idx=idx+1
   end
  end
 end
end

@TA複数字変化 kerokero9696
--track0:文字数,1,1000,3,1
--track1:zoom,0,1000,100,1
--track2:字番号,0,9999,1,1
--track3:効果,0,100,12,1
--dialog:color/col,col=0xffbd00;文字拡縮,tzm=0.50;色反転/chk,chk2=0;効果/chk,chk1=1;項目1,p1="サイズ";項目値1,v1=3;項目2,p2="ぼかし";項目値2,v2=10;項目3,p3="color";項目値3,v3=col;項目4,p4="";項目値4,v4="";項目5,p5="";項目値5,v5="";項目6,p6="";項目値6,v6="";

	ect={"色調補正","クリッピング","ぼかし","境界ぼかし","モザイク","発光"
	,"閃光","拡散光","グロー","ライト","シャドー","縁取り","凸エッジ"
	,"エッジ抽出","シャープ","フェード","ワイプ","マスク","斜めクリッピング"
	,"放射ブラー","方向ブラー","レンズブラー","モーションブラー","振動"
	,"ミラー","ラスター","波紋","画像ループ","極座標変換"
	,"ディスプレイスメントマップ","ノイズ","色ずれ","単色化"
	,"グラデーション","オブジェクト分割","反転"}
--------------------------------
t0=obj.track0
t1=obj.track1/100
t2=math.floor(obj.track2)
t3=math.floor(obj.track3)
--------------------------------
sw,sh=obj.screen_w,obj.screen_h
ti,tn=obj.index,obj.num
--------------------------------
if(ti==0)then
 if(op==null)then
  op={}
 end
end
op[ti+1]={obj.ox,obj.oy,obj.oz}
--------------------------------
if(table.maxn(ect)<t3)then
 t3=obj.rand(1,table.maxn(ect),t3,t3)
end
ts=20
if(t3==0)then
 t2=0
 obj.setfont("ms gothic",ts,0,col,0x666666)
 for i=1,table.maxn(ect) do
  obj.load("text","効果"..i..":"..ect[i])
  obj.effect()
  obj.draw(0,i*ts*1.5-sh/2-t0)
 end
end
--------------------------------
obj.zoom=tzm

idx=0
for i=1,ti+1 do
 if(i==t2+1)then
  obj.ox=op[i][1]
  obj.oy=op[i][2]
  obj.oz=op[i][3]
 else
  obj.ox=op[i][1]
  obj.oy=op[i][2]
  obj.oz=op[i][3]

  if(idx<1 and t2+1==ti+1+(i%t0))then
   if(chk1==1)then
    obj.effect(ect[t3],p1,v1,p2,v2,p3,v3,p4,v4,p5,v5,p6,v6)
    obj.zoom=t1
    if(chk2==1)then
     obj.effect("反転","色相反転",1)
    end
    idx=idx+1
   end
  end
 end
end
--[[http://madeinpc.blog50.fc2.com/]]--