forked from mia/Aegisub
91d73ec8ea
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.
29 lines
1,017 B
Lua
29 lines
1,017 B
Lua
-- Automation 4 test file
|
|
-- Test the result of the text_extents function
|
|
|
|
script_name = "Test text_extents"
|
|
script_description = "Test what the result of text_extents is on a fixed string on all styles in the file"
|
|
script_author = "Niels Martin Hansen"
|
|
script_version = "1"
|
|
|
|
|
|
function test_te(subtitles, selected_lines, active_line)
|
|
local teststring = "Test"
|
|
|
|
aegisub.debug.out("Test string is '" .. teststring .. "'\n")
|
|
|
|
local styles = {}
|
|
for i = 1, #subtitles do
|
|
local l = subtitles[i]
|
|
if l.class == "style" then
|
|
aegisub.debug.out(" - - -\n")
|
|
aegisub.debug.out("Found style: " .. l.name .. "\n")
|
|
local width, height, descent, extlead = aegisub.text_extents(l, teststring)
|
|
aegisub.debug.out(string.format("Width: %.2f Height: %.2f Descent: %.2f Ext. lead: %.2f\n", width, height, descent, extlead))
|
|
end
|
|
aegisub.progress.set(i/#subtitles*100)
|
|
end
|
|
end
|
|
|
|
|
|
aegisub.register_macro("Test text_extents", "Show the result of the text_extents function for all styles in the file", test_te, nil)
|