View Single Post
Old 4th May 2013, 02:17   #24  |  Link
Keiyakusha
契約者
 
Keiyakusha's Avatar
 
Join Date: Jun 2008
Posts: 1,576
smok3
Yeah, I mentioned batch-scripted imagemagick before. But we also need to make that result match to the given video horizontally, attach to the bottom and make it reveal itself over time like a slider. And this is a bit more complicated...


ok, back to the audio. New update. Not sure If I can make adjustable height as instead of proper nonlinear scaling I just chained few usual resamplers, and simulating this "feather"...
some bicubicresize probably can be replaced to pointresize with no harm but with speedup... not sure.
Edit: or actually this is super simple? just need to set any kind of height in last bicubicresize call? Hmm...
Code:
#1280x720 yv12 input with audio. nothing else tested.
w=width()
AudioDub(BlankClip(last,pixel_type="YV24",width=1280,height=720),last)
Converttomono().Normalize()
Histogram(mode="audiolevels").Converttorgb32()
calc=FrameRate()*w/Framecount()
Changefps(calc,linear=false).Trim(0,-w)
Crop(100,0,-1179,-0188)
Greyscale().Levels(0,1.000,64,0,255,coring=false)
WeaveColumns(w).Greyscale()
e=Crop(0,0,0,-height*3/4)
f=Crop(0,height/4,0,-height/2)
g=Crop(0,height/2,0,-height/4)
h=Crop(0,height*3/4,0,0)
e=bicubicresize(e,width(e),height(e)/2)
f=bicubicresize(f,width(f),height(f)/6)
g=bicubicresize(g,width(g),height(g)/9)
h=bicubicresize(h,width(h),height(h)/12)
Stackvertical(e,f,g,h)
bicubicresize(width,48)
bicubicresize(width,6).addborders(0,1,0,0)
bicubicresize(width,48)
F/sn UBV theatrical teaser. This is constant music though, trailer for american movie probably will look more "uneven" like that thing on youtube. Or maybe not. Also I wonder how ugly it will look when overlayed...

Last edited by Keiyakusha; 4th May 2013 at 02:37.
Keiyakusha is offline   Reply With Quote