--track0:ｽﾞﾚ量,-9999,9999,15,1
--track1:SEED,1,9999,1,1
--track2:E%(余),0,9999,0,1
--track3:ｼｬｯﾌﾙ,0,1,1,1
--check0:Guid,0
-------------------------------------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=obj.screen_w
local sh=obj.screen_h
local ogvz=obj.getvalue("zoom")/100
------------------------------------
local oi=obj.index+1
local on=obj.num
if(oi==1)then
 if(moji==null)then
  moji={}
 end
end
moji[oi]={obj.ox,obj.oy,obj.oz,obj.zoom,obj.alpha,obj.rx,obj.ry,obj.rz,obj.aspect}
------------------------------------
sd=t1
local idx={}
local m=1
local n=on
for i=m,n do
 idx[i]=i
end

for i=m,n do
 local dest=0
 dest=obj.rand(m,n,sd*(-1),i)
 local swp=idx[i]
 idx[i]=idx[dest]
 idx[dest]=swp
end

if(#moji>n)then
 for j=n+1,#moji do
  idx[j]=null
  moji[j]=null
 end
end
------------------------------------
local nn
if(t3==1)then
 nn=idx[(oi-1+t0)%on+1]
else
 nn=(oi-1+t0)%on+1
end

if(t2>0 and oi%t2==0)then
 obj.effect()
end

obj.ox=moji[nn][1]
obj.oy=moji[nn][2]
obj.oz=moji[nn][3]
obj.zoom=moji[nn][4]
obj.alpha=moji[nn][5]
obj.rx=moji[nn][6]
obj.ry=moji[nn][7]
obj.rz=moji[nn][8]
obj.aspect=moji[nn][9]

if(obj.check0 and oi==on)then
 output="テキストに使用する場合は文字毎に個別オブジェクトにチェックを入れて使用してください。\n動画、画像、図形等に使用する場合はオブジェクト分割フィルタをコレの上位に置く必要があります。"
 obj.setfont("",sh/24,3,0x000000,0xffffff)
 obj.load("text",output)
end
if(t2>0)then
 obj.draw()
end
--[[http://madeinpc.blog50.fc2.com/]]--