LoadPlugin("C:\Program Files (x86)\avisynth 2.5\plugins\TIVTC.dll")
LoadPlugin("C:\Program Files (x86)\avisynth 2.5\plugins\MSharpen.dll")

#Sources
A=avisource("Jap B 137 C 66 Sat 72 S 9.avi").Levels(0,1,245,6,245)
B=avisource("X0.avi").Crop(8,96,-4,-108,align=true).Msharpen(Threshold=7).Levels(16,1,235,6,245)
C=avisource("US C 69 S9.avi").Levels(0,1,245,6,245)
D=avisource("US Cap #2.avi").Levels(0,1,245,6,245)
E=avisource("US CLV.avi").Crop(2,0,0,0).Tweak(Bright=-5).AddBorders(0,0,2,0).Levels(0,1,245,6,245)

#Medians
F=Median1(C,D,E,chroma="process")
G=Median1(B,A,C,chroma="process")
H=Median1(B,A,F,chroma="process")

#Join Back Together
I=G.Trim(0,196)+H.Trim(197,198)+G.Trim(199,2834)

#Process
J=I.Levels(6,.9,245,6,245).TTempSmooth(strength=2).EdgeCleaner(rmode=16,smode=1).Tweak(sat=1.01, cont=1.03).MSharpen(Threshold=2, strength=20, highq=true)
K=I.Levels(6,.9,245,6,255).TTempSmooth(strength=2).EdgeCleaner(rmode=16,smode=1).Tweak(sat=1.03, cont=1.19).MSharpen(Threshold=2, strength=20, highq=true)

#Brighten Stars
L=J.Trim(2050,2099)
M=L.Reverse()
N=L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M+L+M
O=J.Trim(0,39)+Median1(J.Trim(40,2099),N.Trim(40,2099),K.Trim(40,2099),chroma="process")+J.Trim(2100,2834)
P=O.Levels(6,1.05,245,0,255)

#No BlackBars
P.AddBorders(8,0,4,0)

#Letterboxed
#U.AddBorders(8,102,4,102)

#Widescreen
#U.Spline64Resize(708,368).MSharpen(Threshold=2, strength=10, highq=true).AddBorders(8,56,4,56)

#720p
#U.Spline64Resize(1280,552).MSharpen(Threshold=5, strength=100, highq=true).AddBorders(0,84,0,84)




Function Median1(clip input_1, clip input_2, clip input_3, string "chroma")
{# median of 3 clips from Helpers.avs by G-force

chroma = 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)
}

function EdgeCleaner(clip c, int "strength", bool "rep", int "rmode", int "smode", bool "hot") {

    strength    = default(strength, 10)
    rep         = default(rep, true)
    rmode       = default(rmode, 17)
    smode       = default(smode, 0)
    hot         = default(hot, false)

    c           = (c.isYV12()) ? c : c.ConvertToYV12()
    strength    = (smode==0) ? strength : strength+4

    main	= c.aWarpSharp2(depth=Round(strength/2),blur=1)
    main        = (rep) ? Repair(main,c,rmode) : main

    mask        = c.mt_edge("prewitt",4,32,4,32).mt_invert().mt_convolution()

    final       = (!hot) ? mt_merge(c,main,mask) : Repair(mt_merge(c,main,mask),c,2)
    final       = (smode != 0) ? mt_merge(final,c,c.StarMask(smode)) : final

    return final

}

function StarMask(clip c, int "mode") {

    mode        = default(mode, 1)

    clean       = (mode==1) ? c.RemoveGrain(17) : Repair(c.Deen("a3d",4,12,0),c,15).RemoveGrain(21)
    diff        = (mode==1) ? mt_makediff(c,clean) : NOP

    final       = (mode==1) ? diff.Greyscale().Levels(40,0.350,168,0,255).removegrain(7,-1).mt_edge("prewitt",4,16,4,16) : \
                  Subtract(mt_merge(clean,c,c.mt_edge("roberts",0,2,0,2).mt_expand(mode=mt_circle(1)).mt_invert()),c).mt_edge("roberts",0,0,0,0).mt_deflate()

    return final

}