皆様いかがお過ごしですか
こちらは授業進度に追われながら
相変わらずの生活を送っています。
生徒の教材プリントを作成して
(単なる参考書の焼き直しですが)
皆様のお役に立てればと 2点ほどアップさせてもらいます。
なお、表題は再帰図形描画ですが
マクロ本体は再帰呼び出しを行っていないことをご理解ください。



1つめは 7年前の焼き直しです。
 4点 A,B,C,D をセットして
　#1:描画回数
　#2:添字表示回数
　#3:比1
　#4:比2
 をパラメータにして呼び出し。

2つめは最近作成したもので
 3点 O,A,B をセットして
　#1:描画回数
　#2:添字表示回数
 をパラメータにして呼び出し。

になります。ラベル文字の大きさは
マクロ内の \Zoom の値を変更することになります。
\documentclass[a4j]{jarticle}

\usepackage[notMy]{emath}
\usepackage{emathP}

\pagestyle{empty}

\def\FigI#1#2#3#4{%
\def\Zoom{0.7}%
\def\SpanRatio{0.08}%
\Bunten\A\C{1}{1}\Center%
\IAdd#2{1}\WkCnt%
\Ifor*\I{1}{#1}\Do{%
%\Mul\SpanRatio{1.07}\SpanRatio%
\Add\SpanRatio{1}\OutRatio%
\Sub{1}\OutRatio\InRatio%
\Takakkei{\A\B\C\D}%
\Bunten\Center\A{\OutRatio}{\InRatio}\PosA%
\Bunten\Center\B{\OutRatio}{\InRatio}\PosB%
\Bunten\Center\C{\OutRatio}{\InRatio}\PosC%
\Bunten\Center\D{\OutRatio}{\InRatio}\PosD%
\ifnum\I<\WkCnt%
\Put\PosA(0,0){\scalebox{\Zoom}{$A_{\I}$}}%
\Put\PosB(0,0){\scalebox{\Zoom}{$B_{\I}$}}%
\Put\PosC(0,0){\scalebox{\Zoom}{$C_{\I}$}}%
\Put\PosD(0,0){\scalebox{\Zoom}{$D_{\I}$}}%
\fi%
\let\WkA\A%
\let\WkB\B%
\let\WkC\C%
\let\WkD\D%
\Bunten\WkA\WkB{#3}{#4}\A%
\Bunten\WkB\WkC{#3}{#4}\B%
\Bunten\WkC\WkD{#3}{#4}\C%
\Bunten\WkD\WkA{#3}{#4}\D%
}%
}%

\def\FigII#1#2{%
\def\Zoom{0.8}%
\IAdd{#2}{1}\WkCnt%
\Takakkei{\O\A\B}%
\let\P\O%
\Ifor*\I{1}{#1}\Do{%
\Landk\A\B\P{45}\Q%
\kandk\Q{90}\A{00}\Hx%
\kandk\Q{00}\P{90}\Hy%
\Drawlines{\Q\Hx}%
\Drawlines{\Q\Hy}%
\ifnum\I<\WkCnt%
\Bunten\P\Q{1}{1}\PosT%
\Put\PosT[c]{\scalebox{\Zoom}{$\mitT_{\I}$}}%
\Put\Q[n]{\scalebox{\Zoom}{$B_{\I}$}}%
\Put\Hx[s]{\scalebox{\Zoom}{$A_{\I}$}}%
\fi%
\let\P\Hx%
}%
\Put\O[s]{\scalebox{\Zoom}{$O$}}%
\Put\A[se]{\scalebox{\Zoom}{$A$}}%
\Put\B[n]{\scalebox{\Zoom}{$B$}}%
\Tyokkakukigou\A\O\B%
}%

\begin{document}%
\caprm%

\begin{zahyou*}[haiti=t,ul=5mm](0,10)(0,10)%
\let\A\RT%
\let\B\LT%
\let\C\LB%
\let\D\RB%
\FigI{10}{4}{3}{4}%
\end{zahyou*}%

\vfill%

\begin{zahyou*}[haiti=t,ul=10mm](0,8)(0,5)%
\let\O\LB%
\let\A\RB%
\let\B\LT%
\FigII{10}{5}%
\end{zahyou*}%

\vfill%

\end{document}

# 来月は卒業式、学年末考査、成績処理、終業式、学習合宿、
# そして時間割編成作業が待ち受けておりますが
# その間をぬって行われる人間ドックの結果に恐々とすることが予想されます。

▼関連発言
│
└◆993:再帰図形描画 [田中徹] 02/19 16:27<-last