forked from mia/Aegisub
a067bd560d
1. cd aegisub/ 2. svn mv *cpp *h src/ 3. svn mv Makefile.am MatroskaParser.c auto4_perldata.inc bitmaps boost \ changelog.txt config gl include libosxutil libresrc md5.c msvc mythes.cxx \ mythes.hxx res.rc src/ 4. cd .. 5. svn mv FFmpegSource2/ INSTALL Makefile.am README acinclude.m4 \ autogen.sh automation/ bin build configure.in desktop dummy.txt lib \ libass/ m4macros/ packages/ po/ scripts/ universalchardet/ aegisub/ 6. mkdir -p docs/wiki_convert 7. svn add docs/wiki_convert 8. cd docs 9. svn mv aegisub_convert_docs.pl convert.bat output wiki_convert/ * See r2749 for full description. Originally committed to SVN as r2752.
19 lines
601 B
Lua
19 lines
601 B
Lua
-- Automation 4 demo script
|
|
-- Macro that adds \be1 tags in front of every selected line
|
|
|
|
script_name = "Add edgeblur macro"
|
|
script_description = "A demo macro showing how to do simple line modification in Automation 4"
|
|
script_author = "Niels Martin Hansen"
|
|
script_version = "1"
|
|
|
|
|
|
function add_edgeblur(subtitles, selected_lines, active_line)
|
|
for z, i in ipairs(selected_lines) do
|
|
local l = subtitles[i]
|
|
l.text = "{\\be1}" .. l.text
|
|
subtitles[i] = l
|
|
end
|
|
aegisub.set_undo_point("Add edgeblur")
|
|
end
|
|
|
|
aegisub.register_macro("Add edgeblur", "Adds \\be1 tags to all selected lines", add_edgeblur)
|