\newpage\setcounter{page}{1} \parindent=0pt \parskip=0pt \font\G=umrandb at 20pt \font\F=umranda at 20pt \fussy \Thema{Neue Umrandungen} \Nr{10} \def\C{\char'} Angeregt vom letzten Stammtisch habe ich einen weiteren Font mit Rahmen erstellt. Da das {\tt .mf}--File f"ur eine Vorstellung zu lang ist, gebe ich hier nur die m"oglichen Rahmen zum Besten. Zun"achst wird definiert: \begin{verbatim} \def\C{\char'} % Oktaldarstellung \font\G = umrandb at 20pt \end{verbatim} Und nun kommen die Rahmen, zun"achst jene mit 6 Linien:\vskip 2mm \begin{bsp} \RandBox {A} font {\G} [0pt] (\C5) ([\C1]) (\C4) ([\C2]) ([\C0]) (\C6) ([\C3]) (\C7) \end{bsp} \make \begin{bsp} \RandBox {B} font {\G} [0pt] (\C11) ([\C1]) (\C10) ([\C2]) ([\C0]) (\C12) ([\C3]) (\C13) \end{bsp} \make \begin{bsp} \RandBox {C} font {\G} [0pt] (\C15) ([\C1]) (\C14) ([\C2]) ([\C0]) (\C16) ([\C3]) (\C17) \end{bsp} \make \begin{bsp} \RandBox {D} font {\G} [0pt] (\C21) ([\C1]) (\C20) ([\C2]) ([\C0]) (\C22) ([\C3]) (\C23) \end{bsp} \make \begin{bsp} \RandBox {E} font {\G} [0pt] (\C25) ([\C1]) (\C24) ([\C2]) ([\C0]) (\C26) ([\C3]) (\C27) \end{bsp} \make \begin{bsp} \RandBox {F} font {\G} [0pt] (\C31) ([\C1]) (\C30) ([\C2]) ([\C0]) (\C32) ([\C3]) (\C33) \end{bsp} \make \begin{bsp} \RandBox {G} font {\G} [0pt] (\C35) ([\C1]) (\C34) ([\C2]) ([\C0]) (\C36) ([\C3]) (\C37) \end{bsp} \make \begin{bsp} \RandBox {H} font {\G} [0pt] (\C41) ([\C1]) (\C40) ([\C2]) ([\C0]) (\C42) ([\C3]) (\C43) \end{bsp} \make \begin{bsp} \RandBox {I} font {\G} [0pt] (\C45) ([\C1]) (\C44) ([\C2]) ([\C0]) (\C46) ([\C3]) (\C47) \end{bsp} \make \begin{bsp} \RandBox {J} font {\G} [0pt] (\C51) ([\C1]) (\C50) ([\C2]) ([\C0]) (\C52) ([\C3]) (\C53) \end{bsp} \make \begin{bsp} \RandBox {K} font {\G} [0pt] (\C55) ([\C1]) (\C54) ([\C2]) ([\C0]) (\C56) ([\C3]) (\C57) \end{bsp} \make \begin{bsp} \RandBox {L} font {\G} [0pt] (\C61) ([\C1]) (\C60) ([\C2]) ([\C0]) (\C62) ([\C3]) (\C63) \end{bsp} \make \begin{bsp} \RandBox {M} font {\G} [0pt] (\C65) ([\C1]) (\C64) ([\C2]) ([\C0]) (\C66) ([\C3]) (\C67) \end{bsp} \make \begin{bsp} \RandBox {N} font {\G} [0pt] (\C71) ([\C1]) (\C70) ([\C2]) ([\C0]) (\C72) ([\C3]) (\C73) \end{bsp} \make \begin{bsp} \RandBox {O} font {\G} [0pt] (\C75) ([\C1]) (\C74) ([\C2]) ([\C0]) (\C76) ([\C3]) (\C77) \end{bsp} \make \vskip2mm Nat"urlich k"onnen die Ecken auch gemischt werden, es ergeben sich so $15^4=50625$ m"ogliche Rahmen; inwieweit diese auch gut aussehen, bleibt jedem selbst "uberlassen. Einen der $50610$ noch nicht abgedruckten Rahmen gibt's hier noch als Draufgabe: \begin{bsp} \RandBox {P} font {\G} [0pt] (\C25) ([\C1]) (\C30) ([\C2]) ([\C0]) (\C32) ([\C3]) (\C27) \end{bsp} \make \newpage Ein paar Rahmen mit vier Linien. \begin{bsp} \RandBox {a} font {\G} [0pt] (\C105) ([\C101]) (\C104) ([\C102]) ([\C100]) (\C106) ([\C103]) (\C107) \end{bsp} \make \begin{bsp} \RandBox {b} font {\G} [0pt] (\C111) ([\C101]) (\C110) ([\C102]) ([\C100]) (\C112) ([\C103]) (\C113) \end{bsp} \make \begin{bsp} \RandBox {c} font {\G} [0pt] (\C115) ([\C101]) (\C114) ([\C102]) ([\C100]) (\C116) ([\C103]) (\C117) \end{bsp} \make \begin{bsp} \RandBox {d} font {\G} [0pt] (\C121) ([\C101]) (\C120) ([\C102]) ([\C100]) (\C122) ([\C103]) (\C123) \end{bsp} \make \begin{bsp} \RandBox {e} font {\G} [0pt] (\C125) ([\C101]) (\C124) ([\C102]) ([\C100]) (\C126) ([\C103]) (\C127) \end{bsp} \make \begin{bsp} \RandBox {f} font {\G} [0pt] (\C131) ([\C101]) (\C130) ([\C102]) ([\C100]) (\C132) ([\C103]) (\C133) \end{bsp} \make \begin{bsp} \RandBox {g} font {\G} [0pt] (\C135) ([\C101]) (\C134) ([\C102]) ([\C100]) (\C136) ([\C103]) (\C137) \end{bsp} \make \begin{bsp} \RandBox {h} font {\G} [0pt] (\C141) ([\C101]) (\C140) ([\C102]) ([\C100]) (\C142) ([\C103]) (\C143) \end{bsp} \make \begin{bsp} \RandBox {i} font {\G} [0pt] (\C145) ([\C101]) (\C144) ([\C102]) ([\C100]) (\C146) ([\C103]) (\C147) \end{bsp} \make \vskip2mm Auch hier gibt es wieder eine ganze Reihe von m"oglichen Kombinationen, und zwar genau $6561$. \newpage Nun noch ein paar Rahmen mit 5 Linien:\\[1mm] { \def\make{\input{b} \vskip 2mm \hrule \verbatiminput{b} \vskip 2mm\hrule\hrule\vskip 1mm} \begin{bsp} \RandBox {\hspace*{1cm}1\hspace*{1cm}} font {\G} [0pt] (\C161) ([\C151\\\C155]\C151) (\C160) ([\C152\\\C156]\C152) ([\C150\\\C154]\C150) (\C162) ([\C153\\\C157]\C153) (\C163) \end{bsp} \make \begin{bsp} \RandBox {\hspace*{1cm}1\hspace*{1cm}} font {\G} [0pt] (\C165) ([\C151\\\C155]\C151) (\C164) ([\C152\\\C156]\C152) ([\C150\\\C154]\C150) (\C166) ([\C153\\\C157]\C153) (\C167) \end{bsp} \make \begin{bsp} \RandBox {\hspace*{1cm}1\hspace*{1cm}} font {\G} [0pt] (\C171) ([\C151\\\C155]\C151) (\C170) ([\C152\\\C156]\C152) ([\C150\\\C154]\C150) (\C172) ([\C153\\\C157]\C153) (\C173) \end{bsp} \make } Nun gibt es noch einen Rahmen, der selbst den alten Pharaonen gefallen w"urde. Um die 128-Zeichen-Grenze nicht zu "uberschreiten stehen die hierzu geh"orenden Zeichen im Font {\tt umranda.mf}. \begin{bsp} \RandBox {4} font {\F} [0pt] (\C136) ([\C137]) (\C140) ([\C145]) ([\C141]) (\C144) ([\C143]) (\C142) \end{bsp} \make \vskip2mm Sollten die Rahmen beim Ausdrucken nicht exakt aneinanderpassen, so kann dies daran liegen, da"s beim Druckertreiber eine gewisse Positionsabweichung der Zeichen erlaubt ist (die sogenannte {\tt maxdrift}), da bei "ublichen {\tt .dvi}--Files eine gewisse Abweichung nicht auff"allt. Bei diesen Fonts darf jedoch keine Verschiebung auftreten, also mu"s der {\tt maxdrift}--Wert auf 0 gesetzt werden. F"ur die em\TeX--Druckertreiber z.B.\ geht dies mit der Option {\tt /fd0}. \endinput