font scaling

font scaling

[Thomas A.Schmitz]

After doing some work, I think I now have a wonderful working  
collection of classical Greek fonts. There is one thing I'd love to  
implement though, but I wonder if it's possible. i guess I have to  
begin by describing my approach: every Greek font is provided by a .tex  
file which has the following content (in part, this is Giuseppe  
Bilotta's work, he got me started on this):

\definebodyfont[10pt,11pt,12pt,14pt][rm][Gf=Ibycus]

\def\enablegreek{\language[greek]\catcode`~=\other\catcode`|=\other\catc 
ode`'=\other}

\def\startgreek{\par\begingroup\Gf\enablegreek}
\let\stopgreek\endgroup

\def\localgreek{\groupedcommand{\Gf\enablegreek}{}}

Then, the file declares a couple of special symbols like so

\define\koppa{\getglyph{Ibycus}{\char37}}

The Greek font is declared by using

\input Ibycus

in the preamble of the document. I have a collection of 6 fonts; when I  
want to switch between them, I just replace \input Ibycus by \imput  
someotherfile. All of this works wonderfully for the time being. Now  
the problem: most of the time, I want to mix Greek and Latin fonts, and  
in order to do this, some sort of scaling has to be done (because the  
size of different Latin fonts varies so much). Right now, I do this by  
editing the input file like so

\definebodyfont[10pt,11pt,12pt,14pt][rm][Gf=Ibycus sa 1.05]

but I wonder if it would be possible to do this more elegantly: is  
there a way to make this an argument that will be passed on  
automatically? What I'm dreaming of is something like this

\input Ibycus[sa 1.05]

and it would automatically scale at 1.05. Any ideas how this could be  
achieved?

And if anybody is interested: I'd love to share this stuff and find a  
couple of beta testers to see if it works on other computers, too.

Best

Thomas