LaTeX2eの初等数学プリント作成マクロ emath

数式や図形，グラフのソースをいちから作るのは大変なので，私は数式作成にとても便利なマクロパッケージを使っています。
このマクロパッケージは emath といいます。このマクロパッケージをセットアップしておけば，中学，高校で使用する数式，図形，グラフが簡単に作れます。図形やグラフは正確なものを作れるので，非常に美しいできあがりです。
例えば，単位円上の動径も正確な角度で簡単に作れます。
ソースを下に示します。　注）“\”は“¥”と同じです。

\unitlength=4cm
\begin{zahyou}(-1.5,1.5)(-1.5,1.5)
\def\A{(1,0)}
\def\B{(-1,0)}
\def\C{(0,1)}
\def\D{(0,-1)}
\En\O{1}
\Candk\O{1}\O{30}\P\Q
\Candk\O{1}\O{45}\R\S
\Candk\O{1}\O{60}\T\U
\Candk\O{1}\O{120}\p\q
\Candk\O{1}\O{135}\r\s
\Candk\O{1}\O{150}\t\u
\Drawline{\O\Q}
\Drawline{\O\S}
\Drawline{\O\U}
\Drawline{\O\p}
\Drawline{\O\r}
\Drawline{\O\t}
\Drawline{\O\P}
\Drawline{\O\R}
\Drawline{\O\T}
\Drawline{\O\q}
\Drawline{\O\s}
\Drawline{\O\u}
\Hasen{\Q\t}
\Hasen{\S\r}
\Hasen{\U\p}
\Put\Q(5pt,4pt)[l]{30\Deg}
\Put\S(6pt,5pt)[l]{45\Deg}
\Put\U(3pt,8pt)[l]{60\Deg}
\Put\p[nw]{\framebox(0.25,0.15){　}\;}
\Put\r[w]{\framebox(0.25,0.15){　}\;\;\;}
\Put\t[w]{\framebox(0.25,0.15){　}\;\;}
\Put\P[w]{\framebox(0.25,0.15){　}\;\;}
\Put\R[sw]{\framebox(0.25,0.15){　}\;\;\;}
\Put\T(5pt,-15pt)[r]{\framebox(0.25,0.15){　}}
\Put\q(-5pt,-15pt)[l]{\framebox(0.25,0.15){　}}
\Put\s[se]{\;\;\framebox(0.25,0.15){　}}
\Put\u[e]{\;\;\framebox(0.25,0.15){　}}
\Put\A[se]{1}
\Put\B[sw]{-1}
\Put\C[ne]{1}
\Put\D[se]{-1}
\Suisen\Q\O\A\H
\Suisen\S\O\A\I
\Suisen\U\O\A\J
\Suisen\p\O\B\K
\Suisen\r\O\B\L
\Suisen\t\O\B\M
\Suisen\Q\O\C\1
\Suisen\S\O\C\2
\Suisen\U\O\C\3
\Suisen\P\C\D\4
\Suisen\R\C\D\5
\Suisen\T\C\D\6
\Hasen{\Q\u}
\Hasen{\S\s}
\Hasen{\U\q}
\Hasen{\p\T}
\Hasen{\r\R}
\Hasen{\t\P}
\Hasen{\P\u}
\Hasen{\R\s}
\Hasen{\T\q}
\def\d{(-0.8,.95)}
\def\e{(-1.1,0.8)}
\def\f{(-1.15,0.6)}
\def\dd{(-1.2,1)}
\def\gg{(1.4,0.3)}
\def\hh{(1.2,0.7)}
\def\ii{(1.2,-0.3)}
\PutStr\gg[e]{\framebox(0.3,0.3){　}}to\H
\PutStr\hh[e]{\framebox(0.3,0.3){　}}to\I
\PutStr\ii[e]{\framebox(0.3,0.3){　}}to\J
\def\jj{(-1.4,0.17)}
\def\kk{(-1.3,0.5)}
\def\ll{(-1.3,-0.3)}
\PutStr\jj[w]{\framebox(0.3,0.3){　}}to\M
\PutStr\kk[w]{\framebox(0.3,0.3){　}}to\L
\PutStr\ll[w]{\framebox(0.3,0.3){　}}to\K
\def\mm{(0.6,1.3)}
\def\nn{(0.2,1.2)}
\def\oo{(-0.3,1.2)}
\def\pp{(-0.5,-1.3)}
\def\qq{(-0.2,-1.09)}
\def\rr{(0.3,-1.1)}
\PutStr\mm[e]{\framebox(0.3,0.3){　}}to\1
\PutStr\nn[n]{\framebox(0.3,0.3){　}}to\2
\PutStr\oo[n]{\framebox(0.3,0.3){　}}to\3
\PutStr\pp[w]{\framebox(0.3,0.3){　}}to\4
\PutStr\qq[s]{\framebox(0.3,0.3){　}}to\5
\PutStr\rr[s]{\framebox(0.3,0.3){　}}to\6
\kuromaru{\Q;\S;\U;\p;\r;\t;\P;\R;\T;\q;\s;\u}
\end{zahyou}