2024-02-13 15:22:59 +01:00

362 lines
12 KiB
TeX

%%
%% This is the file fzframes.sty
%% Author: Kathryn Andersen <http://www.katspace.com>
%%
%% This provides a collection of nice frames based on the niceframes
%% package
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{refract}[2001/06/22
fancy frames for fanzine package
: Kathryn Andersen]
\RequirePackage{niceframe}
\RequirePackage{graphics}
%% Frame with scrolly things
\newcommand{\fzframescroll}[1]{%
\font\border=umranda
\generalframe{\border\char'136}{\border\char'137}{\border\char'140}
{\border\char'145} {\border\char'141}
{\border\char'144}{\border\char'143}{\border\char'142}
{#1}}
%% Frame with flowers
\newcommand{\fzframeflower}[1]{%
\font\border=umranda
\generalframe{\border\char78}{\border\char79}{\border\char84}
{\border\char81} {\border\char85}
{\border\char80}{\border\char83}{\border\char82}
{#1}}
%% Frame with snakes
\newcommand{\fzframesnake}[1]{%
\font\border=umranda
\generalframe{\border\char87}{\border\char87}{\border\char87}
{\border\char89} {\border\char93}
{\border\char91}{\border\char91}{\border\char91}
{#1}}
%% Frame with triangles
\newcommand{\fzframetri}[1]{%
\font\border=umranda
\generalframe{\border\char7}{\border\char6}{\border\char5}
{\reflectbox{\border\char4}} {\border\char4}
{\border\char1}{\border\char2}{\border\char3}
{#1}}
%% Frame with triangles pointing out
\newcommand{\fzframetriout}[1]{%
\font\border=umranda
\generalframe{\border\char3}{\border\char2}{\border\char1}
{\border\char4} {\reflectbox{\border\char4}}
{\border\char5}{\border\char6}{\border\char7}
{#1}}
%% Here follows a collection of frames made of decorative boxes
%% so they are called fzframebx with a letter to differentiate
%% them, A-Z
\newcommand{\fzframebxA}[1]{%
\font\border=umranda
\generalframe{\border\char39}{\border\char37}{\border\char37}
{\border\char39} {\border\char43}
{\border\char41}{\border\char41}{\border\char43}
{#1}}
%
\newcommand{\fzframebxB}[1]{%
\font\border=umranda
\generalframe{\border\char41}{\border\char41}{\border\char39}
{\border\char43} {\border\char39}
{\border\char43}{\border\char37}{\border\char37}
{#1}}
\newcommand{\fzframebxC}[1]{%
\font\border=umranda
\generalframe{\border\char38}{\border\char38}{\border\char36}
{\border\char38} {\border\char36}
{\border\char40}{\border\char40}{\border\char42}
{#1}
}
\newcommand{\fzframebxD}[1]{%
\font\border=umranda
\generalframe{\border\char42}{\border\char40}{\border\char40}
{\border\char36} {\border\char38}
{\border\char36}{\border\char38}{\border\char38}
{#1}
}
\newcommand{\fzframebxE}[1]{%
\font\border=umranda
\generalframe{\border\char44}{\border\char44}{\border\char50}
{\border\char46} {\border\char50}
{\border\char46}{\border\char48}{\border\char48}
{#1}}
\newcommand{\fzframebxF}[1]{%
\font\border=umranda
\generalframe{\border\char51}{\border\char51}{\border\char49}
{\border\char45} {\border\char49}
{\border\char45}{\border\char47}{\border\char47}
{#1}}
%% Here follows a collection of frames made of circles
%% so they are called fzframecir with a letter to differentiate
%% them, A-Z
\newcommand{\fzframecirA}[1]{%
\font\border=umranda
\generalframe{\border\char34}{\border\char34}{\border\char34}
{\border\char34} {\border\char34}
{\border\char34}{\border\char34}{\border\char34}
{#1}}
\newcommand{\fzframecirB}[1]{%
\font\border=umranda
\generalframe{\border\char35}{\border\char35}{\border\char35}
{\border\char35} {\border\char35}
{\border\char35}{\border\char35}{\border\char35}
{#1}}
\newcommand{\fzframecirC}[1]{%
\font\border=umranda
\generalframe{\border\char20}{\border\char25}{\border\char24}
{\border\char22} {\border\char22}
{\border\char24}{\border\char25}{\border\char20}
{#1}}
\newcommand{\fzframecirD}[1]{%
\font\border=umranda
\generalframe{\border\char26}{\border\char30}{\border\char29}
{\border\char27} {\border\char27}
{\border\char29}{\border\char30}{\border\char26}
{#1}}
%% Here follows a collection of frames with lots of lines
%% so they are called fzframelin with a letter to differentiate
%% them, A-Z
%% This bunch, the border has 6 lines, same thickness
\newcommand{\fzframelinA}[1]{%
\font\border=umrandb
\generalframe{\border\char5}{\border\char1}{\border\char4}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char6}{\border\char3}{\border\char7}
{#1}}
\newcommand{\fzframelinB}[1]{%
\font\border=umrandb
\generalframe{\border\char9}{\border\char1}{\border\char8}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char10}{\border\char3}{\border\char11}
{#1}}
\newcommand{\fzframelinC}[1]{%
\font\border=umrandb
\generalframe{\border\char13}{\border\char1}{\border\char12}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char14}{\border\char3}{\border\char15}
{#1}}
\newcommand{\fzframelinD}[1]{%
\font\border=umrandb
\generalframe{\border\char17}{\border\char1}{\border\char16}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char18}{\border\char3}{\border\char19}
{#1}}
\newcommand{\fzframelinE}[1]{%
\font\border=umrandb
\generalframe{\border\char21}{\border\char1}{\border\char20}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char22}{\border\char3}{\border\char23}
{#1}}
\newcommand{\fzframelinF}[1]{%
\font\border=umrandb
\generalframe{\border\char25}{\border\char1}{\border\char24}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char26}{\border\char3}{\border\char27}
{#1}}
\newcommand{\fzframelinG}[1]{%
\font\border=umrandb
\generalframe{\border\char29}{\border\char1}{\border\char28}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char30}{\border\char3}{\border\char31}
{#1}}
\newcommand{\fzframelinH}[1]{%
\font\border=umrandb
\generalframe{\border\char33}{\border\char1}{\border\char32}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char34}{\border\char3}{\border\char35}
{#1}}
\newcommand{\fzframelinI}[1]{%
\font\border=umrandb
\generalframe{\border\char37}{\border\char1}{\border\char36}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char38}{\border\char3}{\border\char39}
{#1}}
\newcommand{\fzframelinJ}[1]{%
\font\border=umrandb
\generalframe{\border\char41}{\border\char1}{\border\char40}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char42}{\border\char3}{\border\char43}
{#1}}
\newcommand{\fzframelinK}[1]{%
\font\border=umrandb
\generalframe{\border\char45}{\border\char1}{\border\char44}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char46}{\border\char3}{\border\char47}
{#1}}
\newcommand{\fzframelinL}[1]{%
\font\border=umrandb
\generalframe{\border\char49}{\border\char1}{\border\char48}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char50}{\border\char3}{\border\char51}
{#1}}
\newcommand{\fzframelinM}[1]{%
\font\border=umrandb
\generalframe{\border\char53}{\border\char1}{\border\char52}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char54}{\border\char3}{\border\char55}
{#1}}
\newcommand{\fzframelinN}[1]{%
\font\border=umrandb
\generalframe{\border\char57}{\border\char1}{\border\char56}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char58}{\border\char3}{\border\char59}
{#1}}
\newcommand{\fzframelinO}[1]{%
\font\border=umrandb
\generalframe{\border\char61}{\border\char1}{\border\char60}
{\border\char2} {\reflectbox{\border\char2}}
{\border\char62}{\border\char3}{\border\char63}
{#1}}
%% Border has 4 lines, same thickness
\newcommand{\fzframelinP}[1]{%
\font\border=umrandb
\generalframe{\border\char69}{\border\char65}{\border\char68}
{\border\char64} {\border\char66}
{\border\char70}{\border\char67}{\border\char71}
{#1}}
\newcommand{\fzframelinQ}[1]{%
\font\border=umrandb
\generalframe{\border\char73}{\border\char65}{\border\char72}
{\border\char64} {\border\char66}
{\border\char74}{\border\char67}{\border\char75}
{#1}}
\newcommand{\fzframelinR}[1]{%
\font\border=umrandb
\generalframe{\border\char77}{\border\char65}{\border\char76}
{\border\char64} {\border\char66}
{\border\char78}{\border\char67}{\border\char79}
{#1}}
\newcommand{\fzframelinS}[1]{%
\font\border=umrandb
\generalframe{\border\char81}{\border\char65}{\border\char80}
{\border\char64} {\border\char66}
{\border\char82}{\border\char67}{\border\char83}
{#1}}
\newcommand{\fzframelinT}[1]{%
\font\border=umrandb
\generalframe{\border\char85}{\border\char65}{\border\char84}
{\border\char64} {\border\char66}
{\border\char86}{\border\char67}{\border\char87}
{#1}}
\newcommand{\fzframelinU}[1]{%
\font\border=umrandb
\generalframe{\border\char89}{\border\char65}{\border\char88}
{\border\char64} {\border\char66}
{\border\char90}{\border\char67}{\border\char91}
{#1}}
\newcommand{\fzframelinV}[1]{%
\font\border=umrandb
\generalframe{\border\char93}{\border\char65}{\border\char92}
{\border\char64} {\border\char66}
{\border\char94}{\border\char67}{\border\char95}
{#1}}
\newcommand{\fzframelinW}[1]{%
\font\border=umrandb
\generalframe{\border\char97}{\border\char65}{\border\char96}
{\border\char64} {\border\char66}
{\border\char98}{\border\char67}{\border\char99}
{#1}}
\newcommand{\fzframelinX}[1]{%
\font\border=umrandb
\generalframe{\border\char101}{\border\char65}{\border\char100}
{\border\char64} {\border\char66}
{\border\char102}{\border\char67}{\border\char103}
{#1}}
%% Border has 5 lines, the middle one thicker
\newcommand{\fzframelinY}[1]{%
\font\border=umrandb
\generalframe{\border\char113}{\border\char105}{\border\char112}
{\border\char106} {\border\char104}
{\border\char114}{\border\char107}{\border\char115}
{#1}}
\newcommand{\fzframelinZ}[1]{%
\font\border=umrandb
\generalframe{\border\char113}{\border\char109}{\border\char112}
{\border\char110} {\border\char108}
{\border\char114}{\border\char111}{\border\char115}
{#1}}
\newcommand{\fzframelinAA}[1]{%
\font\border=umrandb
\generalframe{\border\char117}{\border\char105}{\border\char116}
{\border\char106} {\border\char104}
{\border\char118}{\border\char107}{\border\char119}
{#1}}
\newcommand{\fzframelinAB}[1]{%
\font\border=umrandb
\generalframe{\border\char117}{\border\char109}{\border\char116}
{\border\char110} {\border\char108}
{\border\char118}{\border\char111}{\border\char119}
{#1}}
\newcommand{\fzframelinAC}[1]{%
\font\border=umrandb
\generalframe{\border\char121}{\border\char105}{\border\char120}
{\border\char106} {\border\char104}
{\border\char122}{\border\char107}{\border\char123}
{#1}}
\newcommand{\fzframelinAD}[1]{%
\font\border=umrandb
\generalframe{\border\char121}{\border\char109}{\border\char120}
{\border\char110} {\border\char108}
{\border\char122}{\border\char111}{\border\char123}
{#1}}
%%
%% Sample of dingbats in a font
\RequirePackage{ifthen}
\newcounter{clet}
\newcounter{numchars}
\newcommand{\dingsample}{%
\setcounter{clet}{1}
\setcounter{numchars}{256}
\whiledo{\value{clet}<256}{%
\mbox{
\texttt{ \theclet\ = }\char\value{clet}
}
\addtocounter{clet}{1}
}
}
\endinput