xiaozi 2024-08-08 01:13:14

从 ttc 中提取 ttf 文件: ttc2ttf.pe

#!/usr/local/bin/fontforge
# Usage: fontforge -script ttc2ttf.pe /path/to/font.ttc

fonts = FontsInFile($1)
n = SizeOf(fonts)
i = 0
while (i < n)
    Open($1 + "(" + fonts[i] + ")", 1)

    index = ToString(i + 1)
    if (i < 9)
        index = "0" + index
    endif

    ext = ".ttf"
    if ($order == 3)
        ext = ".otf"
    endif

    filename = $fontname + "-" + index + ext
    Generate(filename)
    Print(filename)
    Close()
    ++i
endloop

评论

trang chủ - Wiki
Copyright © 2011-2024 iteam. Current version is 2.137.1. UTC+08:00, 2024-11-05 16:34
浙ICP备14020137号-1 $bản đồ khách truy cập$