Kod: Markera allt
SetMemoryMax(1024)
LoadPlugin("C:\Program\AviSynth 2.5\plugins\SmoothAdjust.dll")
LoadPlugin("C:\Program\AviSynth 2.5\plugins\TIVTC.dll")
AviSource("Dubbel8.avi")
# Capturekortet har "top field first"
AssumeTFF()
# Smart bob deinterlace, ta fram helbilder från varje "halvbild" så det blir 50 fps
QTGMC()
# Fix (S-)VHS chroma shift
Vshift=2 # determine experimentally
Hshift=0 # 2 lines per bobbed-field per tape generation (PAL); original=2; copy=4 etc
mergechroma(last.crop(Hshift,Vshift,0,0).addborders(0,0,Hshift,Vshift))
# Stabilisera små skak och hopp i bilden
stab()
#Ta fram framerate 16,666 fps för filmen (ta bort kopierade bildrutor)
TDecimate(mode=0,cycleR=2,cycle=3)
# Dra ner hastigheten till 15 fps (normal hastighet för dubbel8 är egentligen 16 fps men här verkade det för snabbt)
AssumeFPS(15)
# Klipp bort fula kanter på sidorna
Crop(16,8,688,560)
# Fixa nivåer
SmoothLevels(6,1.0,180,0,255, chroma=0)
#Justera färger
SmoothCurve(Ucurve="0-70;126-130;200-230;255-255",Vcurve="0-0;80-30;129-127;255-230",interp=60,show=false)
# Lägg på svarta kanter till 720x576 igen
AddBorders(16,8,16,8)
# Öka till 75 bilder per sekund (visar samma filmruta 5 gånger i rad)
ChangeFPS(75,1)
# Kasta bort var tredje bildruta så blir det 50 bilder per sekund
SelectEvery(3,0,1)
# Nu gör vi det interlaced igen
SeparateFields()
SelectEvery(4,0,3)
Weave()
Kom också på att när man justerar luminansnivåerna så påverkas även färgerna (krominansen beräknar färgen som skillnad mot luminansen när man kör YUV-format).
Så smoothlevels med parametern chroma=0 gav mindre överdrivna färger än defaultvärdet 100.
Sedan joxade jag lite till med parametrarna och tycker det ser hyfsat bra ut med färgerna nu.
Men jag har inte kollat hur det ser ut på TV när man gör så här bed bildhastigheten.
Kanhända det är bättre att behålla 16,67 bilder per sekund och strunta i hastighetsändringarna
