first bad stab at styles

1 files changed, 35 insertions, 0 deletions

diff --git a/aux.otx b/aux.otx
new file mode 100644
index 0000000..33cf24d
--- /dev/null
+++ b/aux.otx
@@ -0,0 +1,35 @@
+\def\blankstyle{
+    \headline={}
+    \footline={}}
+
+\def\frontmatterstyle{
+    \headline={}
+    \footline={\_hss\rmfixed \romannumeral\_folio \_hss}}
+
+
+\def\essaytitle#1{\ul{#1}}
+
+% --- strikeouts
+% --- TODO this should be moved into sal.otx probably
+\def\cancel#1#{\isempty{#1}\iftrue \afterfi{\cancel/}
+   \else
+      \lowercase{\casesof #1}
+        /  {\let\cancline=\drawFslash}
+        \\ {\let\cancline=\drawBslash}
+        x  {\def\cancline{\drawBslash\drawFslash}}
+        -  {\let\cancline=\drawHline}
+        \_finc {}%
+      \ea\cancelA
+   \fi
+}
+\def\cancelA{\ifmmode \ea\cancelM \else \ea\cancelT \fi}
+\def\cancelT#1{\setbox0=\hbox{#1}\cancelF} % text mode
+\def\cancelM#1{\mathstyles{\setbox0=\hbox{$\currstyle#1$}\cancelF}} % math mode
+\def\cancelF{\edef\tmp{\cancline}\quitvmode\box0 \pdfliteral{q \useit{\cancelparams} \tmp S Q}}
+\def\drawFslash{\bp{-\wd0} \bp{-\dp0} m 0 \bp{\ht0} l } % forward slash
+\def\drawBslash{\bp{-\wd0} \bp{\ht0} m 0 \bp{-\dp0} l } % backward slash
+\def\drawHline {\bp{-\wd0} \bp{.5ex} m 0 \bp{.5ex} l }  % horizontal line
+\def\cancelparams{1 0 0 RG 1 J .6 w} % color RG linetype J linewidth w
+% ---------
+
+\typosize[10/13]
\ No newline at end of file