--track0:Žc‘œF,1,120,15,1 --track1:‡¬M,0,16,0,1 --track2:Alpζ”,1,1024,100,1 --track3:‹t‡•`‰ζ,0,1,1,1 --check0:Guid,0 ------------------------------------set local fnum = math.floor(obj.track0) local blend = math.floor(obj.track1) if(blend == 13)then blend = "alpha_add" elseif(blend == 14)then blend = "alpha_add2" elseif(blend == 15)then blend = "alpha_max" elseif(blend == 16)then blend = "alpha_sub" end local sub = math.floor(obj.track2) * 0.01 local draw = math.floor(obj.track3) local sw,sh = obj.screen_w,obj.screen_h local fs = math.floor(sh / 36) obj.setfont("",fs) ------------------------------------ if(obj.frame == 0 or frameCntZan == null)then frameCntZan = {} frameCntZan[obj.layer] = 0 end local fr = frameCntZan[obj.layer] % fnum + 1 if(frameCntZan[obj.layer] + 1 < fnum )then fnum = frameCntZan[obj.layer] + 1 end local tmp = "cache:keroPixRec"..fr obj.copybuffer(tmp,"obj") obj.setoption("drawtarget","tempbuffer",sw,sh) local idx = 1 for i=1,fnum do if(draw == 1)then i = fnum - i + 1 end tmp = "cache:keroPixRec"..((i - fnum -1 + fr) % fnum + 1) alp = i / fnum / sub^(fnum - i) if(alp < 0)then alp = 0 elseif(alp > 1)then alp = 1 end if(obj.check0)then dx,dy = 0,(idx - 1) * fs - fnum * fs * 0.5 + fs * 0.5 output = "N:"..idx.." i:"..i.." Alp:"..(math.floor(alp*100)*0.01).." Blend:"..blend.." Fr:"..fr.." Tmp:"..tmp obj.load("text",output) else obj.copybuffer("obj",tmp) dx,dy = 0,0 obj.setoption("blend",blend) end obj.draw(dx,dy,0,1,alp) idx = idx + 1 end ------------------------------------ obj.load("tempbuffer") frameCntZan[obj.layer] = frameCntZan[obj.layer] + 1 --[[http://madeinpc.blog50.fc2.com/]]--