答案1
以下应该会产生您想要的结果。您可以使用可选参数来指定除T
(例如t
)之外的其他字母:
\documentclass[]{article}
\newsavebox\myboxA
\newsavebox\myboxB
\newcommand\saint[1][T]
{%
\begingroup
\sbox\myboxA{S}%
\usebox\myboxA
\sbox\myboxB{\tiny#1}%
\rlap{\raisebox{\dimexpr\ht\myboxA-\ht\myboxB}{\usebox\myboxB}}%
\makebox[\wd\myboxB]{.}%
\endgroup
}
\begin{document}
\saint\ Germain
\saint[t] Germain
\end{document}
答案2
只是为了好玩:
\documentclass{article}
\usepackage{xparse}
\usepackage{fontspec}
\setmainfont{Libre Bodoni}
\NewDocumentCommand{\frabbr}{sm}{%
\IfBooleanTF{#1}{\dofrabbr{}{#2}}{\dofrabbr{\hfil}{#2}}%
}
\newcommand{\dofrabbr}[2]{%
\vbox to\fontcharht\font`T {%
\ialign{%
#1##\hfil\cr
\relscriptsize#2\cr
\noalign{\nointerlineskip\vfill}
.\cr
}%
}%
}
\makeatletter
\newcommand{\relscriptsize}{%
\check@mathfonts\fontsize\ssf@size\z@\selectfont
}
\makeatother
\begin{document}
\bfseries
\begin{tabular}{@{}c@{}}
6\frabbr*{me} Arr\frabbr{T} \\
BOULEVARD \\
S\frabbr{T} GERMAIN
\end{tabular}
\end{document}