--track0:閾値,0,100,50,0.01 --track1:Zoom,0,200,100,0.01 --track2:色相,0,1,1,1 --track3:Frame,0,9999,0,1 --check0:透明度R,1 --dialog:透明度Rmin,local rmin=0;透明度Rmax,local rmax=100;色/col,col0=0xff00ff;色Random/chk,chk1=1;色Rmin[0-255],local cmin=64;色Rmax[0-255],local cmax=255;SEED,sd=100; -------------------------------------set local t0 = obj.track0 local t1 = obj.track1 * 0.01 local t2 = math.floor(obj.track2) local t3 = math.floor(obj.track3) local oi = obj.index local on = obj.num -------------------------------------set local fr = t3 + oi + 1 local iki = obj.rand(0,10000,sd,fr) * 0.01 local r,g,b if(iki < t0)then if(t2 == 1)then if(chk1 == 1)then r = obj.rand(cmin,cmax,sd,fr) g = obj.rand(cmin,cmax,sd+1,fr) b = obj.rand(cmin,cmax,sd+2,fr) col = RGB(r,g,b) else col = col0 end obj.effect("単色化","color",col,"輝度を保持する",1) end if(obj.check0)then obj.alpha = obj.rand(rmin,rmax,sd+1,fr) * 0.01 else obj.alpha = 1 end else obj.alpha = 0 end obj.zoom = t1 --[[https://madeinpc.blog.fc2.com/]]--