VideoHelp Forum
+ Reply to Thread
Results 1 to 15 of 15
Thread
  1. video file is 8bit YUV lossless MOV file 720x486 29.97fps interlaced. I want it to just resize to 720x480 without cropping.

    Code:
    Import("C:\Program Files (x86)\AVStoDVD\Lib\A2DSource.avsi")
    LoadPlugin("C:\Program Files (x86)\AVStoDVD\Lib\LeakKernelDeint.dll")
    
    Video = A2DVideoSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP", VFR=true, FrameRate=29.97)
    Audio = A2DAudioSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP")
    
    Video = Video.Crop(0,0,-Video.Width % 4,-Video.Height % 4).ConvertToYV12(interlaced=true)
    Video = Video.LeakKernelBob(0,7,false,false)
    Video = Video.AddBorders(0,24,0,26)
    Video = Video.Spline16Resize(720,480)
    Video = Video.SeparateFields().SelectEvery(4,0,3).Weave()
    
    Audio = Audio.Normalize()
    
    AudioDub(Video, Audio)
    Quote Quote  
  2. Remove the Crop(....). But do you still want to AddBorders(...) before resizing?
    Quote Quote  
  3. AVSTODVD/HCENC failed to encode with this script

    Code:
    Import("C:\Program Files (x86)\AVStoDVD\Lib\A2DSource.avsi")
    LoadPlugin("C:\Program Files (x86)\AVStoDVD\Lib\LeakKernelDeint.dll")
    
    Video = A2DVideoSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP", VFR=true, FrameRate=29.97)
    Audio = A2DAudioSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP")
    
    Video = Video.ConvertToYV12(interlaced=true)
    Video = Video.LeakKernelBob(0,7,false,false)
    Video = Video.Spline16Resize(720,480)
    Video = Video.SeparateFields().SelectEvery(4,0,3).Weave()
    
    Audio = Audio.Normalize()
    
    AudioDub(Video, Audio)
    Quote Quote  
  4. Member
    Join Date
    Mar 2008
    Location
    United States
    Search Comp PM
    The crop modifies 486>484. The bob operation fails if the vertical size is not mod 4.
    Probably best to leave it as is
    Quote Quote  
  5. AVSTODVD/HCENC also failed to encode with this script. Is there a script I can use to encode 8bit YUV 720X486 to DVD without cropping or adding borders?

    Code:
    Import("C:\Program Files (x86)\AVStoDVD\Lib\A2DSource.avsi")
    
    Video = A2DVideoSource("H:\Video capture\HEROINE OF HELL.mov", CacheFolder="S:\TEMP", VFR=true, FrameRate=29.97)
    Audio = A2DAudioSource("H:\Video capture\HEROINE OF HELL.mov", CacheFolder="S:\TEMP")
    
    Video = Video.ConvertToYV12(interlaced=true)
    Video = Video.Spline36Resize(720,480)
    
    Audio = Audio.Normalize()
    
    AudioDub(Video, Audio)
    Quote Quote  
  6. Member
    Join Date
    Mar 2008
    Location
    United States
    Search Comp PM
    I guess you could add a border temporarily and then remove it after the bob.

    Code:
    Import("C:\Program Files (x86)\AVStoDVD\Lib\A2DSource.avsi")
    LoadPlugin("C:\Program Files (x86)\AVStoDVD\Lib\LeakKernelDeint.dll")
    
    Video = A2DVideoSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP", VFR=true, FrameRate=29.97)
    Audio = A2DAudioSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP")
    
    #Video = Video.Crop(0,0,-Video.Width % 4,-Video.Height % 4).
    video=video.ConvertToYV12(interlaced=true)
    
    video=video.addborders(0,2,0,0)   #####  add temporarily
    
    Video = Video.LeakKernelBob(0,7,false,false)
    
    video=crop(video,0,2,-0,-0)            ##### remove
    
    Video = Video.AddBorders(0,24,0,26)
    Video = Video.Spline16Resize(720,480)
    Video = Video.SeparateFields().SelectEvery(4,0,3).Weave()
    
    Audio = Audio.Normalize()
    
    AudioDub(Video, Audio)
    Quote Quote  
  7. I add border to the bottom so it'll be 720x488 which is mod 4 but this script doesn't work

    Code:
    Import("C:\Program Files (x86)\AVStoDVD\Lib\A2DSource.avsi")
    LoadPlugin("C:\Program Files (x86)\AVStoDVD\Lib\LeakKernelDeint.dll")
    
    Video = A2DVideoSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP", VFR=true, FrameRate=29.97)
    Audio = A2DAudioSource("H:\Video capture\MOVIE.mov", CacheFolder="S:\TEMP")
    
    Video = Video.ConvertToYV12(interlaced=true)
    Video = Video.AddBorders(0,0,0,2)
    Video = Video.LeakKernelBob(0,7,false,false)
    Video = Video.Crop(0,0,0,-2)
    Video = Video.Spline16Resize(720,480)
    Video = Video.SeparateFields().SelectEvery(4,0,3).Weave()
    
    Audio = Audio.Normalize()
    
    AudioDub(Video, Audio)
    Quote Quote  
  8. Member
    Join Date
    Mar 2008
    Location
    United States
    Search Comp PM
    Code:
    Crop(0,0,-0,-2)
    But more than that, your script will produce poor video,
    You cannot resize height of interlaced video without creating artifacts
    Either use my script as-is or the A2D default
    Quote Quote  
  9. This script doesn't work.

    Code:
    Import("C:\Program Files (x86)\AVStoDVD\Lib\A2DSource.avsi")
    LoadPlugin("C:\Program Files (x86)\AVStoDVD\Lib\LeakKernelDeint.dll")
    
    Video = A2DVideoSource("H:\Video capture\HEROINE OF HELL.mov", CacheFolder="S:\TEMP", VFR=true, FrameRate=29.97)
    Audio = A2DAudioSource("H:\Video capture\HEROINE OF HELL.mov", CacheFolder="S:\TEMP")
    
    Video = Video.ConvertToYV12(interlaced=true)
    Video = Video.AddBorders(0,0,0,2)
    Video = Video.LeakKernelBob(0,7,false,false)
    Video = Video.Crop(0,0,-0,-2)
    Video = Video.Spline16Resize(720,480)
    Video = Video.SeparateFields().SelectEvery(4,0,3).Weave()
    
    Audio = Audio.Normalize()
    
    AudioDub(Video, Audio)
    Quote Quote  
  10. What error message do you get?
    Quote Quote  
  11. AVSTODVD says the duration of the video is 0 and failed to encode.
    Quote Quote  
  12. VIRTUALDUB says convertoyv12 must be mod 4.
    Quote Quote  
  13. Move the ConvertToYV12() line after the AddBorders() line.
    Quote Quote  
  14. Thanks it works now.
    Quote Quote  
  15. I believe that problem stems from a difference between AviSynth and AviSynth+.
    Quote Quote  



Similar Threads

Visit our sponsor! Try DVDFab and backup Blu-rays!