+\documentclass{ltjarticle}
+\usepackage[margin=15mm,centering]{geometry}
+\usepackage{lltjext,cancel,luacode}
+%\usepackage{lua-visual-debug}
+\begin{luacode}
+local provides_feature = luaotfload.aux.provides_feature
+local function myfeat_sub(fn,t,a)
+ if provides_feature(
+ fn, t.properties.script, t.properties.language, a
+ ) then
+ tex.sprint('~\\fbox{\\footnotesize\\ttfamily ' .. a .. '}')
+ else
+ tex.sprint('~\\ensuremath{\\xcancel{\\fbox{\\footnotesize\\ttfamily '
+ .. a .. '}}}')
+ end
+end
+function myfeat()
+ local fn = tex.getattribute('ltj@curtfnt')
+ local t = fonts.hashes.identifiers[fn]
+ tex.sprint('~script(lang): \\texttt{' ..
+ t.properties.script .. '}(\\texttt{' .. t.properties.language .. '})')
+ myfeat_sub(fn,t,'vert')
+ myfeat_sub(fn,t,'vrt2')
+end
+\end{luacode}