originaltrilogy.com
GOUT image stabilization
GOUT image stabilization :: 1 > 32
g-force
This user is offline.
Padawan Learnerremoved preliminary script. see below for updates.
I don't do anything in the y direction because there isn't that much shake in that direction, and because I don't want to throw away any more lines due to the borders moving up and down. When I get around to adding borders and resizing for anamorphic, I would also like to add a small amount on the sides for TVs with overscan.
I also plan on adding this to the great work that Arnie.d and Moth3r have already done with anti-aliasing, anamorphic, and subtitles...
I plan on putting up some comparision clips soon, but those of you that can run this script, please let me know what you think!
-G
Arnie.d
This user is offline.
Jedi KnightBy the image shake do you mean the left-right shake of the entire frame or the movement that sometimes occurs very locally within a frame? Also, do you plan to use it for certain scenes only or do you use it on the entire film? Did you notice any bad side effect?
Hyde: Fezzy, man, it's Star Wars.
g-force
This user is offline.
Padawan LearnerI don't have the files on my PC right now so I can't try your script.
By the image shake do you mean the left-right shake of the entire frame or the movement that sometimes occurs very locally within a frame? Also, do you plan to use it for certain scenes only or do you use it on the entire film? Did you notice any bad side effect?
This takes care of the left-right shake of the entire frame. Maybe some subsequent filtering will help with the local shake/distortion. The only bad effect is that it can't fix scenes with static backgrounds and large moving foregrounds (think close-up of Vader's head moving back and forth with the walls of the Blockade Runner in the corner). Most scenes however look much more stable now. It really is a drastic improvement! I plan to use it in the entire film but maybe shut it off for a select few scenes. Once I get a chance to view the entire film I will make a decision on that.
-G
Puggo - Jar Jar's Yoda
This user is offline.
legendary but little-known Jedi Master
g-force
This user is offline.
Padawan Learner#######################################################################################
############################ GOUT Filter By G-force V.6.64 ############################
################################################################################################# setup stage
episode = 4 # <-----set to 4, 5 or 6 for ANH, ESB, or ROTJ respectively
PAL = false # <-----Set to false for NTSC, true for PAL
Mpeg2Source("C:\Documents and Settings\Owner\Desktop\AviSynth Scripts\VTS_03_1.d2v") # <-----Set path########## cut off some of the black bars for faster processing (but keep mod 16)
PAL==false ? Crop(0,96,0,-96,align=true) : Crop(0,120,0,-120,align=true).AddBorders(8,0,8,0)########## set black level/gamma, saturation/hue
Levels(9,1.13,255,0,255).Tweak(sat=1.08,hue=-4)########## global motion stabilization stage
orig = last
temp = orig.TemporalSoften(3,255,255,25,2)
int = Interleave(temp.Repair(orig),orig)
DePan(int,data=DePanEstimate(int,trust=0,dxmax=1,dymax=0),offset=-1)
SelectEvery(2,0)episode==5 ? last.Trim(0,92103)++orig.Trim(92104,93601)++last.Trim(93602,0) : last
########## local motion stabilization/degrain stage
source = last
sigma = 7
filt = source.fft3dfilter(sigma=sigma,sigma2=sigma*.75,sigma3=sigma*.5,sigma4=sigma*.25,sharpen=.5)temp.Repair(filt,9)
fw_vec1 = last.MVAnalyse(isb=false,delta=1,pel=2,sharp=1,overlap=4,plevel=0,idx=1,dct=1)
bw_vec1 = last.MVAnalyse(isb=true, delta=1,pel=2,sharp=1,overlap=4,plevel=0,idx=1,dct=1)source.MVDegrain1(bw_vec1,fw_vec1,thSAD=600,thSCD1=150,thSCD2=75,plane=0,idx=2)
corr1 = Median1(source,last,filt,chroma="copy first")
corr1.MVDegrain1(bw_vec1,fw_vec1,thSAD=400,thSCD1=150,thSCD2=75,plane=0,idx=3)
Median1(corr1,last,filt,chroma="copy first")
########## sharpening
Contra(last,source)########## restore stars stage
prest = last
prest.MT_Binarize(threshold=25,upper=true).MT_Expand()
MT_Merge(prest,source,last,chroma="copy first")########## additional "Lucasfilm" and "Along time ago..." stabilization
prest.Trim(0,265)++prest.Trim(266,687).TemporalSoften(3,255,255,25,2)++last.Trim(688,0)########## anti-aliasing
nn = last.NNEDI2(dh=true,field=1)
Contra(last.EEDI2(),nn)
last.Repair(nn,9)########## resize to 16x9 AR, remove sides, add borders
PAL==false ? Spline16Resize(720,384).Crop(8,12,-4,-14,align=true).AddBorders(6,61,6,61)
\ : Spline16Resize(736,448).Crop(12,8,-12,-10,align=true).AddBorders(4,73,4,73)########## subtitle stage
episode==4 ? ANH(last,PAL) : episode==6 ? ROTJ(last,PAL) : last#######################################################################################
Function ANH(clip input, bool PAL)
{inputf = "Franklin Gothic Medium Cond"
f_col = $FFC125
f_wid = 9
f_pos = PAL==false ? 463 : 556
f_siz = PAL==false ? 36 : 44Subtitle ("Going somewhere, Solo?",
\ -1,f_pos,70663,70698,f,f_siz,f_col,font_width=f_wid)
Subtitle ("It’s too late. You should have paid him when you had the chance.",
\ -1,f_pos,70825,70931,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Jabba’s put a price on your head so large...",
\ -1,f_pos,70940,71005,f,f_siz,f_col,font_width=f_wid)
Subtitle ("...every bounty hunter in the galaxy will be looking for you.",
\ -1,f_pos,71014,71088,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I’m lucky I found you first.",
\ -1,f_pos,71098,71137,f,f_siz,f_col,font_width=f_wid)
Subtitle ("If you give it to me, I might forget I found you.",
\ -1,f_pos,71203,71282,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Jabba’s through with you.",
\ -1,f_pos,71365,71406,f,f_siz,f_col,font_width=f_wid)
Subtitle ("He has no time for smugglers...",
\ -1,f_pos,71435,71489,f,f_siz,f_col,font_width=f_wid)
Subtitle ("...who drop their shipments at the first sign of an Imperial cruiser.",
\ -1,f_pos,71498,71595,f,f_siz,f_col,font_width=f_wid)
Subtitle ("You can tell that to Jabba. He may only take your ship.",
\ -1,f_pos,71656,71748,f,f_siz,f_col,font_width=f_wid)
Subtitle ("That’s the idea.",
\ -1,f_pos,71806,71833,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I’ve been looking forward to this for a long time.",
\ -1,f_pos,71843,71931,f,f_siz,f_col,font_width=f_wid)Return(last)
}#######################################################################################
Function ROTJ(clip input, bool PAL)
{inputf = "Franklin Gothic Medium Cond"
f_col = $FFC125
f_wid = 9
f_pos = PAL==false ? 463 : 556
f_siz = PAL==false ? 36 : 44Subtitle ("There will be no bargain.",
\ -1,f_pos,14382,14476,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I will not give up my favorite decoration.",
\ -1,f_pos,14538,14706,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I like Captain Solo where he is.",
\ -1,f_pos,14741,14824,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I have come for the bounty on this Wookiee.",
\ -1,f_pos,20524,20626,f,f_siz,f_col,font_width=f_wid)
Subtitle ("At last we have the mighty Chewbacca.",
\ -1,f_pos,20774,20886,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I want fifty thousand. No less.",
\ -1,f_pos,21502,21553,f,f_siz,f_col,font_width=f_wid)
Subtitle ("This bounty hunter is my kind of scum...",
\ -1,f_pos,22554,22663,f,f_siz,f_col,font_width=f_wid)
Subtitle ("...fearless and inventive.",
\ -1,f_pos,22685,22753,f,f_siz,f_col,font_width=f_wid)
Subtitle ("It's too late for that, Solo.",
\ -1,f_pos,28765,28856,f,f_siz,f_col,font_width=f_wid)
Subtitle ("You may have been a good smuggler...",
\ -1,f_pos,28857,28972,f,f_siz,f_col,font_width=f_wid)
Subtitle ("...but now you're Bantha fodder.",
\ -1,f_pos,28973,29058,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Take him away.",
\ -1,f_pos,29224,29273,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Bring her to me.",
\ -1,f_pos,29449,29503,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I'm sure.",
\ -1,f_pos,29750,29796,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I told you not to admit him.",
\ -1,f_pos,33466,33568,f,f_siz,f_col,font_width=f_wid)
Subtitle ("He must be allowed to speak.",
\ -1,f_pos,33615,33684,f,f_siz,f_col,font_width=f_wid)
Subtitle ("You weak-minded fool!",
\ -1,f_pos,33703,33774,f,f_siz,f_col,font_width=f_wid)
Subtitle ("He's using an old Jedi mind trick.",
\ -1,f_pos,33821,33927,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Your mind powers will not work on me, boy.",
\ -1,f_pos,34154,34280,f,f_siz,f_col,font_width=f_wid)
Subtitle ("There will be no bargain, young Jedi.",
\ -1,f_pos,34685,34795,f,f_siz,f_col,font_width=f_wid)
Subtitle ("I shall enjoy watching you die.",
\ -1,f_pos,34824,34910,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Bring me Solo and the Wookiee.",
\ -1,f_pos,39727,39816,f,f_siz,f_col,font_width=f_wid)
Subtitle ("They will all suffer for this outrage.",
\ -1,f_pos,39817,39920,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Soon you will learn to appreciate me.",
\ -1,f_pos,43151,43304,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Move him into position.",
\ -1,f_pos,45220,45288,f,f_siz,f_col,font_width=f_wid)
Subtitle ("Put him in.",
\ -1,f_pos,45866,45922,f,f_siz,f_col,font_width=f_wid)Return(last)
}#######################################################################################
Function Contra(clip denoised, clip orig)
{# re-write of Didée's contra sharpening routine from TemporalDegrain.avsInterleave(denoised,denoised.RemoveGrain(12,-1),denoised.RemoveGrain(4,-1))
Clense(reduceflicker=false,grey=true)
SelectEvery(3,1)medrg = last
rg12d = MT_MakeDiff(medrg,medrg.RemoveGrain(12,-1))
rg12d.Repair(MT_MakeDiff(orig,denoised),1,-1).MT_LUTxy(rg12d,"x 128 - abs y 128 - abs < x y ?")denoised.MT_AddDiff(last,chroma="copy first")
Return(last)
}#######################################################################################
Function Median1(clip input_1, clip input_2, clip input_3, string "chroma")
{# median of 3 clips from Helpers.avs by G-forcechroma = default(chroma,"process") #default is "process". Alternates: "copy first" or "copy second"
Interleave(input_1,input_2,input_3)
chroma == "process" ? Clense(reduceflicker=false) : Clense(reduceflicker=false,grey=true)
SelectEvery(3,1)chroma == "copy first" ? last.MergeChroma(input_1) : chroma == "copy second" ? last.MergeChroma(input_2) : last
Return(last)
}
boba feta
This user is offline.
Jedi Knight"I love Darth Editous and I'm not ashamed to admit it." ~ADigitalMan
Feta's Workshop Back & better than ever!
Moth3r
This user is offline.
Nyeah...Can't test the script at the moment so I'd be interested in seeing screenshots.
The gate weave, telecine wobble (whatever it's called) has always bugged me since the first time I saw Dr Gonzo's laserdisc rips. The image on the PAL laserdiscs does not wobble so much.
Last night, I dreamt that I wrote The Lord of the Rings. I was Tolkien in my sleep.
pittrek
This user is offline.
Padawan Learner
g-force
This user is offline.
Padawan LearnerScreenshots would be nice
I know! I just didn't think screenshots would do justice to the wobble, so I really want to post some clips. I started to encode some last night, but the script runs too slow due to the fact that in my last script I'm doing a lot of stuff inside the doubled frame size of eedi(2). I have re-arranged the script so it works must faster now. I will update the posted script after work and start encoding.
-G
pittrek
This user is offline.
Padawan Learner
Puggo - Jar Jar's Yoda
This user is offline.
legendary but little-known Jedi MasterIt might, but I have never worked with Vdub. From my unterstanding, DePanStabilize works the same way that DeShaker does, and I know from a LOT of experience that DePanStabilize doesn't work for this at all.
I can't speak for DePanStabilize, but I had a similar application with a huge video restoration project which had almost constant, small wobble. I found a set of DeShaker settings that worked great. You can set limits on the correction, and the zone on the screen on which to base the correction calculation. I'd be glad to share the settings I used, if you want to try it. Vdub is trivial to work with, btw.
g-force
This user is offline.
Padawan Learner-G
eros
This user is offline.
I am ready for the trials!
Arnie.d
This user is offline.
Jedi KnightHyde: Fezzy, man, it's Star Wars.
g-force
This user is offline.
Padawan LearnerAre these scripts good for the whole trilogy or just star wars
Not sure yet. I hope they will work with all of them with some minor tweaking.
Originally posted by: Arnie.d
Do you know what "align=true" does in the crop function? I read a frame can sometimes be placed unaligned in memory after cropping. But I don't known what it means if a frame is unaligned and exactly when it happens. Is it just to improve speed?
I stole that one from Moth3r. I think you're right though.
So I have encoded a one minute clip that I now need to upload to Rapidshare or something. I'll update soon. BTW, the script is going to need some more tweaking, there are a couple scenes where R2 is rocking back and forth that throw a wrench in the algorithm.
-G
g-force
This user is offline.
Padawan LearnerTop is with my script applied, bottom is original.
http://rapidshare.com/files/90535038/stabilize.m2v.html
-G
boba feta
This user is offline.
Jedi Knight"I love Darth Editous and I'm not ashamed to admit it." ~ADigitalMan
Feta's Workshop Back & better than ever!
pittrek
This user is offline.
Padawan Learner
pittrek
This user is offline.
Padawan LearnerLooks damned impressive. Why the hell didn't the guys at LFL do it before releasing the 2006 sh*t ?
A quick question - you have used the NTSC version for your script, right ?
Oldschooljedi
This user is offline.
Did you use the NTSC or the PAL DVD as source?
Was your script modified for your encodings or did you use the script as posted above?
I'm doing some testencodings at the moment but it looks different to your encoding.
Here they come!!!
g-force
This user is offline.
Padawan Learnerg-force,
Did you use the NTSC or the PAL DVD as source?
Was your script modified for your encodings or did you use the script as posted above?
I'm doing some testencodings at the moment but it looks different to your encoding.
I used the NTSC version. The script is exactly as above, except that I resized it to non-anamorphic at the end, added the original to the bottom of the screen, resized and showed the frame number. How does yours look different?
if you add this to the bottom of the script, you will have exactly what I used to encode.
tv=Lanczos4Resize(720,360) #see what it will really look like on TV
StackVertical(tv,orig)
addborders(120,3,120,3)
Lanczos4Resize(720,480)
ShowFrameNumber
trim(500,-350)+trim(4290,-200)+trim(10900,-300)+trim(26790,-130)+trim(70800,-200)+trim(133550,-60)
If your test encodings look too "tall", that's because the script is streched for anamorphic.
-G
Oldschooljedi
This user is offline.
I don't know what was wrong in the script of my first testencoding. The top black bar was wider every few frames and then thinner again.
I did modify your script for the PAL DVD now everything worked fine.
Here they come!!!
Oldschooljedi
This user is offline.
Link
Could you take a look at it?
Look at the top black bar.
Any ideas what is wrong with the script?
Here it is (modified for PAL-source):
mpeg2source("C:\ANH.d2v")
orig=Crop(0,124,0,-126,align=true)
temp=TemporalSoften(orig,48,255,255,10,2)
source=interleave(temp,orig,temp)
mdata=DePanEstimate(source, range=1, trust=0, dxmax=1, dymax=0)
DePan(source, data=mdata, offset=1)
selectevery(3,2)
a=EEDI2().TurnRight().EEDI2().TurnLeft().trim(0,58642)
b=EEDI2(maxd=15,nt=8).TurnRight().EEDI2(maxd=15,nt=8).TurnLeft().trim(58643,58994) #needed for interrogation scene
c=EEDI2().TurnRight().EEDI2().TurnLeft().trim(58995,0)
a+b+c
FFT3DFilter(sigma=2.5, sharpen=1.7)
Crop(16,0,-8,-2,align=true)
Lanczos4Resize(720,432)
Levels(8,1,255,0,255) #8 is bare minimum to fix "Tie matte scene"
DeSpot(sign=1) #sign=1 removes only black spots and keeps fast motion stars
DeSpot(mscene=0) #mscene=0 removes spots only in very static scenes
#show=1 highlights removed spots
tweak(sat=1.08)
addborders(0,72,0,72)
P.S.:
When I use exactly the script you posted, I get the avisynth-error: "width not a multible of 16", probably because my source is PAL.
Here they come!!!
g-force
This user is offline.
Padawan LearnerOops, now I have this error again and need a little help. I did upload a little clip of my encodings:
Link
Could you take a look at it?
I'll have to wait until I get home from work to look at the clip, but a couple ideas come to mind.
1. try resizing to NTSC resolution before the script (just so everything is the same) and then run my script.
2. I know that there are a few different revisions of the DePan and DePanEstimate tools out there. Make sure they are the most recent ones from: http://avisynth.org.ru/depan/depan.html
This sounds very much like what would happen if there was a bug in the dymax not being set to 0 in DePanEstimate.
-G
Oldschooljedi
This user is offline.
I used the script that I posted before and now for PAL it worked really good.
The problem was, that I used another depan.dll for the encodings. I did download all my .dll's here:
http://avisynth.org/warpenterprises/
Did you download your needed .dll's here:
http://avisynth.org.ru/
??
Here they come!!!
GOUT image stabilization