Video Editing Contest

[matfra]

Hi,
I would like to make a contest with you guys.

Video to clean
http://www.neatvideo.com/im/example/tv-tuner/video-noise-reduction-original-1.avi

GOAL
You have to clean this video. Try to fix the noise and everything else to make it better and sharper.

RULES
You can use any program, any filter.
Post a picture of the 1st frame after the cleanup.
Tell what program, filter, filter setting you are using.

[Ghitulescu]

Old trick :)

[matfra]

10124Before
10119

After
10120

I used VirtualDub 1.9.4

Plugins List
10121

DeinterlacedMap - Default Settings
Camcorder denoise 1.4 SS2 - Default Settings
Warp sharp - 50
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
" General Convolute - Bias 0 / Enable Clipping Off
" 0 0 0
" -64 384 -64
" 0 0 0
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
ColorMill 2.1
LEVELS
Dark Middle Light
0 0 0
SATURATION
Dark Middle Light
50 50 35
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
Neat Video
10124
10125

[Keiyakusha]

This video is dead. I don't think it's possible to do much with it. Of course if you don't want to say "Hi" to the Mr. Plastic Lizard:
http://img2.pict.com/64/e3/49/1400647/0/pfrog.png
By the way, I think you shouldn't do color correction, because it makes harder to compare the results.

[matfra]

I agree about he color ocrrection is too mutch.
But, I find my denoise and sharpen little better then yours.
I know this video is noisy and dead, but I like challenge.
Nice try !
Any one else ?

[rfmmars]

This video is dead. I don't think it's possible to do much with it. Of course if you don't want to say "Hi" to the Mr. Plastic Lizard:
http://img2.pict.com/64/e3/49/1400647/0/pfrog.png
By the way, I think you shouldn't do color correction, because it makes harder to compare the results.

My restoration


http://img401.imageshack.us/img401/231/myrestoration.th.jpg (http://img401.imageshack.us/i/myrestoration.jpg/)

Richard
photorecall.net

[matfra]

Bravo Richard.
You did a really good job.
Can you share your filter chain with us please ?
I trying to acheive this for months !
The restoration you did if Amazing !
Merci !

[rfmmars]

Bravo Richard.
You did a really good job.
Can you share your filter chain with us please ?
I trying to acheive this for months !
The restoration you did if Amazing !
Merci !

In my next post I will give you the proceedure, it's a three step process.

1. First Vdub filter chain and frameserve out to Avsp.

2. Avisynth VHS tape script, not mine

3. Frameserve out to Vdub, color and contrast restoration.

Time to setup under 5 minuites.

Richard
photorecall.net

[matfra]

Thanks Richard,
I can't wait to see the procedure.
I never used AviSynth, its so complicated.
Thank for helping, the restoration you did is perfect

[n0an]

That correction is impressive. Would love to get the procedure and VHS script :).

[rfmmars]

Thanks Richard,
I can't wait to see the procedure.
I never used AviSynth, its so complicated.
Thank for helping, the restoration you did is perfect

Open Virtualdub
Filter Chain for first Vdub
If interlaced, I like “Deinterlace Muksun”
Below is the “VCF” Configuation File
Load it
.............................................................................................................
VirtualDub.audio.SetSource(1);
VirtualDub.audio.SetMode(0);
VirtualDub.audio.SetInterleave(1,500,1,0,0);
VirtualDub.audio.SetClipMode(1,1);
VirtualDub.audio.SetConversion(0,0,0,0,0);
VirtualDub.audio.SetVolume();
VirtualDub.audio.SetCompression();
VirtualDub.audio.EnableFilterGraph(0);
VirtualDub.video.SetInputFormat(0);
VirtualDub.video.SetOutputFormat(7);
VirtualDub.video.SetMode(3);
VirtualDub.video.SetSmartRendering(0);
VirtualDub.video.SetPreserveEmptyFrames(0);
VirtualDub.video.SetFrameRate2(0,0,1);
VirtualDub.video.SetIVTC(0, 0, 0, 0);
VirtualDub.video.SetCompression();
VirtualDub.video.filters.Clear();
VirtualDub.video.filters.Add("Neat Video");
VirtualDub.video.filters.instance[0].Config("new profile", "default", "1.000000", "1");
VirtualDub.video.filters.Add("resize");
VirtualDub.video.filters.instance[1].Config(360,300,0,4,3,0,320,240,4,3,0,4,1,0x000000);
VirtualDub.video.filters.Add("MSUColorEnhancement 1.0b");
VirtualDub.audio.filters.Clear();
........................................................................................................................................
Neat Plugin is default mode setting .........sensing square upper left corner
........................................................................................................................................
FrameServe out as
0.vdr.avi to “AVSP”............... I never tried to use “Avisynth” until AVSP came along.
........................................................................................................................................
Open up “AVSP”...........................

You can name this file Restoration.avs and just open it in vdub but you will need to have "Avisynth" installed.
Load this script...............................................................................................................
AVISource("C:\0.vdr.avi")
LoadPlugin("c:\AVS\Plugins\AGC.dll")
LoadPlugin("c:\AVS\plugins\removegrain.dll")
LoadPlugin("c:\AVS\Plugins\mt_masktools.dll")
LoadPlugin("c:\AVS\Plugins\warpsharp.dll")
Loadplugin("c:\avs\plugins\gradfun2db.dll")
loadplugin("c:\avs\plugins\DeGrainMedian.dll")
loadplugin("c:\avs\plugins\Smoothdeinterlacer.dll")
LoadPlugin("c:\avs\plugins\Convolution3d.dll")
LoadPlugin("c:\avs\plugins\FFT3DFilter.dll")
import("c:\avs\plugins\limitedsharpenfaster.avs")
LoadPlugin("c:\avs\plugins\masktools.dll")
LoadPlugin("c:\avs\plugins\mt.dll")
LoadPlugin("c:\avs\plugins\mt_masktools.dll")
LoadPlugin("c:\avs\plugins\mvtools.dll")
LoadPlugin("c:\avs\plugins\mvtools2.dll")
LoadPlugin("c:\avs\plugins\VagueDenoiser.dll")
LoadPlugin("c:\avs\plugins\LimitedSupport_09Jan06b.dll")
LoadPlugin("c:\avs\plugins\depan.dll")
LoadCPlugin("C:\avs\plugins\AVSCurveFlow.dll")
ConverttoYUY2()
#Bob(0,0.75)
SetMtMode(1,0)
#bobbed= last
src = last

super = src.MSuper()
bvec2 = super.MAnalyse(isb=true, delta=2, overlap=8,blksize=16)
bvec1 = super.MAnalyse(isb=true, delta=1, overlap=8,blksize=16)
fvec1 = super.MAnalyse(isb=false, delta=1, overlap=8,blksize=16)
fvec2 = super.MAnalyse(isb=false, delta=2, overlap=8,blksize=16)

src.MDegrain2(super, bvec1, fvec1, bvec2, fvec2)

LimitedSharpenFaster(last,smode=4,strength=1250,overshoot=50,soft=30)

comp=last

function DetailBasedGrain(clip source, int "BM", int "dmin", int "dmax", int "grain_str", float "blur_str1",float "blur_str2", float "sharp_str")
{
bm=default(bm,"noise") # BlockBuster Method
dmin=default(dmin,1) # Blockbuster Detail Min
dmax=default(dmax,15) # Blockbuster Detail Max
grain_str=default(grain_str,2) # Grain strength
blur_str1=default(blur_str1,1.5) # Blur Strength
blur_str2=default(blur_str2,0.75) # Blur Strength
sharp_str=default(sharp_str,1) # Sharpen Strength

grain_dist = source.BlockBuster(method=bm,detail_min=dmin,detail_max=dmax,variance=grain_str)
#difference = mt_makediff(source, grain_dist, U=1, V=1)
#grain_pro = difference.Blur(blur_str1).Blur(blur_str2).Sharpen(sharp_str)
#mt_makediff(source,grain_pro,U=2,V=2)
grain_dist.addgrain(12,0,0).Blur(1)

return last
}

#DetailBasedGrain(dmax=23,grain_str=12,blur_str2=1.5,blur_str1=1, sharp_str=0.9)

#substrong = Subtract(comp,last).Levels(127, 1, 129, 0, 255)

#StackHorizontal(src.subtitle("original"),last.subtitle("processed"),substrong.subtitle("amp dif"))

Return Last
.......................................................................................................................................
Script could use some cleaning up, but it works
Not all of the plugins are needed
Press F5
Export (frameserve) to second copy of Virtualdub
Vdub opens all by itself.
Add this VCF configuration file
........................................................................................................................................
VirtualDub.audio.SetSource(1);
VirtualDub.audio.SetMode(0);
VirtualDub.audio.SetInterleave(1,500,1,0,0);
VirtualDub.audio.SetClipMode(1,1);
VirtualDub.audio.SetConversion(0,0,0,0,0);
VirtualDub.audio.SetVolume();
VirtualDub.audio.SetCompression();
VirtualDub.audio.EnableFilterGraph(0);
VirtualDub.video.SetInputFormat(0);
VirtualDub.video.SetOutputFormat(7);
VirtualDub.video.SetMode(3);
VirtualDub.video.SetSmartRendering(0);
VirtualDub.video.SetPreserveEmptyFrames(0);
VirtualDub.video.SetFrameRate2(0,0,1);
VirtualDub.video.SetIVTC(0, 0, 0, 0);
VirtualDub.video.SetCompression();
VirtualDub.video.filters.Clear();
VirtualDub.video.filters.Add("Color Mill(2.1)");
VirtualDub.video.filters.instance[0].Config(25700, 25700, 25700, 25700, 25700, 25700, 36964, 25700, 25700, 25700, 24932, 25700, 25700, 1124, 5);
VirtualDub.video.filters.Add("resize");
VirtualDub.video.filters.instance[1].Config(352,288,0,4,3,0,320,240,4,3,0,4,1,0x000000);
VirtualDub.audio.filters.Clear();
..............................................................................................................................................
Why did I resize in the first VCF?... It was required by the AVS script, so in the second VCF I resize again
To bring it back to original format............should be a better way I am sure.
MSI “ColorEnhancement” plugin must be reset to contrast every time you load it.
This plugin requires the DLL to be in the system32 folder
See
http://forums.virtualdub.org/index.php?act=ST&f=7&t=17419&
................................................................................................................................................................
The good new is its fantactic
The bad news is two fold.............sloooooooooooooow
Neat plugin is not free. Don’t know of any free plugin that comes close.
http://www.neatvideo.com/download.html
Now if we could make a “I forgot to take the lens cap off” plugin

Richard
Photorecall.net

[matfra]

Thank you Richard for you procedure.
Its very helpful. Im trying to figure out how AVPS and frameserving work. To be honest i never tried it before. I tried the scavanged the plugins required on the internet, but its little hard with the DLL names. I would like to know if its possible for you to zip the avisynth plugins and upload it for us if possible. I would be very appreciate.
Thank you !

[matfra]

Just a specification for those who have issue with MSUColorEnhancement. As Richard said, it need a DLL to work. You can find it on the internet for free. The dll is MFC71.dll.

[matfra]

what do you mean by
'MSI “ColorEnhancement” plugin must be reset to contrast every time you load it.'
I dont have the contrast option.
Heres my MSU
10128

[rfmmars]

Thank you Richard for you procedure.
Its very helpful. Im trying to figure out how AVPS and frameserving work. To be honest i never tried it before. I tried the scavanged the plugins required on the internet, but its little hard with the DLL names. I would like to know if its possible for you to zip the avisynth plugins and upload it for us if possible. I would be very appreciate.
Thank you !

Frameserving is easy, you just have to try it. Once you setup AVSP, it a snap, but you don't have to use it for the script, just open the ".avs" with Virtualdub.

http://rapidshare.com/files/263651333/Color_Enhancement.zip.html

or

E-mail me at

rfmmars@cox.net for the zip.

Richard

[matfra]

Thank you Richard for your help.
I already have MSU plugin.
I would like you to upload you AVISythn plugin used in this restoration.

LoadPlugin("c:\AVS\Plugins\AGC.dll")
LoadPlugin("c:\AVS\plugins\removegrain.dll")
LoadPlugin("c:\AVS\Plugins\mt_masktools.dll")
LoadPlugin("c:\AVS\Plugins\warpsharp.dll")
Loadplugin("c:\avs\plugins\gradfun2db.dll")
loadplugin("c:\avs\plugins\DeGrainMedian.dll")
loadplugin("c:\avs\plugins\Smoothdeinterlacer.dll")
LoadPlugin("c:\avs\plugins\Convolution3d.dll")
LoadPlugin("c:\avs\plugins\FFT3DFilter.dll")
import("c:\avs\plugins\limitedsharpenfaster.avs")
LoadPlugin("c:\avs\plugins\masktools.dll")
LoadPlugin("c:\avs\plugins\mt.dll")
LoadPlugin("c:\avs\plugins\mt_masktools.dll")
LoadPlugin("c:\avs\plugins\mvtools.dll")
LoadPlugin("c:\avs\plugins\mvtools2.dll")
LoadPlugin("c:\avs\plugins\VagueDenoiser.dll")
LoadPlugin("c:\avs\plugins\LimitedSupport_09Jan06b.dll")
LoadPlugin("c:\avs\plugins\depan.dll")
LoadCPlugin("C:\avs\plugins\AVSCurveFlow.dll")
Thank you !

[rfmmars]

Thank you Richard for your help.
I already have MSU plugin.
I would like you to upload you AVISythn plugin used in this restoration.

LoadPlugin("c:\AVS\Plugins\AGC.dll")
LoadPlugin("c:\AVS\plugins\removegrain.dll")
LoadPlugin("c:\AVS\Plugins\mt_masktools.dll")
LoadPlugin("c:\AVS\Plugins\warpsharp.dll")
Loadplugin("c:\avs\plugins\gradfun2db.dll")
loadplugin("c:\avs\plugins\DeGrainMedian.dll")
loadplugin("c:\avs\plugins\Smoothdeinterlacer.dll")
LoadPlugin("c:\avs\plugins\Convolution3d.dll")
LoadPlugin("c:\avs\plugins\FFT3DFilter.dll")
import("c:\avs\plugins\limitedsharpenfaster.avs")
LoadPlugin("c:\avs\plugins\masktools.dll")
LoadPlugin("c:\avs\plugins\mt.dll")
LoadPlugin("c:\avs\plugins\mt_masktools.dll")
LoadPlugin("c:\avs\plugins\mvtools.dll")
LoadPlugin("c:\avs\plugins\mvtools2.dll")
LoadPlugin("c:\avs\plugins\VagueDenoiser.dll")
LoadPlugin("c:\avs\plugins\LimitedSupport_09Jan06b.dll")
LoadPlugin("c:\avs\plugins\depan.dll")
LoadCPlugin("C:\avs\plugins\AVSCurveFlow.dll")
Thank you !
.....................................................................
Simlified Script
....................................................................

AVISource("C:\0.vdr.avi")
LoadPlugin("c:\AVS\plugins\removegrain.dll")
import("c:\avs\plugins\limitedsharpenfaster.avs")
LoadPlugin("c:\avs\plugins\mt_masktools.dll")
LoadPlugin("c:\avs\plugins\mvtools.dll")
LoadPlugin("c:\avs\plugins\mvtools2.dll")
LoadPlugin("c:\avs\plugins\LimitedSupport_09Jan06b.dll")


ConverttoYUY2()

SetMtMode(1,0)

src = last

super = src.MSuper()
bvec2 = super.MAnalyse(isb=true, delta=2, overlap=8,blksize=16)
bvec1 = super.MAnalyse(isb=true, delta=1, overlap=8,blksize=16)
fvec1 = super.MAnalyse(isb=false, delta=1, overlap=8,blksize=16)
fvec2 = super.MAnalyse(isb=false, delta=2, overlap=8,blksize=16)

src.MDegrain2(super, bvec1, fvec1, bvec2, fvec2)

LimitedSharpenFaster(last,smode=4,strength=1250,overshoot=50,soft=30)

comp=last

function DetailBasedGrain(clip source, int "BM", int "dmin", int "dmax", int "grain_str", float "blur_str1",float "blur_str2", float "sharp_str")
{
bm=default(bm,"noise") # BlockBuster Method
dmin=default(dmin,1) # Blockbuster Detail Min
dmax=default(dmax,15) # Blockbuster Detail Max
grain_str=default(grain_str,2) # Grain strength
blur_str1=default(blur_str1,1.5) # Blur Strength
blur_str2=default(blur_str2,0.75) # Blur Strength
sharp_str=default(sharp_str,1) # Sharpen Strength

grain_dist = source.BlockBuster(method=bm,detail_min=dmin,detail_max=dmax,variance=grain_str)
#difference = mt_makediff(source, grain_dist, U=1, V=1)
#grain_pro = difference.Blur(blur_str1).Blur(blur_str2).Sharpen(sharp_str)
#mt_makediff(source,grain_pro,U=2,V=2)
grain_dist.addgrain(12,0,0).Blur(1)

return last
}



Return Last

..............................................................................

Updated File Package

http://rapidshare.com/files/263791773/Color_Enhancement-2.zip.html

...............................................................................

Tested

Richard
photorecall.net