Files
2026-03-27 07:06:16 +01:00

249 lines
8.4 KiB
Lua

-- Original by Scheliux, Dragoner7 which was ported from Ruin0x11
-- Adapted to webp by DonCanjas
-- Modify_: https://github.com/dyphire/mpv-scripts
-- Create animated webps or gifs with mpv
-- Requires ffmpeg.
-- Adapted from https://github.com/Scheliux/mpv-gif-generator
-- Usage: "w" to set start frame, "W" to set end frame, "Ctrl+w" to create.
-- Note:
-- Requires FFmpeg in PATH environment variable or edit ffmpeg_path in the script options,
-- Note:
-- A small circle at the top-right corner is a sign that creat is happenning now.
require 'mp.options'
local msg = require 'mp.msg'
local utils = require "mp.utils"
local options = {
type = "gif", -- gif or webp
ffmpeg_path = "ffmpeg",
dir = "~~desktop/",
rez = 600,
fps = 15,
lossless = 0,
quality = 90,
compression_level = 6,
loop = 0,
}
read_options(options)
local fps
local ext
local text
if options.type == "webp" then
ext = "webp"
text = "webP"
else
ext = "gif"
text = "GIF"
end
-- Check for invalid fps values
-- Can you believe Lua doesn't have a proper ternary operator in the year of our lord 2020?
if options.fps ~= nil and options.fps >= 1 and options.fps < 30 then
fps = options.fps
else
fps = 15
end
-- Set this to the filters to pass into ffmpeg's -vf option.
-- filters="fps=24,scale=320:-1:flags=spline"
filters=string.format("fps=%s,scale='trunc(ih*dar/2)*2:trunc(ih/2)*2',setsar=1/1,scale=%s:-1:flags=lanczos", fps, options.rez)
local is_windows = package.config:sub(1, 1) == "\\" -- detect path separator, windows uses backslashes
-- Setup output directory
local output_directory = mp.command_native({ "expand-path", options.dir })
--create output_directory if it doesn't exist
if output_directory ~= '' then
local meta, meta_error = utils.file_info(output_directory)
if not meta or not meta.is_dir then
local windows_args = { 'powershell', '-NoProfile', '-Command', 'mkdir', string.format("\"%s\"", output_directory) }
local unix_args = { 'mkdir', '-p', output_directory }
local args = is_windows and windows_args or unix_args
local res = mp.command_native({name = "subprocess", capture_stdout = true, playback_only = false, args = args})
if res.status ~= 0 then
msg.error("Failed to create animated_dir save directory "..output_directory..". Error: "..(res.error or "unknown"))
return
end
end
end
start_time = -1
end_time = -1
local function is_protocol(path)
return type(path) == 'string' and (path:find('^%a[%w.+-]-://') ~= nil or path:find('^%a[%w.+-]-:%?') ~= nil)
end
function make_animated_with_subtitles()
make_animated_internal(true)
end
function make_animated()
make_animated_internal(false)
end
function table_length(t)
local count = 0
for _ in pairs(t) do count = count + 1 end
return count
end
function make_animated_internal(burn_subtitles)
local start_time_l = start_time
local end_time_l = end_time
if start_time_l == -1 or end_time_l == -1 or start_time_l >= end_time_l then
mp.osd_message("Invalid start/end time.")
return
end
local trim_filters = filters
local position = start_time_l
local duration = end_time_l - start_time_l
local filename = mp.get_property("filename/no-ext")
msg.info("Creating " .. text)
mp.osd_message("Creating " .. text)
-- shell escape
function esc_for_sub(s)
s = string.gsub(s, "\\", "/")
s = string.gsub(s, '"', '\\"')
s = string.gsub(s, ":", "\\:")
s = string.gsub(s, "'", "\\'")
s = string.gsub(s, "%[", "\\%[")
s = string.gsub(s, "%]", "\\%]")
return s
end
local pathname = mp.get_property("path", "")
local path = mp.get_property_native("path")
local cache = mp.get_property_native("cache")
local cache_state = mp.get_property_native("demuxer-cache-state")
local cache_ranges = cache_state and cache_state["seekable-ranges"] or {}
if path and is_protocol(path) or cache == "auto" and #cache_ranges > 0 then
local pid = mp.get_property_native('pid')
local temp_path = os.getenv("TEMP") or "/tmp/"
local temp_video_file = utils.join_path(temp_path, "mpv_dump_" .. pid .. ".mkv")
mp.commandv("dump-cache", start_time_l, end_time_l, temp_video_file)
position = 0
filename = mp.get_property("media-title")
pathname = temp_video_file
end
if burn_subtitles then
-- Determine currently active sub track
local i = 0
local tracks_count = mp.get_property_number("track-list/count")
local subs_array = {}
-- check for subtitle tracks
while i < tracks_count do
local type = mp.get_property(string.format("track-list/%d/type", i))
local selected = mp.get_property(string.format("track-list/%d/selected", i))
local external = mp.get_property(string.format("track-list/%d/external", i))
-- if it's a sub track, save it
if type == "sub" then
local length = table_length(subs_array)
if selected == "yes" and external == "yes" then
msg.info("Error: external subtitles have been selected")
mp.osd_message("Error: external subtitles have been selected", 2)
return
else
subs_array[length] = selected == "yes"
end
end
i = i + 1
end
if table_length(subs_array) > 0 then
local correct_track = 0
-- iterate through saved subtitle tracks until the correct one is found
for index, is_selected in pairs(subs_array) do
if (is_selected) then
correct_track = index
end
end
trim_filters = trim_filters .. string.format(",subtitles='%s':si=%s", esc_for_sub(pathname), correct_track)
end
end
-- make the animated
local file_path = utils.join_path(output_directory, filename)
-- increment filename
for i = 0, 999 do
local fn = string.format('%s_%03d.%s', file_path, i, ext)
if not file_exists(fn) then
animated_name = fn
break
end
end
if not animated_name then
mp.osd_message('No available filenames!')
return
end
local copyts = ""
if burn_subtitles then
copyts = "-copyts"
end
if options.type == "webp" then
arg = string.format("%s -y -hide_banner -loglevel error -ss %s %s -t %s -i '%s' -lavfi %s -lossless %s -q:v %s -compression_level %s -loop %s '%s'", options.ffmpeg_path, position, copyts, duration, pathname, trim_filters, options.lossless, options.quality, options.compression_level, options.loop, animated_name)
else
arg = string.format("%s -y -hide_banner -loglevel error -ss %s %s -t %s -i '%s' -lavfi %s,'split[s0][s1];[s0]palettegen[p];[s1][p]paletteuse' -loop %s '%s'", options.ffmpeg_path, position, copyts, duration, pathname, trim_filters, options.loop, animated_name)
end
local windows_args = { 'powershell', '-NoProfile', '-Command', arg }
local unix_args = { '/bin/bash', '-c', arg }
local args = is_windows and windows_args or unix_args
local screenx, screeny, aspect = mp.get_osd_size()
mp.set_osd_ass(screenx, screeny, "{\\an9}● ")
local res = mp.command_native({name = "subprocess", capture_stdout = true, playback_only = false, args = args})
mp.set_osd_ass(screenx, screeny, "")
if res.status ~= 0 then
msg.info("Failed to creat " .. animated_name)
mp.osd_message("Error creating " .. text .. ", check console for more info.")
return
end
msg.info(animated_name .. " created.")
mp.osd_message(text .. " created.")
end
function set_animated_start()
start_time = mp.get_property_number("time-pos", -1)
mp.osd_message(text .. " Start: " .. start_time)
end
function set_animated_end()
end_time = mp.get_property_number("time-pos", -1)
mp.osd_message(text .. " End: " .. end_time)
end
function file_exists(name)
local f = io.open(name, "r")
if f ~= nil then io.close(f) return true else return false end
end
mp.add_key_binding("w", "set_animated_start", set_animated_start)
mp.add_key_binding("W", "set_animated_end", set_animated_end)
mp.add_key_binding("Ctrl+w", "make_animated", make_animated)
mp.add_key_binding("Ctrl+W", "make_animated_with_subtitles", make_animated_with_subtitles) --only works with srt for now