-- (find-es "lua5" "require") do local _, __, arg0path = string.find(arg[0], "^(.*)/[^/]*$") scriptdir = arg0path or "." if arg0path then LUA_PATH = (LUA_PATH or getenv("LUA_PATH") or "?;?.lua").. ";"..arg0path.."/?" end end require "vtfontlib.lua" require "mathchars.lua" -- (find-lua50ref "Basic Functions" ". loadstring") -- PP(arg) S = function (n) if n then return ARGV[ARGD+n] or "" end ARGP = ARGP+1 return ARGV[ARGP-1] or "" end N = function (n) return tonumber(S(n)) end ARGP=3 ARGD=2 ARGV=arg if arg[1] == "-e" then assert(loadstring(arg[2]))() end -- fname = "ega1.8" -- rawfont = readfile(fname) -- font = rawfonttofont(rawfont, 256, 8) -- font = pcfonttoisofont(font) -- gridstr = fonttogridstr(font, 0, 255) -- setfont(font) -- print(gridstr) -- (find-vtutil4file "vtfontlib.lua") -- (eev "cd ~/vtutil4/; make; lua50 vtutil.lua")