summaryrefslogtreecommitdiff
path: root/fonts/astro/astrosym.mf
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/astro/astrosym.mf
Initial commit
Diffstat (limited to 'fonts/astro/astrosym.mf')
-rw-r--r--fonts/astro/astrosym.mf99
1 files changed, 99 insertions, 0 deletions
diff --git a/fonts/astro/astrosym.mf b/fonts/astro/astrosym.mf
new file mode 100644
index 0000000000..1997538900
--- /dev/null
+++ b/fonts/astro/astrosym.mf
@@ -0,0 +1,99 @@
+% ASTROSYM.MF : AstroSym (Version 2.20, Aug. 10, 2002) - file 2 of 8
+% Peter Schmitt eMail: Peter.Schmitt@univie.ac.at
+% Institute of Mathematics, University of Vienna Vienna, Austria
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+mode_setup;
+font_size = .4cm#; % scaling factor U = diameter of sun symbol
+font_identifier = "AstroSym";
+font_coding_scheme = "special purpose: astronomical symbols";
+% tracingtitles:=1;
+
+%%%%%%%%%%%
+% font size ( U = diameter of sun symbol )
+%%%%%%%%%%%
+
+U# := .4cm#;
+u# := (1/64)*U#;
+
+define_pixels(U,u);
+
+input astrosym.mac; % macro file
+
+%%%%%%%%%%%%%%%%%%%%%%%%%
+% version 1: calligraphic
+%%%%%%%%%%%%%%%%%%%%%%%%%
+
+O := 0; % offset value for character position
+
+ P# := 4u#; % width of thick strokes
+ p# := .5u#; % width of thin strokes
+
+define_pixels(P,p);
+corrections;
+
+input astrosym.cmn; % symbols with common code definition
+input astrosym.cal; % symbols with special code
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% version 2: uniform: thick
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+O:=100; % offset value for character position
+
+P# := 4u#; % widths of thick and thin strokes set equal
+p# := 4u#;
+
+define_pixels (P,p);
+corrections;
+let arrow = Arrow; % different arrow shape
+let Pen = PEN; % all pens are equal
+let SPEN = PEN;
+let DPEN = PEN; % added aug02
+let RPEN = PEN;
+% let RLine = Line; % more efficient
+
+input astrosym.cmn; % symbols with common code definition
+input astrosym.uni; % symbols with special code
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%
+% version 2: uniform: thin
+%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+O:=200; % offset value value for character position
+ % reset ( in .uni ) to 122
+ % for character numbers > 55
+
+P# := 2u#; % widths of thick and thin strokes set equal
+p# := 2u#;
+define_pixels (P,p);
+corrections;
+ % repeated for the sake of completeness
+let arrow = Arrow; % different arrow shape
+let Pen = PEN; % all pens are equal
+let SPEN = PEN;
+let DPEN = PEN; % added aug02
+let RPEN = PEN;
+
+input astrosym.cmn; % symbols with common code definition
+input astrosym.uni; % symbols with special code
+
+%%%%%%%%%%%%%%%%%
+% extra symbols %
+%%%%%%%%%%%%%%%%%
+
+O := 90; % offset value for character position
+
+P# := 2u#; % width of thick strokes
+p# := 1u#; % width of thin strokes
+
+define_pixels(P,p);
+corrections;
+
+input astrosym.xtr; % symbols with only one version
+
+%%%%%%%%
+bye
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%% end of ASTROSYM.MF %%%