@TA16文字まで自由配置
--track0:ZM Max,0,800,150,1
--track1:ZM Min,0,800,75,1
--track2:回転Z,0,360,20,1
--track3:Frame,0,9999,0,1
--check0:RandomColor,1
--dialog:ﾗﾝﾀﾞﾑ透明度/chk,chk1=1;透明度Max,local almax=100;透明度Min,local almin=25;SEED,sd=100;pos,pos={};
-------------------------------------set
local t0=math.floor(obj.track0)
local t1=math.floor(obj.track1)
local t2=math.floor(obj.track2)
local t3=math.floor(obj.track3)
local sw,sh=obj.screen_w,obj.screen_h
local ogvzm=obj.getvalue("zoom")*0.01
local on=obj.num
local oi=obj.index+1
-------------------------------------
if(on>16)then on=16 end
if(moji==null)then moji={} end
moji[oi]={obj.ox,obj.oy,obj.oz,obj.zoom,obj.alpha,obj.cx,obj.cy,obj.cz,obj.rx,obj.ry,obj.rz,obj.aspect}

if(pos[1]==null)then
	for i=1,on do
		dst=sh/10
		pos[2*i-1]=(i-1)*dst-on*dst/2+dst/2
		pos[2*i]=0
	end
end
obj.setanchor("pos",on,"line")

local fr=oi+t3
local dx,dy=pos[2*oi-1],pos[2*oi]


	obj.ox=dx*ogvzm
	obj.oy=dy*ogvzm
	obj.oz=moji[oi][3]*ogvzm
	local zm=moji[oi][4]+(obj.rand(t1*100,t0*100,sd+oi,fr)/10000-1)
	if(zm<0)then zm=0 end
	obj.zoom=zm

	if(chk1==1)then
		local al=moji[oi][5]+(obj.rand(almin*100,almax*100,sd+oi,fr)/10000-1)
		if(al<0)then al=0 end
		if(al>1)then al=1 end
		obj.alpha=al
	end

	obj.cx=moji[oi][6]
	obj.cy=moji[oi][7]
	obj.cz=moji[oi][8]
	obj.rx=moji[oi][9]
	obj.ry=moji[oi][10]
	obj.rz=moji[oi][11]		+obj.rand(-t2*100,t2*100,sd+oi,fr)/100
	obj.aspect=moji[oi][12]

	if(obj.check0)then
		local r=obj.rand(0,255,sd+oi,1+fr)
		local g=obj.rand(0,255,sd+oi,2+fr)
		local b=obj.rand(0,255,sd+oi,3+fr)
		obj.effect("単色化","color",RGB(r,g,b))

		obj.effect()
		obj.draw()
	end


@TA16文字まで自由配置詳細板
--track0:輝度保持,0,1,0,1
--track1:X,-4096,4096,0,0.1
--track2:Y,-4096,4096,0,0.1
--track3:Z,-4096,4096,0,0.1
--check0:ColorSet,1
--dialog:pos,pos={};
-------------------------------------set
local t0=math.floor(obj.track0)
local t1=math.floor(obj.track1*10)*0.1
local t2=math.floor(obj.track2*10)*0.1
local t3=math.floor(obj.track3*10)*0.1
local sw,sh=obj.screen_w,obj.screen_h
local ogvzm=obj.getvalue("zoom")*0.01
local on=obj.num
local oi=obj.index+1
-------------------------------------
if(on>16)then on=16 end
if(moji==null)then moji={} end
moji[oi]={obj.ox,obj.oy,obj.oz,obj.zoom,obj.alpha,obj.cx,obj.cy,obj.cz,obj.rx,obj.ry,obj.rz,obj.aspect}

if(pos[1]==null)then
	for i=1,on do
		dst=sh/10
		pos[2*i-1]=(i-1)*dst-on*dst/2+dst/2
		pos[2*i]=0
	end
end
obj.setanchor("pos",on,"line")


local dx,dy=pos[2*oi-1],pos[2*oi]
obj.ox=dx*ogvzm + t1
obj.oy=dy*ogvzm + t2
obj.oz=moji[oi][3]*ogvzm + t3

local zm=moji[oi][4] -1 + mojiset[oi][1]
if(zm<0)then zm=0 end
obj.zoom=zm

local al=moji[oi][5] -1 + mojiset[oi][2]
if(al<0)then al=0 end
if(al>1)then al=1 end
obj.alpha=al

obj.cx=moji[oi][6]	+ mojiset[oi][3]
obj.cy=moji[oi][7]	+ mojiset[oi][4]
obj.cz=moji[oi][8]	+ mojiset[oi][5]

obj.rx=moji[oi][9]	+ mojiset[oi][6]
obj.ry=moji[oi][10]	+ mojiset[oi][7]
obj.rz=moji[oi][11]	+ mojiset[oi][8]

local asp=moji[oi][12]	+ mojiset[oi][9]
if(asp<-1)then asp=-1 end
if(asp>1)then asp=1 end
obj.aspect=asp

if(obj.check0)then
	local r = mojiset[oi][10]
	local g = mojiset[oi][11]
	local b = mojiset[oi][12]
	obj.effect("単色化","color",RGB(r,g,b),"輝度を保持する",t0)

	obj.effect()
	obj.draw()
end






--[[
■mojiset[文字番号]={拡大率,透明度,中心X,中心Y,中心Z,回転X,回転Y,回転Z,縦横比,R,G,B}
■以下、10文字までの個別文字を設定する場合にスクリプト制御に書き込む書式例


----------ここから----------
--設定準備部分
mojiset={}
local n=10
for i=1,n do mojiset[i]={} end
--各文字の設定部分
mojiset[1]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[2]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[3]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[4]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[5]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[6]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[7]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[8]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[9]={1,1,0,0,0,0,0,0,0,255,255,255}
mojiset[10]={1,1,0,0,0,0,0,0,0,255,255,255}
----------ここまで----------

]]--

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