YAHRmod

# Y'et A'nother H'alo R'educing script

function YAHR(clip clp)
{
b1    = clp.minblur(2).removegrain(11,-1)
b1D   = mt_makediff(clp,b1)
w1    = clp.aWarpSharp(depth=32,blurlevel=2,thresh=0.5)
w1b1  = w1.minblur(2,1).removegrain(11,-1)
w1b1D = mt_makediff(w1,w1b1)
DD    = b1D.repair(w1b1D,13)
DD2   = mt_makediff(b1D,DD)
clp.mt_makediff(DD2,U=2,V=2)
}

# Y'et A'nother H'alo R'educing script
# YAHR A.SONY mod 1.37 , original YAHR was by Didée
# good deHalo for modern DVD and other cases

function YAHR2(clip clp, int "depth", int "blur", bool "useawarp4")
{

depth         = Default(depth, 8)
useawarp4     = Default(useawarp4, false)

b1    = clp.minblur(2).removegrain(11,-1)
b1D   = mt_makediff(clp,b1)
w1    = useawarp4 ? clp.aWarpSharp4xx(depth=depth,blur=blur,chroma=1,useawarp4=true) : clp.aWarpSharp2(depth=depth,blur=blur,chroma=1)
w1b1  = w1.minblur(2,1).removegrain(11,-1)
w1b1D = mt_makediff(w1,w1b1)
DD    = b1D.repair(w1b1D,13)
DD2   = mt_makediff(b1D,DD)
clp.mt_makediff(DD2,U=2,V=2)
}

function YAHR3(clip src, int "depth", int "radius", int "blur", bool "useawarp4")
{
depth         = Default(depth, 32)
radius        = Default(radius, 6)
src
edgm = EMask_dhh(ColorYUV(autogain=true), 3, 140,true)
hfil = YAHR2(depth=depth,blur=blur,useawarp4=useawarp4)
RM2  = DR_Radius_dhh(edgm.mt_inflate(),radius,0).mt_inflate()
DeRinging = mt_Merge(hfil, src, edgm.mt_inflate(155,155))
mt_Merge(src, DeRinging, RM2, u=2, v=2)
}