提交: 03f00373d3bffd34329246497ccfecb873789fdf - myprojects-hg-reborn (hg)

Commit MetaInfo

• 修訂: 03f00373d3bffd34329246497ccfecb873789fdf (tree)
• 時間: 2017-03-09 22:17:01
• 作者: Lorenzo Isella <lorenzo.isella@gmai...>
• Commiter: Lorenzo Isella

Log Message

A script to mimic an old typewriter.

Change Summary

• add: latex-documents/latex-typewriter.tex

差異

diff -r a47a362afd5e -r 03f00373d3bf latex-documents/latex-typewriter.tex
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/latex-documents/latex-typewriter.tex	Thu Mar 09 14:17:01 2017 +0100
@@ -0,0 +1,130 @@
+\documentclass[10pt]{article}% This is a document class providing more font size options
+\usepackage{graphicx}
+\usepackage{ifthen}
+\usepackage[textwidth=7.5in,textheight=9.5in]{geometry}
+\usepackage{xcolor} %
+
+
+\pagestyle{empty}
+
+
+% thanks to Bruno Le Floch: http://tex.stackexchange.com/q/9331/4012
+% and in his comments to http://tex.stackexchange.com/a/29458/4012
+\usepackage[first=-1,last=1]{lcg}% you can play around with these values
+\makeatletter
+\newcommand{\globalrand}{\rand\global\cr@nd\cr@nd}
+\makeatother
+   
+\newcommand{\randomvshift}[1]{\globalrand\raisebox{\value{rand}pt}{#1}}
+
+%%% thanks to Martin Scharrer: http://tex.stackexchange.com/q/11598/4012
+\makeatletter
+\def\typewriter#1{%
+    \@typewriter#1 \@empty
+}
+\def\@typewriter#1 #2{%
+   \randomvshift{#1}\space
+   \ifx #2\@empty\else
+    \expandafter\@typewriter
+   \fi
+   #2%
+}
+\makeatother
+
+% \fontdimen3\font=0em % interword stretch
+% \fontdimen4\font=0em % interword shrink
+% \fontdimen7\font=0em % extra space
+
+
+\usepackage{ragged2e}
+\setlength{\RaggedRightParindent}{\parindent}
+
+% \newcommand\BlurText[1]{%
+%   \vbox{#1\par\duplines}}
+
+
+
+\renewcommand{\baselinestretch}{1}
+
+
+\newbox\flinebox 
+\newbox\slinebox
+\newbox\mlinebox
+\def\duplines{\setlength\parindent{0pt}
+  \setbox\flinebox\lastbox
+  \ifvoid\flinebox\relax
+  \else
+  \setbox\slinebox\hbox{\copy\flinebox}
+  \setbox\mlinebox\hbox{\copy\flinebox}
+  \unskip\unpenalty
+  {\duplines}
+
+{\color{black!30} \box\flinebox\vspace*{-2.85ex}}
+{\color{black!50} \makebox[\textwidth]{\hspace*{-0.25pt}\box\mlinebox}\vspace*{-2.75ex}}
+{\color{black!90}  \makebox[\textwidth]{\hspace*{0.25pt}\box\slinebox}}\fi
+
+}
+
+\newcommand\BlurText[1]{%
+  \vbox{#1\par\duplines}}
+
+
+% \usepackage{tikz}
+% \newcommand*{\random}[2]{%
+%     \pgfmathparse{random(2)}%
+%     \ifodd\pgfmathresult\relax#1\else#2\fi%
+% }
+
+
+
+
+% \usepackage{pgf}
+% \newcommand*{\random}[4]{%
+%     \pgfmathparse{random(4)}%
+%     \ifcase\pgfmathresult\relax
+%       \or#1\or#2\or#3\or#4%
+%     \fi%
+% }
+
+\begin{document}\tt
+
+% \raggedright
+ \RaggedRight
+
+\typewriter{Math 101 Fall 1963}
+
+
+\begin{enumerate}
+\item   \typewriter
+  {$\frac{\texttt{d}}{\texttt{dx}}\texttt{(x)}^2$}
+
+\item  \typewriter
+  {State the Fundamental Theorem of Calculus.}
+  
+\end{enumerate}
+  
+
+ \typewriter
+{And now let us see the effect of adding quite some text. If everything
+goes fine, this should look like human typed text.
+And now let us see the effect of adding quite some text. If everything
+goes fine, this should look like human typed text.
+And now let us see the effect of adding quite some text. If everything
+goes fine, this should look like human typed text.
+And now let us see the effect of adding quite some text. If everything
+goes fine, this should look like human typed text.
+And now let us see the effect of adding quite some text. If everything
+goes fine, this should look like human typed text.
+% \BlurText{From now on, the text is also blurred. This should enhance
+%   the feel that everything is being typed down by hand (i.e. by
+%   typewriter). And now let us see the effect of adding quite some text. If everything
+% goes fine, this should look like human typed text.} 
+}
+\footnote{\typewriter{and here
+we are!}}
+% \random{1}{2}{3}{4}
+% \random{1}{2}{3}{4}
+   
+
+
+\end{document}
\ No newline at end of file