summaryrefslogtreecommitdiff
path: root/macros/xetex/plain/do-it-yourself-tex/RIGHT-to-LEFT-TEXTS/format_XETEX.mac
diff options
context:
space:
mode:
Diffstat (limited to 'macros/xetex/plain/do-it-yourself-tex/RIGHT-to-LEFT-TEXTS/format_XETEX.mac')
-rw-r--r--macros/xetex/plain/do-it-yourself-tex/RIGHT-to-LEFT-TEXTS/format_XETEX.mac227
1 files changed, 227 insertions, 0 deletions
diff --git a/macros/xetex/plain/do-it-yourself-tex/RIGHT-to-LEFT-TEXTS/format_XETEX.mac b/macros/xetex/plain/do-it-yourself-tex/RIGHT-to-LEFT-TEXTS/format_XETEX.mac
new file mode 100644
index 0000000000..bda1b30645
--- /dev/null
+++ b/macros/xetex/plain/do-it-yourself-tex/RIGHT-to-LEFT-TEXTS/format_XETEX.mac
@@ -0,0 +1,227 @@
+% [format_XETEX.mac]
+
+% Note, for example, that using \def\lb{\char"007B} for left braces (instead of $\($ )
+% produces a size which corresponds to the font being used.
+% The same philosopy is applied elsewhere in this list
+
+
+%%%%%%%%%%%% FIXED VERTICAL DISTANCES (increasing order)
+% I do not bother with the glue as I change distances via \vskip if not correct
+
+\def\pni{\par\noindent}
+\def\pin{\par\indent}
+
+% \smallskip = 3pt; I want a little more
+\def\sni{\vskip 4truept\noindent}
+\def\sin{\vskip 4truept\indent}
+
+% \medskip = 6pt; I want a little more
+\def\mni{\vskip 8 truept\noindent}
+\def\min{\vskip 8 truept\indent}
+
+% \bigskip is 12pt
+\def\bni{\vskip 12truept\noindent}
+\def\bin{\vskip 12truept\indent}
+
+\def\nin{\noindent}
+
+\def\centreline{\centerline} % Canadian spelling which I naturally tend to write
+
+%%%%%%%%%%%% FIXED HORIZONTAL DISTANCES (increasing order)
+%
+\def\gl{\hglue 1.0pt} % gl = GLUE , does not break
+\def\th{\hskip 1.5pt} % = approx \thinspace GLUE
+\def\thh{\hskip 2.25pt} % between \th and Th
+
+% just like \big and \Big
+\def\Th{\hskip 3.0pt} % = \jot
+\def\TH{\hskip 4.0pt}
+
+% just like \big and \Big
+\def\en{\enspace} % \hskip 5pt BREAKS
+\def\En{\enspace} % \hskip 6pt BREAKS
+\def\EN{\enspace} % \hskip 7pt BREAKS
+
+% conflicts with Hebrew qof, so use \quad with Hebrew
+% and comment out this next line
+\def\q{\quad} % \hskip 10pt BREAKS
+\def\qq{\qquad} % \hskip 20pt BREAKS
+
+%%%%%%%%%%%% SLASHES %%%%%%%%%%%
+\def\bsl{\char"005C\gl}
+
+\def\fsl{\hskip 1.8pt/\hskip 1.5pt} % was 2.5pt
+
+%%%%%%%%%%%% SPECIAL INDENTS + SQUEEZE %%%%%%%%%%%
+\def\bibl{\mni\hangindent=\parindent\noindent}
+\def\bib{\mni\hangindent=\parindent\noindent}
+
+% USAGE: \squeeze{\spaceskip = 1.5pt proud, shallow, ....}
+\def\squeeze{\hbox to \hsize }
+
+%%%%%%%%%%%% UNDERBAR IN FILE TITLE %%%%%%%%%%%
+\def\un{\kern -0.85pt \gl\_\gl }
+\def\unl{\kern -0.85pt \gl\_\gl }
+
+%%%%%%%%%%% TIRET + DOTS + GUILLEMETS + ANGLE BRACKETS %%%%%%%%%%
+\def\tiret{\Th--\Th}
+
+\def\dots{\th{\rmfourteen ...}\th} % OK DO NOT PUT A PERIOD
+
+\def\lgui{{\rmsixteen\char"00AB\kern -1pt}} % ««
+\def\rgui{{\gl \rmsixteen\char"00BB}} % »»
+
+\def\<{\gl{\rmsixteen\char"003C\gl}} % <
+\def\>{{\gl\rmsixteen\char"003E}\gl} % >
+
+%%%%%%%%%%%% BRACES two choices %%%%%%%%%%%
+\def\lb{\char"007B} % left braces
+\def\lbr{\char"007B} % left braces
+
+\def\rb{\char"007D}% right braces
+\def\rbr{\char"007D } % right braces
+
+%%%%%%%%%%% BRACKETS + PARENTHESIS Use inside italics %%%%%%%%%%
+
+\def\[{{\rm \char"005B\gl}} % [ Use inside italics
+\def\]{{\rm \gl \char"005D}} % ] Use inside italics
+\def\({{\rm \char"0028\gl}} % [ Use inside italics
+\def\){{\rm \gl \char"0029}}
+
+%%%%%%%%%%% QUOTATION MARKS + APOSTROPHE %%%%%%%%%%
+% eloquent quotations
+\def\lq{\char"201C\kern -0.1pt}
+\def\rq{\char"201D} % NEEDS CLOSING
+
+\def\"{\char"0022} % plain quotation
+
+% apostrophe is 0027, but it says that 2019 is preferred,
+% this is true as 2019 has the nice curl on top
+\def\'{\char"2019}
+\def\apos{\char"2019}
+\def\aps{\char"2019}
+\def\ap{\char"2019}
+
+%%%%%%%%%%% SEPARATING LINES %%%%%%%%%%
+% modify according to teste
+
+ \def\linea{\nin\centerline{\vrule height 2.0pt width 1.5truein depth 0 pt}}
+ \def\lineb{\nin\centerline{\vrule height 1.0pt width 1.5truein depth 0 pt}}
+
+ \def\lineA{\nin\centerline{\vrule height 2.0pt width 2.5truein depth 0 pt}}
+ \def\lineAa{\nin\centerline{\vrule height 2.5pt width 4.3truein depth 0pt}}
+
+\def\lineAA{\nin\centerline{\vrule height 3.2pt width 5.5truein depth 0pt}}
+%
+% next size up would be lineaaa etc
+
+%%%%%%%%%%%%% SPECIALIZED DEFINITIONS, INTRODUCED AS NEEDED %%%%%
+% I used many of these in my genealogical books to indicate various sources etc.
+% \msamA, \msbmBBBB and \cmsyAA are defined in [my_fonts.mac]
+
+\def\dvd{\hglue 1.0pt$^{\hbox{\boldmedsmall DVD}}$\hglue 1.0pt}
+\def\DVD{\hglue 1.0pt$^{\hbox{\boldmedsmall DVD}}$\hglue 1.0pt}
+\def\html{\kern 1.0truept{\raise 3.0pt \hbox{\bfnine HTML}}}
+\def\HTML{\kern 1.0truept{\raise 3.0pt \hbox{\bfnine HTML}}}
+\def\copyright{\char"00A9}
+\def\pdf{\raise 4pt\hbox{\boldmedsmall PDF}} % can not put \} in case there is a period after.
+\def\copyright{\char"00A9}
+\def\euro{{\char"20AC}}
+\def\pilcrow{{\char"00B6}}
+\def\star{\raise 3.5pt \hbox{\gl\msamA \char70}}
+\def\web{\gl{\msbmBBBB\char121}\hfill}
+\def\square{\th\raise 3.7pt\hbox{\msamAaaa\char4}}
+\def\tilda{{\cmsyAA \char24}}
+%
+% a separating | I use \| as command, since \ and | are on same key
+% used for identifying numbers in genealogy, e.g. {\tt 122\|1}
+\def\|{\th\raise 1.5pt \hbox{\cmsyAa\char 15}\th}
+%
+% I use \club to indicated a place in the text where changes are needed
+\def\club{\raise 3.5pt \hbox{\gl$\clubsuit$}}
+
+ %%%%%%%%%%%% ARROWS %%%%%%%%%%%%
+% n.b. the names of the arrows are just: hackd etc, without a for arrow
+%
+% these are with hackbold
+\def\hackD{\hbox{\hackboldBB \char"21A6}\hbox to 10truept{}}% |--->
+\def\hackE{\hbox{\hackboldBB \char"21E2}\hbox to 10truept{}} % --->
+\def\hackF{\hbox{\hackboldBB \char"2192}\hbox to 10truept{}} % ==>
+
+% these are regular hack for smaller, lighter arrows
+% 21DA <-- triple line 21DB --> triple line
+\def\hackd{\hbox{\hackseventeen \char"21A6}\hbox to 10truept{}} % |-->
+\def\hacke{\hbox{\hackseventeen \char"21E2}\hbox to 10truept{}} % -->
+\def\hackf{\hbox{\hackseventeen \char"2192}\hbox to 10truept{}} % ==>
+
+% libertine 21D0: <= no opposite of 21A6
+% libertine 2190 <---- single line
+%
+\def\libertineEA{\lower 1pt \hbox{\rmfifteen \char"21A6}\kern -1.5pt{}} % same as above |--->
+\def\libertineEAA{\lower 1pt \hbox{\rmeighteen \char"21A6}\kern -1.5pt{}} % same as above |--->
+\def\libertineEAAA{\lower 1pt \hbox{\rmtwenty \char"21A6}\kern -1.5pt{}} % same as above |--->
+
+% right facing
+\def\libertineEBR{\lower 1pt \hbox{\rmfifteen \char"21D2}\kern -1.5pt{}} % ==>
+\def\libertineEBBR{\lower 1pt \hbox{\rmeighteen \char"21D2}\kern -1.5pt{}} % ==>
+\def\libertineEBBBR{\lower 1pt \hbox{\rmtwenty \char"21D2}\kern -1.5pt{}} % ==>
+% left facing
+\def\libertineEBL{\lower 1pt \hbox{\rmfifteen \char"21D0}\kern -1.5pt{}} % <==
+\def\libertineEBBL{\lower 1pt \hbox{\rmeighteen \char"21D0}\kern -1.5pt{}} % <==
+\def\libertineEBBBL{\lower 1pt \hbox{\rmtwenty \char"21D0}\kern -1.5pt{}} % <==
+
+% These are long, double and slanted arrows set in \cmsy
+% long + double arrows
+\def\LRA{$\Longrightarrow$} % SEE REGULAR DOUBLE ARROWS BELOW
+\def\LLA{$\Longleftarrow$}
+\def\EWAA{\hbox{\cmsyAAAA \char 44}\hbox to 10truept{}} % DOUBLE ARROW, BOTH WAYs
+
+% arrows in SE, SW, NW , NE
+\def\SEA{\lower 5truept\hbox{\cmsyAAAA \char38}}
+\def\SWA{\lower 5truept\hbox{\cmsyAAAA \char 46}\hbox to 10truept{}}
+%
+\def\NWA{\lower 5truept\hbox{\cmsyAAAA \char 45\hbox to 10truept{}}}
+%
+\def\NEA{\lower 5truept\hbox{\cmsyAAAA \char 37\hbox to 10truept{}}}
+%
+% arrows in E, S, W , N 10 to big for EA
+\def\EA{\hbox{\cmsyAAAA \char 33}\hbox to 5truept{}}
+%
+\def\SA{\hbox{\cmsyAAAA \char 35}\hbox to 10truept{}}
+%
+\def\WA{\hbox{\cmsyAAAA \char 32}\hbox to 10truept{}}
+%
+\def\NA{\hbox{\cmsyAAAA \char 34}\hbox to 10truept{}}
+
+% double arrows in E, S, W , N
+%
+\def\EAA{\hbox{\cmsyAAAA \char 41}\hbox to 10truept{}}
+%
+\def\SAA{\hbox{\cmsyAAAA \char 43\hbox to 10truept{}}}
+%
+\def\WAA{\hbox{\cmsyAAAA \char 40\hbox to 10truept{}}}
+%
+\def\NAA{\hbox{\cmsyAAAA \char 42\hbox to 10truept{}}}
+
+%%%%%%%%%% TRIG DEFINITIONS %%%%%%%%%%
+% the following definition allows me to fix the R inside $ $; note \hbox{ }
+\def\R{\hbox{\rm R}} % leave out '' ( '' because I already have.
+%
+% I took out \sin because it interfered with \sin = \small\noindent
+\def\cos{\hbox{\rm cos}}
+\def\tan{\hbox{\rm tan}}
+\def\csc{\hbox{\rm csc}}
+\def\sec{\hbox{\rm sec}}
+\def\cot{\hbox{\rm cot}}
+\def\ln{\hbox{\rm ln}}
+\def\log{\hbox{\rm log}}
+\def\lim{\hbox{\rm lim}}
+
+ %%%%%%%%%% END %%%%%%%%%%
+
+
+
+
+
+
+