AvsPmod (x64) Script
- -Options, Settings- #############################
vidfile = "VIDEOFILE" subfile = "SUBFILE" group = "GROUPNAME"
- Unless upscaling leave these as 0, else add desired px values
VidClp_width = 0 #1280 VidClp_height = 0 #720
- Adding blank frames in front or back of the VidClp
Front_FramePadding = 0 Back_FramePadding = 0
Logging = false display_group = true displayFramNum = false display_timecode = false display_subtitles = true
Notes = "" # If none then keep empty quotes
- -Should Not Need To Change- ##########################
- c1 = ChangeFPS(c1,29.950)
- c2 = ChangeFPS(c2,29.950)
- creating file and set path for future log entries:
(Logging) \ ? Eval(""" folder = ScriptDir() (RightStr(folder, 1) == "\")
\ ? SetLogParams(folder + group + "_ScriptLog.log", LOG_INFO)
\ : SetLogParams(folder + "\" + group + "_ScriptLog.log", LOG_INFO) LogMsg(string("Starting Logger"), LOG_INFO) """) \:nop() # Undefined()
/*
- Alt to FFVideoSource but needs other changes for script to work right
c1 = LWLibavVideoSource(vidfile,format="YUV420P8")
- /
c1 = FFVideoSource (vidfile, varprefix="c1_", colorspace="YV12")
- Add blank frames to vid file if needed
(StrLen(subfile) == 0) \ ? Eval("""
F_blank1 = BlankClip(c1, length= Front_FramePadding) B_blank1 = BlankClip(c1, length= Back_FramePadding) c1 = F_blank1+c1+B_blank1 """)
\: nop()
w = c1.Width () h = c1.Height () wm4 = (w + 3) / 4 * 4 hm4 = (h + 3) / 4 * 4
target_width = (VidClp_width > 0) ? VidClp_width : w target_height = (VidClp_height > 0) ? VidClp_height : h
matrix = (1 <= c1_FFCOLOR_SPACE <= 4) ? "709" \ : (c1_FFCOLOR_SPACE >= 5) ? "601" : nop() par = (c1_FFSAR_NUM > 0 && c1_FFSAR_DEN > 0) \ ? Float (c1_FFSAR_NUM) / Float (c1_FFSAR_DEN) \ : nop() tv_range = (c1_FFCOLOR_RANGE != 2)
- Adding Subs based on the file ext
Subs = (StrLen(subfile) > 0 && display_subtitles) \ ? (RightStr(LCase(subfile), 3) == "sup") \ ? SupTitle(c1,subfile) \ : (RightStr(LCase(subfile), 3) == "sub") \ ? VSFilter_Vobsub(c1,subfile) \ : AssRender(c1,subfile) \: nop()
- Add blank frames to vid+sub file if needed
(StrLen(subfile) > 0 && display_subtitles) \ ? Eval("""
F_blank2 = BlankClip(Subs, length= Front_FramePadding) B_blank2 = BlankClip(Subs, length= Back_FramePadding) F_blank2+Subs+B_blank2 """)
\: nop()
(VersionNumber () >= 2.6) ? last \ : AddBorders (0, 0, wm4 - w, hm4 - h)
- upscale
((par > 0) ? \ (target_width != c1.Width() || target_height != c1.Height()) \ ? Dither_srgb_display (par=par, matrix=matrix, tv_range=tv_range, w=target_width, h=target_height) \ : Dither_srgb_display (par=par, matrix=matrix, tv_range=tv_range) \ :(target_width != c1.Width() || target_height != c1.Height()) \ ? Dither_srgb_display (autopar=True, matrix=matrix, tv_range=tv_range, w=target_width, h=target_height) \ : Dither_srgb_display (autopar=True, matrix=matrix, tv_range=tv_range) \)
- for screenshot macro and info in screenshot
screenShotGroup = (target_width > c1.Width() || target_height > c1.Height()) \ ? group + "_Upscaled" : group cmt1 = (target_width > c1.Width() || target_height > c1.Height()) \ ? group + "\nupscaled" : group cmt2 = (display_group) ? \ cmt1 : ""
FFInfoEX(framenum=displayFramNum,vfrtime=display_timecode, cfrtime=false, frametype=false, x=last.width-6, y=4, cmt=cmt2, align=9, shorttime=true)
- Adding notes on screen
(StrLen(Notes) > 0 ) \ ? Subtitle("Note: " + Notes, lsp=0,text_color=$fd2f2f,size=24,align=7,y=5) \ : Subtitle("")