VideoHelp Forum

Our website is made possible by displaying online advertisements to our visitors. Consider supporting us by disable your adblocker or Try ConvertXtoDVD and convert all your movies to DVD. Free trial ! :)
+ Reply to Thread
Results 1 to 2 of 2
Thread
  1. Member
    Join Date
    Mar 2008
    Location
    United States
    Search Comp PM
    Hi all
    I spent a bit of time about 6 months ago looking at this but I couldn't get a satisfactory result (see code snippet below).
    Every time I've seen this video, on the various free websites, it exhibits the same problem, I'm assuming something
    went wrong when it was originally ripped from a DVD and the same bad copy has been floating around for years.

    It's 20 fps, but you can clearly see the jumps where the missing frames should be bringing it up to 25 fps.
    https://www.youtube.com/watch?v=XBQbPvcqtDU

    Here's a clip from the beginning and my code attempt (which worked in a few situations but left these ugly smears in others)

    Code:
    #import("C:\Users\davex\Desktop\framerateconverter.avs")
    #loadplugin("D:\Program Files\AviSynth 2.5\plugins\dctfilter")
    #loadplugin("F:\Program Files\AviSynth 2.6\plugins\deblock.dll")
    #loadplugin("C:\Program Files (x86)\AviSynth\plugins\FrameRateConverter.dll")
    loadplugin("F:\Documents and Settings\Dave Xnet\Desktop\ApplyEvery\ApplyEvery.dll")
    
    #import("F:\Program Files\AviSynth 2.6\plugins\Deblock_QED_MT2MOd.avs")
    #import("F:\Documents and Settings\Dave Xnet\Desktop\jm.avs")
    
    orig=dss2("F:\Documents and Settings\Dave Xnet\Desktop\E12 Child's Play.mkv")
    
    #framerateconverter(Preset="normal", Newnum=25, framedouble=false,Blksize=8)
    #FrameRateConverter(25) #NewNum=25,NewDen=1)
    #convertfps(25) #hangefps(25)
    #jm_fps(25,dct=3,blksize=32)
    #deblock_qed()
    #jm_fps(25,dct=2) #,blksize=32)
    #sharpen(0.12)
    #assumefps(23.976)
    #trim(0,2000)
    
    #Orig = WhateverSource()
    
    # Make a black clip, the same characteristics as your source
    BlankClip(Orig)
    Black=last
    
    # Insert black frame in those missing frames (just temporary placeholder, will replace later)
    Orig
    InterleaveEvery(Black, 5,2)
    BlackInserted=last
    
    # Generates Missing Frames by interpolation
    BlackInserted
    sup = MSuper()
    #bv = MAnalyse(sup, isb=true, delta=2)
    #fv = MAnalyse(sup, isb=false, delta=2)
    bv = MAnalyse(sup, isb=true, delta=2) # ,search=5) #,chroma=false)
    fv = MAnalyse(sup, isb=false, delta=2) #,search=5) #,chroma=false)
    interpolated = MFlowInter(sup, bv, fv, time=50.0, ml=100).DuplicateFrame(0)
    replace = interpolated.SelectEvery(5,2) 
    
    # Delete Black Frames
    DeleteEvery(5,2) 
    
    # Replace Deleted Frames With Interpolated Frames
    InterleaveEvery(replace, 5,2)
    #version()
    #return last
    Thanks for looking
    Image Attached Files
    Quote Quote  
  2. It looks pretty much like I would expect. None of the motion interpolation filters deal well with complex motions, rotations (2d or 3d) or with objects moving over complex backgrounds. You can try using InterFrame() which lets you tune for smoother motion with more distortions, or less smooth motion (frame blending) with less distortion.
    Quote Quote  



Similar Threads