View Single Post
Old 14th August 2019, 08:50   #1  |  Link
szabi
Registered User
 
Join Date: Nov 2004
Posts: 251
Restoring old VHS video by Avisynth

Hi

My old VHS casette was digitalized and now I have 720×576@25fps, DV AVI files on my PC.
I want to improve the quality by avisynth including deinterlace.
I did it a few years ago however now I did search by google: vhs restore avisynth to see any improvement since I did last.

This one is the original with crop and resize:
Code:
AVISource("D:\wedding\tdk vhsc.avi")
AssumeFPS(25,1)
ConvertBits(8)
ConvertToYV12()
crop(10, 2, -10, -2)
LanczosResize(696,520)


The following was suggested by megui after running the analysis:
Code:
AVISource("D:\wedding\tdk vhsc.avi")
AssumeFPS(25,1)
AssumeBFF()
ConvertBits(8)
ConvertToYV12()
Yadifmod2(order=0)
crop(10, 2, -10, -2)
LanczosResize(696,520)


Next one which I used years ago:
Code:
AVISource("D:\wedding\tdk vhsc.avi")
AssumeFPS(25,1)
AssumeBFF()
ConvertBits(8)
ConvertToYV12(interlaced=true)
QTGMC( Preset="Slow", EdiThreads=2, EZDenoise=1.2, TR2=2, Rep2=2, Sharpness=0.8, SLMode=1 )
SelectEven()
Tweak(hue=0, sat=1.0, bright=-1, cont=1.0, dither=true, coring=false)
crop(10, 2, -10, -2)
LanczosResize(696,520)



Following is from here: Video restoration newbie
Code:
AVISource("D:\wedding\tdk vhsc.avi")
AssumeBFF()
SeparateFields()
HDRagc(coef_gain=1.3,corrector=0.5,protect=1)
FixVHSOversharp(20,16,12)
FixVHSOversharp(20,8,12)
Weave()
ConvertToYV12(interlaced=true)
QTGMC(preset="faster",EZDenoise=4,denoiser="dfttest",sharpness=0.8)
SelectEven()
SMoothUV()
ColorYUV(cont_v=-50,cont_u=30)
Levels(16,1.0,255,16,240,coring=false,dither=true)
MergeChroma(awarpsharp2(depth=20))
LimitedSharpenFaster(edgemode=2)
crop(10, 2, -10, -2)
LanczosResize(696,520)
return last

It does some process I like so should be mixed with others.

Next I found was on digitalfaq forum: Comparing JVC VCR settings?
Code:
AVISource("D:\wedding\tdk vhsc.avi")
AssumeFPS(25,1)
AssumeBFF()
ConvertBits(8)
ConvertToYV12(interlaced=true)
SeparateFields().HQDering().HQDering().DeHalo_Alpha()
Weave()
QTGMC(preset="medium",EZDenoise=4,denoiser="dfttest",sharpness=0.7,ChromaMotion=true,border=true,ChromaNoise=true,DenoiseMC=true)
SelectEven()
Tweak(cont=1.2,dither=true,coring=false)
Levels(16,0.95,255,12,235,dither=true,coring=false)
vInverse()
RemoveDirtMC_SE(gpu=false)
LimitedSharpenFaster(edgemode=2)
AddGrainC(1.5,1.5)
crop(10, 2, -10, -2)
LanczosResize(696,520)
The picture quality is really strange, so I guess I should not use it.


Last I did try was found on same site in different topic: Found more VHS tapes, best Avisynth scripts to restore?
From the 5 sample script I did try to use the C version:
Code:
AVISource("D:\wedding\tdk vhsc.avi")
ColorYUV(off_y=-3,cont_y=15,gain_y=20)
Levels(16,1.0,255,16,235,coring=false,dither=true)
ConvertToYV12(interlaced=true)
AssumeBFF()
SeparateFields().HQDering().FixChromaBleeding().Weave()
QTGMC(preset="medium",FPSDivisor=2,ChromaMotion=true,ChromaNoise=true,DenoiseMC=true,GrainRestore=0.6,border=true,ShutterBlur=1, ShutterAngleSrc=30, ShutterAngleOut=360)
FixChromaBleeding()
Santiag(2,2)
EdgeCleaner()
SmoothUV()
LimitedSharpenFaster(edgemode=2)
gradfun3()
ConvertToYV12(interlaced=false)
RemoveDirtMC_SE(gpu=false)
grainfactory3(g1str=1, g2str=1, g3str=1)
AddGrainC(1.25,1.25)
crop(10, 2, -10, -2)
Spline36Resize(696,520)
ConvertToRGB32(interlaced=false,matrix="Rec601")
return last
With this I failed because too much plugins are missing (Santiag, EdgeCleaner, SmoothUV, gradfun3,grainfactory3).

There were an other search result: the most complex one (VHS restore script review)
Due to the complexity it was not tested yet.

Also I was thinking to use the latest script from restoring old 8mm films thread
The latest script was modded even for image processing not for movie, that I am confused how to mod it back.
Unfortunately I had to realise what I could do 5 years ago I do not understand at this time.
Did anyone try to use this script to enhance VHS digit?

Should I still searching for another solution to achive better quality?
Do you have any suggestion how to mix together all the above mentioned to get outstanding result?

EDIT: Sample video from source: wedding.

Regards
szabi

Last edited by szabi; 14th August 2019 at 09:45. Reason: sample added
szabi is offline   Reply With Quote