summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/ofs/ofs-6s.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/ofs/ofs-6s.tex')
-rw-r--r--Master/texmf-dist/tex/generic/ofs/ofs-6s.tex358
1 files changed, 358 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/ofs/ofs-6s.tex b/Master/texmf-dist/tex/generic/ofs/ofs-6s.tex
new file mode 100644
index 00000000000..2f41493fd2a
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/ofs/ofs-6s.tex
@@ -0,0 +1,358 @@
+% Encoding definition of fonts by Storm Type Foundry
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Jun 2001 Petr Olsak
+% Feb 2004
+
+% See stormtex.html and ofsdoc.tex manuals for more details.
+
+\ifx \characterdef \undefined \input ofs \fi
+\protectreading ofs-6s.tex % This is part of OFS package
+
+\ifx \characterdef \undefined \input ofs \fi
+
+\fontmessage {\ofsmessageheader
+ Characters + accents of fonts by Storm Type Foundry defined.}
+
+%% Extra encoding, characters %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+\characterdef \onesuperior 6s 1
+\characterdef \twosuperior 6s 2
+\characterdef \threesuperior 6s 3
+\characterdef \textleq 6s 4
+\characterdef \textneq 6s 5
+\characterdef \textgeq 6s 6
+\characterdef \textpm 6s 7
+\characterdef \onequarter 6s 8
+\characterdef \onehalf 6s 9
+\characterdef \threequarters 6s 10
+\characterdef \fraction 6s 11
+\characterdef \degree 6s 12
+\characterdef \brokenbar 6s 13
+\characterdef \fullbar 6s 124
+\characterdef \textsum 6s 16
+
+\characterdef \textOmega 6s 17
+\characterdef \textminus 6s 0
+\characterdef \textmu 6s 19
+\characterdef \textDelta 6s 20
+\characterdef \textneg 6s 21
+\characterdef \textinfty 6s 22
+\characterdef \textradical 6s 23
+\characterdef \textbackslash 6s 92
+\characterdef \textbraceleft 6s 123
+\characterdef \textbraceright 6s 125
+\characterdef \textless 6s 60
+\characterdef \textgreater 6s 62
+\characterdef \texttimes 6s 14
+\characterdef \textdiv 6s 15
+
+\characterdef \quotedbl 6s 34
+\characterdef \asciicircum 6s 94
+\characterdef \underscore 6s 95
+\characterdef \asciitilde 6s 126
+\characterdef \periodcentered 6s 127
+
+\characterdef \ordfeminine 6s 24
+\characterdef \ordmasculine 6s 25
+
+\characterdef \vargrave 6s 26
+\characterdef \varacute 6s 27
+\characterdef \varcaron 6s 28
+\characterdef \varcircumflex 6s 29
+\characterdef \varbreve 6s 30
+\characterdef \varring 6s 31
+\characterdef \varmacron 6s 35
+\characterdef \vardotaccent 6s 36
+\characterdef \varhungarumlaut 6s 37
+\characterdef \varogonek 6s 38
+\characterdef \varcedilla 6s 39
+\characterdef \vartilde 6s 40
+\characterdef \vardieresis 6s 41
+\characterdef \commaaccent 6s 42
+
+\characterdef \euro 6s 136 \let\Euro=\euro
+
+\characterdef \franc 6s 137
+\characterdef \cent 6s 168
+\characterdef \yen 6s 169
+
+\characterdef \varv 6s 18 % This character has a bad internal
+ % Type1 name: pi, sometimes it looks
+ % as pi, sometimes as varv :-(
+\characterdef \ligct 6s 128
+\characterdef \ligst 6s 129
+\characterdef \ligft 6s 130
+\characterdef \longst 6s 131
+\characterdef \longs 6s 132
+\characterdef \florin 6s 134
+
+\characterdef \dag 6s 160
+\characterdef \ddag 6s 161
+\characterdef \textbullet 6s 162
+\characterdef \paragraph 6s 163
+\characterdef \ellipsis 6s 164
+\characterdef \trademark 6s 165
+\let\copyright=\relax
+\characterdef \copyright * {\ofscopyright}
+\characterdef \copyright 6s 166
+\characterdef \registered 6s 167
+\characterdef \currency 6s 168 % Does not work in Storm fonts
+
+\characterdef \varzero 6s 48
+\characterdef \varone 6s 49
+\characterdef \vartwo 6s 50
+\characterdef \varthree 6s 51
+\characterdef \varfour 6s 52
+\characterdef \varfive 6s 53
+\characterdef \varsix 6s 54
+\characterdef \varseven 6s 55
+\characterdef \vareight 6s 56
+\characterdef \varnine 6s 57
+
+\characterdef \Eth 6s 144
+\characterdef \eth 6s 176
+\characterdef \Thorn 6s 145
+\characterdef \thorn 6s 177
+\characterdef \IJ 6s 156
+\characterdef \ij 6s 188
+\characterdef \O 6s 216
+\characterdef \o 6s 248
+
+%%% Extra encoding, accented letters %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+\accentdef \~ A 6s 195
+\accentdef \= A 6s 196
+\accentdef \r A 6s 197
+\accentdef \~ a 6s 227
+\accentdef \= a 6s 228
+\accentdef \r a 6s 229
+\accentdef \^ C 6s 198
+\accentdef \. C 6s 199
+\accentdef \^ c 6s 230
+\accentdef \. c 6s 231
+\accentdef \= d 6s 135
+\accentdef \` E 6s 200
+\accentdef \u E 6s 201
+\accentdef \^ E 6s 202
+\accentdef \= E 6s 203
+\accentdef \. E 6s 193
+\accentdef \` e 6s 232
+\accentdef \u e 6s 233
+\accentdef \^ e 6s 234
+\accentdef \= e 6s 235
+\accentdef \. e 6s 225
+\accentdef \u G 6s 154
+\accentdef \^ G 6s 218
+\accentdef \. G 6s 219
+\accentdef \c G 6s 220
+\accentdef \u g 6s 186
+\accentdef \^ g 6s 250
+\accentdef \. g 6s 251
+\accentdef \c g 6s 252
+\accentdef \' g 6s 185
+\accentdef \^ H 6s 222
+\accentdef \= H 6s 223
+\accentdef \^ h 6s 254
+\accentdef \= h 6s 255
+\accentdef \. I 6s 157
+\accentdef \` I 6s 204
+\accentdef \~ I 6s 205
+\accentdef \= I 6s 206
+\accentdef \" I 6s 207
+\accentdef \k I 6s 208
+\accentdef \. i 6s `\i
+\accentdef \` i 6s 236
+\accentdef \~ i 6s 237
+\accentdef \= i 6s 238
+\accentdef \" i 6s 239
+\accentdef \k i 6s 240
+\accentdef \^ J 6s 155
+\accentdef \^ j 6s 187
+\accentdef \c K 6s 215
+\accentdef \c k 6s 247
+\accentdef \c L 6s 158
+\accentdef \. L 6s 159
+\accentdef \c l 6s 190
+\accentdef \. l 6s 191
+\accentdef \~ N 6s 209
+\accentdef \c N 6s 214
+\accentdef \m n 6s 184
+\accentdef \~ n 6s 241
+\accentdef \c n 6s 246
+\accentdef \` O 6s 210
+\accentdef \= O 6s 211
+\accentdef \u O 6s 212
+\accentdef \~ O 6s 213
+\accentdef \` o 6s 242
+\accentdef \= o 6s 243
+\accentdef \u o 6s 244
+\accentdef \~ o 6s 245
+\accentdef \c R 6s 147
+\accentdef \c r 6s 179
+\accentdef \m S 6s 221
+\accentdef \^ S 6s 148
+\accentdef \m s 6s 253
+\accentdef \^ s 6s 180
+\accentdef \= T 6s 140
+\accentdef \m T 6s 141
+\accentdef \= t 6s 172
+\accentdef \m t 6s 173
+\accentdef \= U 6s 142
+\accentdef \u U 6s 143
+\accentdef \^ U 6s 149
+\accentdef \k U 6s 150
+\accentdef \~ U 6s 151
+\accentdef \` U 6s 217
+\accentdef \= u 6s 174
+\accentdef \u u 6s 175
+\accentdef \^ u 6s 181
+\accentdef \k u 6s 182
+\accentdef \~ u 6s 183
+\accentdef \` u 6s 249
+\accentdef \^ W 6s 192
+\accentdef \^ w 6s 224
+\accentdef \^ Y 6s 194
+\accentdef \" Y 6s 146
+\accentdef \^ y 6s 226
+\accentdef \" y 6s 178
+
+%%% Extra characters from StormL2Encoding (no present in 8z standard)
+
+\modifydef 8z:storm; {%
+ \characterdef \degree 8z 176
+ \characterdef \euro 8z 134
+ \characterdef \trademark 8z 136
+ \characterdef \copyright 8z 137
+ \characterdef \registered 8z 138
+ \characterdef \flq 8z 142
+ \characterdef \frq 8z 143
+ \characterdef \clq 8z 154
+ \characterdef \crq 8z 155
+ \characterdef \ligct 8z 145
+ \characterdef \ligst 8z 146
+ \characterdef \ligft 8z 147
+ \characterdef \longst 8z 148
+ \characterdef \longs 8z 149
+ \characterdef \varv 8z 144
+ \characterdef \florin 8z 151
+}
+
+%%% Differences between StormT1Encoding and standard T1 encoding %%%%%
+
+\modifydef 8t:storm;{%
+ \characterdel \promile 8t {\%\char 24 }
+ \characterdef \promile 8t 24 % the "perzero" is missing in Storm fonts
+ \characterdel \textpertenthousand 8t {\%\char 24\char 24 }
+ \characterdel \dotlessj 8t 26
+ \characterdef \varv 8t 26 % dotlessj is missing in Storm fonts
+}
+\modifydef 6s:noligs; {%
+ \characterdel \ligct 6s 128
+ \characterdel \ligst 6s 129
+ \characterdel \ligft 6s 130
+}
+
+\modifydef 6s:vardigits;{%
+ \characterdef \vardigits * {\setextrafont}
+}
+
+%%% The \CAP? macros %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% variant accents for capital letters
+
+\def\CAP#1{\csname CAP\string#1\endcsname}
+\def\CAPdef #1 {\expandafter\def\csname CAP\string#1\endcsname}
+
+\def\CAPv {\aboveCAP \varcaron \v}
+\def\CAPu {\aboveCAP \varbreve \u}
+\def\CAPr {\aboveCAP \varring \r}
+\def\CAPH {\aboveCAP \varhungarumlaut \H}
+\CAPdef ` {\aboveCAP \vargrave \`}
+\CAPdef ' {\aboveCAP \varacute \'}
+\CAPdef = {\aboveCAP \varmacron \=}
+\CAPdef ^ {\aboveCAP \varcircumflex \^}
+\CAPdef . {\aboveCAP \vardotaccent \.}
+\CAPdef " {\aboveCAP \vardieresis \"}
+\CAPdef ~ {\aboveCAP \vartilde \~}
+
+\def\aboveCAP #1#2{%
+ \ifx\expandaction\noexpand
+ \noexpand\aboveCAP \noexpand#1\noexpand#2%
+ \else
+ \csname fragilecommand!\endcsname
+ \setbox2=\hbox{X}\dimen4=\ht2
+ \setbox0=\hbox{#1}\dimen0=\ht0 \advance\dimen0 by-.2ex
+ \ifdim\dimen4>\dimen0 \def\tmpa{#2}%
+ \else \def\tmpa{\accentabove {#1}{-\dimen4}}%
+ \fi \expandafter \tmpa
+ \fi
+}
+
+%%% \stmath sets some math characters from extra encoding %%%%%%
+
+% use in this order: \setfonts [Family/] \stmath \setmath[//]
+
+\def\stmath{\ifx\extraenc\stextraenc
+ \def\mathfonts{\defaultmathfonts
+ \csname st\mathversion math\endcsname}%
+ \def\mathchars{\defaultmathchars \stmathchars \let\mathchars=\relax}%
+ \else \displaymessage{\ofsmessageheader WARNING.
+ No extra enc 6s defined. \noexpand\stmath ignored.}%
+ \fi
+}
+\def\stextraenc{6s}
+
+\def\stnormalmath{%
+ \newmathfam \Xrmfam
+ \loadmathfam \Xrmfam [Xtenrm/]%
+}
+\def\stboldmath{%
+ \newmathfam \Xrmfam
+ \loadmathfam \Xrmfam [Xtenbf/]%
+}
+\def\stmathchars{%
+ \mathcode`\- "2\hex\Xrmfam 00
+ \mathcode`\< "3\hex\Xrmfam 3C
+ \mathcode`\> "3\hex\Xrmfam 3E
+ %
+ \edef\lbrace{\delimiter"4\hex\Xrmfam 7B308 }\let\{=\lbrace
+ \edef\vert {\delimiter"2\hex\Xrmfam 7C30C }\let\|=\vert
+ \edef\rbrace{\delimiter"5\hex\Xrmfam 7D309 }\let\}=\rbrace
+ %
+ \mathchardef \leq "3\hex\Xrmfam 04 \let\le=\leq
+ \mathchardef \neq "3\hex\Xrmfam 05 \let\ne=\neq
+ \mathchardef \geq "3\hex\Xrmfam 06 \let\ge=\geq
+ \mathchardef \neg "3\hex\Xrmfam 15 \let\lnot=\neg
+ \mathchardef \pm "2\hex\Xrmfam 07
+ \mathchardef \times "2\hex\Xrmfam 0E
+ \mathchardef \div "2\hex\Xrmfam 0F
+ \mathchardef \infty "2\hex\Xrmfam 16
+ %
+ \safemathchardef \onesuperior "\hex\Xrmfam 01
+ \safemathchardef \twosuperior "\hex\Xrmfam 02
+ \safemathchardef \threesuperior "\hex\Xrmfam 03
+ \safemathchardef \onequarter "\hex\Xrmfam 08
+ \safemathchardef \onehalf "\hex\Xrmfam 09
+ \safemathchardef \threequarters "\hex\Xrmfam 0A
+ \safemathchardef \fraction "\hex\Xrmfam 0B
+ \mathchardef \dagger "2\hex\Xrmfam A0
+ \mathchardef \ddagger "2\hex\Xrmfam A1
+ \safemathchardef \dag "\hex\Xrmfam A0
+ \safemathchardef \ddag "\hex\Xrmfam A1
+ \let\bullet=\textbullet
+ \safemathchardef \bullet "2\hex\Xrmfam A2
+}
+
+%%% eof
+
+\endinput %%% the following macros will be included in LANG style files
+
+%%% Macros for quotes %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+\def\singleuv#1{\clq#1\crq}
+\def\doubleuv#1{\clqq#1\crqq}
+\def\singlefuv#1{\frq#1\flq}
+\def\doublefuv#1{\frqq#1\flqq}
+\let\uv=\doubleuv
+\let\fuv=\doublefuv
+