diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-09 23:38:21 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-09 23:38:21 +0000 |
commit | 215012a8d684889983ec2c0629e1c704e6853d9c (patch) | |
tree | ebf1271bd71869069824935ae8a5678745bf8bce /Master/texmf-dist/fonts/source/public/bayer/universal-digits.mf | |
parent | 1af3d19d6dbcbf309667d9cb4aa3cdda914914a9 (diff) |
trunk/Master/texmf-dist/fonts/source
git-svn-id: svn://tug.org/texlive/trunk@101 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/bayer/universal-digits.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/bayer/universal-digits.mf | 162 |
1 files changed, 162 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/bayer/universal-digits.mf b/Master/texmf-dist/fonts/source/public/bayer/universal-digits.mf new file mode 100644 index 00000000000..43f7ad6f72a --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/bayer/universal-digits.mf @@ -0,0 +1,162 @@ +%% +%% This is file `digits.mf', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% universal.dtx (with options: `digits') +%% +%% Copyright (C) 1997 Christian Holm. +%% +%% This file is NOT the source for universal, because almost all +%% comments have been stripped from it. It is NOT the preferred +%% form of universal for making modifications to it. +%% +%% Therefore you can NOT redistribute and/or modify THIS file. +%% You can however redistribute the complete source (universal.dtx +%% and universal.ins) and/or modify it under the terms of the GNU +%% General Public License as published by the Free Software +%% Foundation; either version 2, or (at your option) any later +%% version. +%% +%% The universal font and package is distributed in the hope that +%% it will be useful, but WITHOUT ANY WARRANTY; without even the +%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR +%% PURPOSE. See the GNU General Public License for more details. +%% +%% You should have received a copy of the GNU General Public +%% License along with this program; if not, write to the +%% Free Software Foundation, Inc., +%% 675 Mass Ave, Cambridge, +%% MA 02139, USA. +%% +%% See the file universal.dtx for further comments and documentation. +%% +bauhausnumb("0",A_width#,l_height#,0,0); + lft z1 = (0,h-.5wi); + top z2 = (.5wi,h); + rt z3 = (wi,y1); + rt z4 = (wi,.5wi); + bot z5 = (.5wi,0); + lft z6 = (0,y4); + draw z1{up}..z2{right}..z3{down}---z4{down}..z5{left}..z6{up}---cycle; + penlabels(1,2,3,4,5,6); +endchar; + +bauhausnumb("1",3/8(A_width#-f_space#)+f_space#,l_height#,0,0); + top z1 = (0,h); + top z2 = (2/3wi,h); + rt z3 = (wi,h-x2); + rt z4 = (wi,0); + cutdraw z1{right}---z2{right}..z3{down}---z4{down}; + penlabels(1,2,3,4); +endchar; + +bauhausnumb("2",A_width#,l_height#,0,0); + lft z1 = (0,h-.5wi); + top z2 = (.5wi,h); + rt z3 = (wi,y1); + lft bot z4 = (0,0); + bot z5 = (wi,0); + cutdraw z1{up}..z2{right}..z3{down}---z4{(-1,1)}---z5{right}; + penlabels(1,2,3,4,5); +endchar; + +bauhausnumb("3",A_width#,l_height#,0,0); + rad = .25h; + lft z1 = (0,h-rad); + top z2 = (rad,h); + top z3 = (wi-rad,h); + rt z4 = (wi,h-rad); + rt z5 = (wi-rad,.5h); + rt z6 = (wi,rad); + bot z7 = (wi-rad,0); + bot z8 = (rad,0); + lft z9 = (0,rad); + cutdraw z1{up}..z2{right}---z3{right}..z4{down}..z5{left}; + cutdraw z5{right}..z6{down}..z7{left}---z8{left}..z9{up}; + penlabels(1,2,3,4,5,6,7,8,9); +endchar; + +bauhausnumb("4",A_width#,l_height#,0,0); + z1 = (.8wi,h); + lft z2 = (0,h-x1); + z3 = (wi,y2); + z4 = (x1,0); + z5 = (x1,h-.5x1); + draw z1{(-1,-1)}---z2{(1,-1)}---z3{right}; + cutoff(z1,90); + cutoff(z3,0); + cutdraw z4{up}--z5; + penlabels(1,2,3,4,5); +endchar; + +bauhausnumb("5",A_width#,l_height#,0,0); + tmp=wi/(1+sind(60)); + lft z1 = (0,tmp*(1-sind(30))); + bot z2 = (wi-tmp,0); + rt top z3 = (wi,tmp); + top z4 = (x2,2y3); + top lft z5 = (0,2y3); + top lft z6 = (0,h); + top z7 = (wi,h); + cutdraw z1{dir(-60)}..z2{right}..z3{up}..z4{left}--- + z5{(-1,1)}---z6{(1,1)}---z7{right}; + penlabels(1,2,3,4,5,6,7); +endchar; + +bauhausnumb("6",A_width#,l_height#,0,0); + lft z1 = (0,.5wi); + top z2 = (.5wi,wi); + rt z3 = (wi,y1); + bot z4 = (x2,0); + lft z5 = (0,h-.5wi); + top z6 = (x2,h); + z7 = z6 rotatedaround((.5wi,h-.5wi),-60); + draw z1{up}..z2{right}..z3{down}..z4{left}..z1{up}--- + z5{up}..z6{right}..z7{dir(-60)}; + cutoff(z7,-60); + penlabels(1,2,3,4,5,6,7); +endchar; + +bauhausnumb("7",A_width#,l_height#,0,0) ; + top z1 = (0,h); + rt top z2 = (wi,h); + lft z3 = (0,0); + draw z1{right}---z2{(1,-1)}---z3{z3-z1} ; + cutoff(z1,180); + cutoff(z3,angle(z3-z1)); + penlabels(1,2,3); +endchar ; + +bauhausnumb("8",.5l_height#+p_thick#+f_space#,l_height#,0,0); + top z1 = (.5wi,h); + z3 = (x1,.5h); + bot z6 = (x1,0); + rt z2 = bot z3 rotatedaround(.5[z3,z1],90); + lft z4 = bot z3 rotatedaround(.5[z3,z1],-90); + rt z5 = top z3 rotatedaround(.5[z6,z3],-90); + lft z7 = top z3 rotatedaround(.5[z6,z3],90); + draw z1{right}..z2{down}..z3{left}..z4{up}..cycle; + draw z3{right}..z5{down}..z6{left}..z7{up}..cycle; + penlabels(1,2,3,4,5,6,7); +endchar; + +bauhausnumb("9",A_width#,l_height#,0,0); + rt z1 = (wi,h-.5wi); + bot z2 = (.5wi,h-wi); + lft z3 = (0,y1); + top z4 = (x2,h); + rt z5 = (wi,.5wi); + bot z6 = (x2,0); + z7 = z6 rotatedaround((.5wi,.5wi),-60); + draw z1{down}..z2{left}..z3{up}..z4{right}.. + z1{down}---z5{down}..z6{left}..z7{dir(120)}; + cutoff(z7,120); + penlabels(1,2,3,4,5,6,7); +endchar; + + +\endinput +%% +%% End of file `digits.mf'. |