Advertisement
feos

smb_ntsc_pal_comparison

Jul 31st, 2017
246
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. factor = 4
  2.  
  3. ntsc = AviSource("ntsc.avi") \
  4.     .PointResize(256*factor, 240*factor) \
  5.     .Subtitle("NTSC Super Mario Bros. TAS by HappyLee", size=12*factor, text_color=color_white, align=8) \
  6.     .ShowFramenumber(x=24*factor, y=44*factor, size=14*factor, text_color=color_white)
  7.    
  8. pal = AviSource("pal.avi") \
  9.     .PointResize(256*factor, 240*factor) \
  10.     .Subtitle("PAL Super Mario Bros. TAS by HappyLee", size=12*factor, text_color=color_white, align=8) \
  11.     .ShowFramenumber(x=24*factor, y=44*factor, size=14*factor, text_color=color_white)\
  12.     .ChangeFPS(ntsc.FrameRateNumerator, ntsc.FrameRateDenominator)
  13.  
  14. pal  = Remove( pal,   195,   206)
  15. pal  = Remove( pal,   637,   639)
  16. ntsc = Remove(ntsc,  2447,  2468)
  17. ntsc = Remove(ntsc,  3940,  3957)
  18. ntsc = Remove(ntsc,  6496,  6526)
  19. ntsc = Remove(ntsc,  7162,  7174)
  20. pal  = Remove( pal,  7848,  7859)
  21. ntsc = Remove(ntsc, 10834, 10893)
  22. ntsc = Remove(ntsc, 14969, 15077)
  23. pal  = Remove( pal, 16365, 16403)
  24. pal  = Remove( pal, 17239, 17279)
  25.  
  26. StackHorizontal(ntsc, pal)
  27. KillAudio
  28. audio = MonoToStereo(GetChannel(ntsc, 1), GetChannel(pal, 1))
  29. AudioDub(audio, last)
  30. Trim(0, 18700)
  31. AddBorders(2*factor,0,0,0)
  32. ConvertToYV24(chromaresample="point", matrix="Rec709")
  33. ConvertToYV12(chromaresample="point", matrix="Rec709")
  34.  
  35. function Remove(clip c, int start, int end) {
  36.     c
  37.     Trim(0, -start) + Trim(end+1, 0)
  38. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement