Underworld

LoadPlugin("D:\Encode\DG\DGDecodeNV.dll")
sourceClip=DGsource("D:\ENCODE\USA.dgi")  # <- edit usa.dgi location
baseClip=DGsource("D:\ENCODE\FRA.dgi", show=true, show2="2,120,Source").AssumeFPS(24000,1001).trim(189,0)+BlankClip(-169, 1920, 1080, "YV12", 24000, 1001).KillAudio() # <- edit fra.dgi location
ReplaceFramesSimple(baseClip, sourceClip, mappings="[1 1675] [13757 14521] [16775 16821] [141472 153070]")

crop(0,140,0,-140)

ConditionalFilter(last, dirty_lines, "SceneType", "<", "1")
ConditionalReader("D:\Encode\scenes.txt", "SceneType") # <- edit scenes.txt location

function dirty_lines (clip c) {

safe = c.Crop(0, 4, 0, -4)
c.ConvertToYV24()
 
base1 = Crop(0, 4, 0, 0)
t1 = Crop(0, 0, 0, 1 - Height()).Tweak(cont=1.3)
t2 = Crop(0, 1, 0, 2 - Height()).Tweak(cont=0.97)
t3 = Crop(0, 2, 0, 3 - Height()).Tweak(cont=1.06)
t4 = Crop(0, 3, 0, 4 - Height()).Tweak(cont=1.06)
StackVertical(t1, t2, t3, t4, base1)
 
base2 = Crop(0, 0, 0, -4)
b1 = Crop(0, Height() - 1, 0, 0).Tweak(cont=1.3)
b2 = Crop(0, Height() - 2, 0, -1).Tweak(cont=0.97)
b3 = Crop(0, Height() - 3, 0, -2).Tweak(cont=1.06)
b4 = Crop(0, Height() - 4, 0, -3).Tweak(cont=1.06)
StackVertical(base2, b4, b3, b2, b1)
ConvertToYV12()
Overlay(last, safe, x=0, y=4)

return last
}

spline36resize(1280,534)