我想\newwrite
在我的文档中创建多个,例如:按章节创建。
我尝试了以下操作,但没有效果。
我想,最终我的问题又回到了:给出一个参数#1
,我如何创建一个名为的变量\customVariable#1
?
\documentclass{article}
\RequirePackage{environ}
\RequirePackage{verbatim}
\newenvironment{Exo}{}{}
\newenvironment{Solut}[1]{}{}
\makeatletter
\newcommand{\createWrite}[1]
{
\newwrite \fich@sol#1
\def\nameFile{example.sol}
\AtBeginDocument{ \immediate\openout \fich@sol#1 \nameFile}
\AtEndDocument{ \immediate\closeout \fich@sol#1}
}
\NewEnviron{Sol}[1]
{%
\immediate\write\fich@sol#1{\string\begin{Solut}{\c@mpteur}}%
\@bsphack
\let\do\@makeother\dospecials
\catcode`\^^M\active \catcode`\^^I=12
\def\verbatim@processline{%
\immediate\write\fich@sol
{\the\verbatim@line}}%
\verbatim@start%
}
{%
\immediate\write\fich@sol#1{\string\end{Solut}}%
\immediate\write\fich@sol#1{}
\@esphack%
}
\makeatother
\begin{document}
\createWrite{test}
\begin{Exo}
This is the exercise.
\end{Exo}
\begin{Sol}{test}
This is the solution.
\end{Sol}
OTHER EXERCISES HERE.
\input{\nameFile}
\end{document}