Avisynth-Neuling......

import("F:\Video\WORKING\Tools\masktools-v2.0a27\masktools\LimitedSharpenFaster.avsi")
LoadPlugin("E:\Programme\DGIndex\DGDecode.dll")
LoadPlugin("F:\Video\WORKING\Tools\RemoveGrain\RemoveGrain.dll")
LoadPlugin("F:\Video\WORKING\Tools\RemoveGrain\Repair.dll")
LoadPlugin("F:\Video\WORKING\Tools\RemoveGrain\SSETools.dll")
LoadPlugin("F:\Video\WORKING\Tools\masktools-v2.0a27\mt_masktools.dll")
LoadPlugin("F:\Video\WORKING\Tools\UnDot\UnDot.dll")
LoadPlugin("F:\Video\WORKING\Tools\DeComb\Decomb521.dll")
LoadPlugin("F:\Video\WORKING\Tools\TDeint\TDeint.dll")
#MPEG2Source("\film.d2v")
#AVISource("\cut.avi",audio=false)


### interlace-Methode
#AssumeTFF().SeparateFields()        # Test
#AssumeBFF().SeparateFields()        # Test
#Telecide(1)                # deinterlacing
#FieldDeinterlace(full=false)        # deinterlacing
#TDeint()                # deinterlacing


### Auflösung des Videos
#breite = width()
#hoehe  = height()


### schneiden & endgültige Auflösung    ------------------------------------------------------ v
#links  = 0
#oben   = 0
#rechts = 0
#unten  = 0
#e_breite = 576
#e_hoehe  = 432
### schneiden & endgültige Auflösung    ------------------------------------------------------ ^


### LQ mode    ------------------------------------------------------------------------------ v
#privat_RemoveDust(4,2,4)                    # entrauschen
#Crop(links,oben,breite-links-rechts,hoehe-oben-unten)        # schneiden
#AddBorders(links,oben,rechts,unten)                # schwarze Balken hinzufügen
#UnDot()                            # entrauschen
#ModerateSharpen(1.0)                        # schärfen
#lanczosresize(e_breite,e_hoehe)                # resizen
### LQ mode    ------------------------------------------------------------------------------ ^


### HQ mode    ------------------------------------------------------------------------------ v
#Crop(links,oben,breite-links-rechts,hoehe-oben-unten)        # schneiden
#AddBorders(links,oben,rechts,unten)                # schwarze Balken hinzufügen
#privat_mt_LRemoveDust(-1)                    # entrauschen
#LimitedSharpenFaster(dest_x=e_breite, dest_y=e_hoehe, strength=120, soft=-1)    # schärfen
### HQ mode    ------------------------------------------------------------------------------ ^


### Auflösungen    ------------------------------------------------------------------------------ v
# 2,25:1 (720,320) (576,256)
# 1,85:1 (592,320) ~(688,368)
# 1,76:1 (592,336) (480,272)
# 4:3     (768,576) (640,480) (576,432)
### Auflösungen    ------------------------------------------------------------------------------ ^


### Funktionen    ------------------------------------------------------------------------------ v
# RemoveDust(4,2,x): (4,2,1) leicht bis (4,2,4) stark; bei mode=3,4,9 thin line problem
# Kann nicht bis zum Rand arbeiten, eventuell zweimal cropen, erst ein Stück Rand dran lassen (mod4), danach weg.
function privat_RemoveDust(clip input, int _mode, int _modeU, int "limit"){
  limit=default(limit,4)
  repmode = 2
  clensed = Clense(input)
  rep=Repair(clensed, input, mode=repmode)
  rg = RemoveGrain(rep, mode=_mode, modeU=_modeU)
  rd=TemporalRepair(rg, rep)
  return LimitChange(rd, input, limit, limitU=255)
}
# LRemoveDust( _mode, [limit], [limitC] )
# limitC: [1,255] - beschränkt Chroma-Änderungen auf maximal diesen Wert
# [0] - kein Limiting für Chroma (schneller)
# [-1] - Chroma? Was ist das? (Noch schneller, für B/W-Clips. Hinterher manuell Greyscale() anwenden!)
# [-255,-2] - die U/V-Ebenen werden mit diesem Wert gefüllt.
function privat_mt_LRemoveDust(clip input, int _mode, int "limit", int "limitC"){
  limit  = default(limit, 4)
  limitC = default(limitC,0)      #  default chroma limit: no chroma limiting!
  #limitC = default(limitC,limit) #  alternative: default chroma limit = luma limit
  LLy    = string(limit)
  LLc    = string(limitC)
  STRy   = "x "+LLy+" + y < y "+LLy+" - x "+LLy+" - y > y "+LLy+" + x ? ?"
  STRc   = "x "+LLc+" + y < y "+LLc+" - x "+LLc+" - y > y "+LLc+" + x ? ?"
  uv = (limitC < -1) ?  limitC
   \ : (limitC <  0) ?  1
   \ : (limitC <  1) ?  2 
   \ :                  3
  repmode   = 2
  repmodeUV = (uv > 1) ? repmode : -1
  _modeUV   = (uv > 1) ? _mode   : -1
  clensed = Clense(input)
  rep     = Repair(clensed, input, mode=repmode, modeU=repmodeUV)
  rg      = RemoveGrain(rep, mode=_mode, modeU=_modeUV)
  TemporalRepair(rg, rep)
  mt_lutxy(last, input, STRy, STRc, STRc, U=uv, V=uv)
  return last
}


# ModerateSharpen(1.0) <- Maximum
function ModerateSharpen(clip input, float amount){
  repmode = 16
  sharpened = Sharpen(input, amount)
  return Repair(sharpened, input, mode=repmode)
}
### Funktionen    ------------------------------------------------------------------------------ ^