@TA一文字変化 kerokero9696
--track0:X,-4096,4096,20,1
--track1:Y,-4096,4096,0,1
--track2:字番号,1,4096,1,1
--track3:Effect,1,100,12,1
--dialog:color/col,col=0xffffff;文字拡縮,tzm=0.5;guid/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=math.floor(obj.track0)
t1=math.floor(obj.track1)
t2=math.floor(obj.track2)-1
t3=math.floor(obj.track3)

if(37<t3)then
 t3=obj.rand(1,37,t3,t3)
end

sw,sh=obj.screen_w,obj.screen_h
ti,tn=obj.index,obj.num
tw,th=obj.w,obj.h
idx=0
 for i=0,ti do
  if(i~=t2)then
   obj.ox=t0*i
   obj.oy=-t1
   obj.zoom=tzm
  else
   obj.ox=t0*i
   obj.oy=t1
   obj.zoom=1
   if(idx<1 and t2==ti)then
    if(chk1==1)then
     obj.effect(ect[t3],p1,v1,p2,v2,p3,v3,p4,v4,p5,v5,p6,v6)
     idx=idx+1
    end
    obj.oy=t1
   end

  end
 end

 if(chk2==1)then
  obj.draw()
  obj.setfont("ms gothic",34,0,col,0x666666)
  obj.load("text",ect[t3])
  obj.draw(t0*50,t1*50)
 end


@TAカラオケ風 kerokero9696
--track0:X位置,-4096,4096,20,1
--track1:Y位置,-4096,4096,0,1
--track2:字番号,0,4096,0,1
--track3:効果,0,100,12,1
--dialog:color/col,col=0xffffff;文字拡縮,tzm=0.8;色反転/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=math.floor(obj.track0)
t1=math.floor(obj.track1)
t2=math.floor(obj.track2)
t3=math.floor(obj.track3)

if(table.maxn(ect)<t3)then
 t3=obj.rand(1,table.maxn(ect),t3,t3)
end

if(t3==0)then
 obj.setfont("ms gothic",20,0,col,0x666666)
 for i=1,table.maxn(ect) do
  obj.load("text","効果"..i..":"..ect[i])
  obj.effect()
  obj.draw(0,-obj.screen_h/2+20+i*20+5*i+t1)
 end
end

sw,sh=obj.screen_w,obj.screen_h
ti,tn=obj.index,obj.num
tw,th=obj.w,obj.h

idx=0
for i=0,ti do
 if(i==t2)then
  obj.ox=t0*i
  obj.zoom=tzm
 else
  obj.ox=t0*i
 end

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

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