forked from mia/Aegisub
34 lines
858 B
Lua
34 lines
858 B
Lua
|
-- Automation 4 test file
|
||
|
|
-- Create a Macro feature, that displays some text
|
||
|
|
|
||
|
|
script_name = "Automation 4 test 3"
|
||
|
|
script_description = "Test parse_karaoke_data"
|
||
|
|
script_author = "Niels Martin Hansen"
|
||
|
|
script_version = "1"
|
||
|
|
|
||
|
|
|
||
|
|
function copy_table(tab)
|
||
|
|
local res = {}
|
||
|
|
for key, val in pairs(tab) do
|
||
|
|
res[key] = val
|
||
|
|
end
|
||
|
|
return res
|
||
|
|
end
|
||
|
|
|
||
|
|
function karatest(subtitles, selected_lines, active_line)
|
||
|
|
for i = #selected_lines, 1, -1 do
|
||
|
|
local ri = selected_lines[i]
|
||
|
|
local l = subtitles[ri]
|
||
|
|
local k = aegisub.parse_karaoke_data(l)
|
||
|
|
for j = 1, #k do
|
||
|
|
local nl = copy_table(l)
|
||
|
|
l.text = string.format("{\\t(%d,%d,\\fscx50)}%s", k[j].start_time, k[j].end_time, k[j].text_stripped)
|
||
|
|
subtitles.insert(ri+j, l)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
aegisub.set_undo_point("karaoke-like stuff")
|
||
|
|
end
|
||
|
|
|
||
|
|
|
||
|
|
aegisub.register_macro("Karaoke fun", "Makes karaoke-like stuff", "edit", karatest, nil)
|