اولین بار است که به اینجا می‌آیید؟ راهنمای سایت را بخوانید!
+2 رای
3.5k بازدید

در پاسخ مربوط به نحوه ایجاد کلید سوالات آزمون تستی در پاسخ اول کد زیر ارائه شده است که برای چاپ چند کلید کامل (همه سوالات دارای پاسخ باشند) مشکل گشا است.

\documentclass{article}
\usepackage[margin=1in]{geometry}
\usepackage{pgffor}
\usepackage[most]{tcolorbox}
\usepackage{tikz}
\usetikzlibrary{shapes}
\usepackage{multicol}
\usepackage[logo=on]{xepersian}
\settextfont{Yas}
\setdigitfont{Yas}
\newcounter{anscount}%
\newcounter{optioncount}
\newcounter{correctcount}
\newcommand{\makesheet}[2][]{
    \setcounter{anscount}{0}%
    \foreach \k in {#1}{%
        \stepcounter{anscount}%
        \expandafter\xdef\csname ans\the\value{anscount}\endcsname{\k}%
    }%
    \begin{tcolorbox}[width=\textwidth]
        \begin{multicols}{3} 
            \begin{center} 
                \noindent
                \foreach \i in {1,...,#2}
                {\fbox{\raisebox{3pt}{\makebox[1cm]{\i}}%
                        \ifcsname ans\i \endcsname%
                            \setcounter{correctcount}{\csname ans\i \endcsname}%
                        \else%
                            \setcounter{correctcount}{0}%
                        \fi%
                        \foreach \j in {1,2,3,4} {%
                            \setcounter{optioncount}{\j}%
                            \ifnum\value{optioncount}=\value{correctcount}%
                                \filledellipse{\j}%
                            \else%
                                \blankellipse{\j}%
                            \fi%
                        }%
                    }\\
                        }
            \end{center}
        \end{multicols}
\end{tcolorbox}%
}
\begin{document}
\pagestyle{empty}
\newcommand{\blankellipse}[1]{
	\tikz{\node[draw,fill=red!5!white,inner sep=0pt,ellipse]{\textcolor{red}{~#1~}}}}

\newcommand{\filledellipse}[1]{
	\tikz{\node[draw,fill=black,inner sep=0pt,ellipse]{\textcolor{white}{~#1~}}}}

\tcbset{colframe=red!50!black,colback=white}
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید اول}‎‎
    \end{tcolorbox}
\makesheet[2,1,3,1,4,4,2,4,3,1,3,4,2,2,2,3,1,1,4,3,4,1,1,2,1,1,3,2,2,1,2,3,3,4,2,2,4,3,1,2,3,1,1,2,4,1,4,2,1,1,4,3,3,4,1,3,2,2,1,3]{60}%

\end{document}

حال اگر بخواهیم چند کلید متفاوت که بعضی از آنها ناقص باشند را در یک سند چاپ کنیم مشکل پیش می آید به این صورت که خروجی یک کلید ممکن است تحت تاثیر کلیدهای قبل از خود قرار گیرد. کد زیر این مشکل را نشان می دهد.

\documentclass{article}
\usepackage[margin=1in]{geometry}
\usepackage{pgffor}
\usepackage[most]{tcolorbox}
\usepackage{tikz}
\usetikzlibrary{shapes}
\usepackage{multicol}
\usepackage[logo=on]{xepersian}
\settextfont{Yas}
\setdigitfont{Yas}
\newcounter{anscount}%
\newcounter{optioncount}
\newcounter{correctcount}
\newcommand{\makesheet}[2][]{
    \setcounter{anscount}{0}%
    \foreach \k in {#1}{%
        \stepcounter{anscount}%
        \expandafter\xdef\csname ans\the\value{anscount}\endcsname{\k}%
    }%
    \begin{tcolorbox}[width=\textwidth]
        \begin{multicols}{3} 
            \begin{center} 
                \noindent
                \foreach \i in {1,...,#2}
                {\fbox{\raisebox{3pt}{\makebox[1cm]{\i}}%
                        \ifcsname ans\i \endcsname%
                            \setcounter{correctcount}{\csname ans\i \endcsname}%
                        \else%
                            \setcounter{correctcount}{0}%
                        \fi%
                        \foreach \j in {1,2,3,4} {%
                            \setcounter{optioncount}{\j}%
                            \ifnum\value{optioncount}=\value{correctcount}%
                                \filledellipse{\j}%
                            \else%
                                \blankellipse{\j}%
                            \fi%
                        }%
                    }\\
                        }
            \end{center}
        \end{multicols}
\end{tcolorbox}%
}
\begin{document}
\pagestyle{empty}
\newcommand{\blankellipse}[1]{
	\tikz{\node[draw,fill=red!5!white,inner sep=0pt,ellipse]{\textcolor{red}{~#1~}}}}

\newcommand{\filledellipse}[1]{
	\tikz{\node[draw,fill=black,inner sep=0pt,ellipse]{\textcolor{white}{~#1~}}}}

\tcbset{colframe=red!50!black,colback=white}
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید اول}‎‎
    \end{tcolorbox}
\makesheet[2,1,3,1,4,4,2,4,3,1,3,4,2,2,2,3,1,1,4,3,4,1,1,2,1,1,3,2,2,1,2,3,3,4,2,2,4,3,1,2,3,1,1,2,4,1,4,2,1,1,4,3,3,4,1,3,2,2,1,3]{60}%
\newpage
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
	\LARGE{کلید دوم}‎‎
\end{tcolorbox}
\makesheet[1,3,4,2,2,1,3,1,4,1,1,2,2,2,3]{60}%
\newpage
\begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
	\LARGE{کلید سوم}‎‎
\end{tcolorbox}
\makesheet[3,2,4,1,1,3,2,2]{60}%

\end{document}

مثلا هر کلید تا جایی که آرگومان اختیاری آن وارد شده است نتیجه خودش و از آن به بعد نتیجه کلید قبل از آن (در صورت کامل تر بودن) چاپ می شود.
برای رفع این مشکل چکار باید کرد؟
البته می توان با غیر فعال کردن دستور مربوط به هر پاسخنامه به ترتیب با اجرای برنامه، خروجی هر کدام را به صورت جداگانه به دست آورد. اما آیا می توان به نحو اصولی تر و با ارزش تری در یک اجرا خروجی مطلوب را به دست آورد؟

4 پاسخ

+5 رای
 
بهترین پاسخ

مشکل از اینجا ناشی می‌شود که من برای اینکه متغیر‌هایی که برای نگهداری جواب تعریف شده‌اند خارج از حلقه for قابل دسترس باشد، آنها را بصورت global تعریف کرده‌ام. اما راه حل مشگل شما ساده است و فقط کافی است در انتهای تعریف ماکروی makesheet مقدرا این متغیرها را صفر کنید و با این توضیحات کد شما به شکل زیر است.

\documentclass{article}
\usepackage[margin=1in]{geometry}
\usepackage{pgffor}
\usepackage[most]{tcolorbox}
\usepackage{tikz}
\usetikzlibrary{shapes}
\usepackage{multicol}
\usepackage[logo=on]{xepersian}
\settextfont{Yas}
\setdigitfont{Yas}
\newcounter{anscount}%
\newcounter{optioncount}
\newcounter{correctcount}
\newcommand{\makesheet}[2][]{
    \setcounter{anscount}{0}%
    \foreach \k in {#1}{%
        \stepcounter{anscount}%
        \expandafter\xdef\csname ans\the\value{anscount}\endcsname{\k}%
    }%
    \begin{tcolorbox}[width=\textwidth]
        \begin{multicols}{3} 
            \begin{center} 
                \noindent
                \foreach \i in {1,...,#2}
                {\fbox{\raisebox{3pt}{\makebox[1cm]{\i}}%
                        \ifcsname ans\i \endcsname%
                            \setcounter{correctcount}{\csname ans\i \endcsname}%
                        \else%
                            \setcounter{correctcount}{0}%
                        \fi%
                        \foreach \j in {1,2,3,4} {%
                            \setcounter{optioncount}{\j}%
                            \ifnum\value{optioncount}=\value{correctcount}%
                                \filledellipse{\j}%
                            \else%
                                \blankellipse{\j}%
                            \fi%
                        }%
                    }\\
                        }
            \end{center}
        \end{multicols}
\end{tcolorbox}%
	\setcounter{anscount}{0}%
   \foreach \k in {#1}{%
	\stepcounter{anscount}%
	\expandafter\xdef\csname ans\the\value{anscount}\endcsname{0}%
}%
}
\begin{document}
\pagestyle{empty}
\newcommand{\blankellipse}[1]{
    \tikz{\node[draw,fill=red!5!white,inner sep=0pt,ellipse]{\textcolor{red}{~#1~}}}}

\newcommand{\filledellipse}[1]{
    \tikz{\node[draw,fill=black,inner sep=0pt,ellipse]{\textcolor{white}{~#1~}}}}

\tcbset{colframe=red!50!black,colback=white}
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید اول}‎‎
    \end{tcolorbox}
\makesheet[2,1,3,1,4,4,2,4,3,1,3,4,2,2,2,3,1,1,4,3,4,1,1,2,1,1,3,2,2,1,2,3,3,4,2,2,4,3,1,2,3,1,1,2,4,1,4,2,1,1,4,3,3,4,1,3,2,2,1,3]{60}%
\newpage
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید دوم}‎‎
\end{tcolorbox}
\makesheet[1,3,4,2,2,1,3,1,4,1,1,2,2,2,3]{60}%
\newpage
\begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید سوم}‎‎
\end{tcolorbox}
\makesheet[3,2,4,1,1,3,2,2]{60}%

\end{document}

و خروجی بصورت زیر است.
enter image description here
enter image description here
enter image description here
پیروز باشید

درسته. قبل از دیدن پاسخ شما داشتم پرسش آخر رو مخفی می کردم که لینک رو دیدم. بسیار متشکرم. +1
توسط (735 امتیاز)
درود
توسط (8.7k امتیاز)
با آرزوی موفقیت روزافزون و تندرستی برای شما. ایده شما برای پاسخ به این سوال و سوال اولیه بسیار جالب بود.
برای کسانی که بعدا این صفحه را ببینند این تبصره را به پاسختان اضافه می کنم که به ازای هر سوال خط نزده در اول یا اثنای پاسخنامه می توانیم عددی دلخواه غیر از 1و2و3و4 (مثلا صفر) را در لیست پاسخ ها وارد کنیم. به این ترتیب خروجی کامل و درست خواهد بود.
توسط (735 امتیاز)
پیروز و سرافراز باشید.
توسط (589 امتیاز)
@M J Rezaeiani: این شیوه پرسیدن سوال به صورت ۱ و ۲ و ۳ باعث بی‌نظمی در سایت می‌شه. لطفاً از این به بعد هر مشکلی دارین، توی همون پست اصلی بپرسین. بخش کامنت‌ برای همین کاره که مشکل کد رو رفع کنین.
توسط (6.6k امتیاز)
درست می‌فرمایید ممکنه باعث بی نظمی در سایت بشه. البته چون تصور من این بود که پرسش جدید کار قبلی را توسعه می‌دهد و معمولا دوستان در این گونه موارد پیشنهاد طرح یک پرسش جدید را می‌دهند به این شیوه عمل کردم. باز هم متشکر
توسط (735 امتیاز)
+4 رای

سلام
با تشکر از پاسخ جناب باغبان عزیز
یک راه ساده‌ی دیگر این است که آرگومان دوم را به تعداد سوالات مورد نیاز انتخاب کنید و مانند نمونه‌ی زیر عمل کنید(چون در واقع، عملاً نیازی به شماره‌های دیگر ندارید):


\tcbset{colframe=red!50!black,colback=white}
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
	\LARGE{کلید دوم}‎‎
\end{tcolorbox}
\makesheet[1,3,4,2,2,1,3,1,4,1,1,2,2,2,3]{15}%
\begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
	\LARGE{کلید سوم}‎‎
\end{tcolorbox}
\makesheet[3,2,4,1,1,3,2,2]{8}%
\begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
	\LARGE{کلید چهارم}‎‎
\end{tcolorbox}
\makesheet[3,2,1]{3}%
\begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
	\LARGE{کلید پنجم}‎‎
\end{tcolorbox}
\makesheet[3,2]{2}%
\begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
	\LARGE{کلید ششم}‎‎
\end{tcolorbox}
\makesheet[3]{1}%

خروجی مناسب زیر را نیز با نسخه‌ی اولیه‌ی تکلایو 2018 مطابق زیر دارید:


![enter image description here][1]

موفق باشید.

متشکرم (+1). در مواردی لازم است که شکل ظاهری پاسخنامه ثابت بماند. مثلا اگر یک موسسه بخواهد به همراه کارنامه آزمون پاسخ های داوطلبان را نیز به منظور مقایسه چاپ نماید.
توسط (735 امتیاز)
کاملاً درست میفرمایید. برای هر دو سلیقه الان راه وجود دارد. برای دوستانی که بعد به این صفحه رجوع می کنند خوبه چون شاید این روش  هم نیاز باشد. درود بر شما
توسط (8.7k امتیاز)
@شاپور
درود بر شما
در صورتی که بخواهیم فقط جواب‌های ارائه شده چاپ شود دیگر به آرگومان دوم هم نیازی نیست زیرا که anscount مقدار آن را در خود دارد
توسط (589 امتیاز)
البته در سیستم من چنانچه آرگومان دوم را خالی قرار دهید و یا قرار ندهید خطا می دهد. لطفا تست کنید.
توسط (8.7k امتیاز)
من منظورم با کمی دستکاری دستور بود.
توسط (589 امتیاز)
سپاس.
توسط (8.7k امتیاز)
+3 رای

یک راه دیگر این است که به ازای هر سوال خط نزده عددی دلخواه غیر از 1و2و3و4 (مثلا صفر) وارد کنیم. این روش در مواردی که سوال خط نزده در وسط پاسخنامه داشته باشیم نیز به خوبی جواب می دهد. مثلا به صورت زیر:

\documentclass{article}
\usepackage[margin=1in]{geometry}
\usepackage{pgffor}
\usepackage[most]{tcolorbox}
\usepackage{tikz}
\usetikzlibrary{shapes}
\usepackage{multicol}
\usepackage[logo=on]{xepersian}
\settextfont{Yas}
\setdigitfont{Yas}
\newcounter{anscount}%
\newcounter{optioncount}
\newcounter{correctcount}
\newcommand{\makesheet}[2][]{
    \setcounter{anscount}{0}%
    \foreach \k in {#1}{%
        \stepcounter{anscount}%
        \expandafter\xdef\csname ans\the\value{anscount}\endcsname{\k}%
    }%
    \begin{tcolorbox}[width=\textwidth]
        \begin{multicols}{3} 
            \begin{center} 
                \noindent
                \foreach \i in {1,...,#2}
                {\fbox{\raisebox{3pt}{\makebox[1cm]{\i}}%
                        \ifcsname ans\i \endcsname%
                            \setcounter{correctcount}{\csname ans\i \endcsname}%
                        \else%
                            \setcounter{correctcount}{0}%
                        \fi%
                        \foreach \j in {1,2,3,4} {%
                            \setcounter{optioncount}{\j}%
                            \ifnum\value{optioncount}=\value{correctcount}%
                                \filledellipse{\j}%
                            \else%
                                \blankellipse{\j}%
                            \fi%
                        }%
                    }\\
                        }
            \end{center}
        \end{multicols}
\end{tcolorbox}%
}
\begin{document}
\pagestyle{empty}
\newcommand{\blankellipse}[1]{
    \tikz{\node[draw,fill=red!5!white,inner sep=0pt,ellipse]{\textcolor{red}{~#1~}}}}

\newcommand{\filledellipse}[1]{
    \tikz{\node[draw,fill=black,inner sep=0pt,ellipse]{\textcolor{white}{~#1~}}}}

\tcbset{colframe=red!50!black,colback=white}
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید اول}‎‎
    \end{tcolorbox}
\makesheet[2,1,3,1,4,4,2,4,3,1,3,4,2,2,2,3,1,1,4,3,4,1,1,2,1,1,3,2,2,1,2,3,3,4,2,2,4,3,1,2,3,1,1,2,4,1,4,2,1,1,4,3,3,4,1,3,2,2,1,3]{60}%
\newpage
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید دوم}‎‎
\end{tcolorbox}
\makesheet[1,2,0,2,4,1,4,3,0,3,0,0,1,1,0,0,0,0,0,0,0,0,0,2,1,4,3,1,1,0,0,0,3,3,0,0,0,2,2,4,0,0,0,0,0,3,2,4,0,0,0,0,0,0,0,0,0,0,0,0]{60}%
\newpage
\begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{کلید سوم}‎‎
\end{tcolorbox}
\makesheet[3,2,4,1,1,3,2,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]{60}%

\end{document}

که خروجی ها به صورت زیر است:
enter image description here
enter image description here
enter image description here

درود
توسط (8.7k امتیاز)
+2 رای

با سلام و تشكر
با استفاده‌ از كدهای شما اساتید عزیز، من هم با یك تغییر كوچك جوابهای ١، ٢، ٣، ٤ را به‌ A,B,C,D,E تبدیل كردم

\documentclass{article}
\usepackage[margin=1.0in]{geometry}
\usepackage{pgffor}
\usepackage[most]{tcolorbox}
\usepackage{tikz}
\usetikzlibrary{shapes}
\usepackage{multicol}
\usepackage[logo=on]{xepersian}
\settextfont{Yas}

\newcounter{anscount}%
\newcounter{optioncount}
\newcounter{correctcount}
\newcommand{\makesheet}[2][]{
    \setcounter{anscount}{0}%
    \foreach \k in {#1}{%
        \stepcounter{anscount}%
        \expandafter\xdef\csname ans\the\value{anscount}\endcsname{\k}%
    }%
    \begin{tcolorbox}[width=\textwidth]
        \begin{multicols}{3} 
            \begin{center} 
                \noindent
                \foreach \i in {1,...,#2}
                {\fbox{\raisebox{3pt}{\makebox[1cm]{\i}}%
                        \ifcsname ans\i \endcsname%
                            \setcounter{correctcount}{\csname ans\i \endcsname}%
                        \else%
                            \setcounter{correctcount}{0}%
                        \fi%
                        \foreach \letter/\position in {A/1, B/2, C/3, D/4, E/5} {%
                            \setcounter{optioncount}{\position}%
                            \ifnum\value{optioncount}=\value{correctcount}%
                                \filledellipse{\letter}%
                            \else%
                                \blankellipse{\letter}%
                            \fi%
                        }%
                    }\\
                        }
            \end{center}
        \end{multicols}
\end{tcolorbox}%
    \setcounter{anscount}{0}%
   \foreach \k in {#1}{%
    \stepcounter{anscount}%
    \expandafter\xdef\csname ans\the\value{anscount}\endcsname{0}%
}%
}
\begin{document}
\pagestyle{empty}
\newcommand{\blankellipse}[1]{
    \tikz{\node[draw,fill=red!5!white,inner sep=0pt,ellipse]{\textcolor{red}{~#1~}}}}

\newcommand{\filledellipse}[1]{
    \tikz{\node[draw,fill=black,inner sep=0pt,ellipse]{\textcolor{white}{~#1~}}}}

\tcbset{colframe=red!50!black,colback=white}
 \begin{tcolorbox}[width=\textwidth,colback=red!5!white,halign=center]
    \LARGE{وه‌لامی گروپی یه‌كه‌م}‎‎
    \end{tcolorbox}
\makesheet[1,2,3,5,1,3,4,5,1,3,2,5,1,2,3,3,1,3,2,5,1,3,3,5,1,2,3,1,1,3,2,5,2,5,4,5,1,2,3,5,1,3,4,2,1,4,4,5,1,5,3,5,4,3,4,5,1,3,4,5]{60}%
\end{document}

که‌ خروجی این كدها:
enter image description here
با درود فراوان

بسیار بسیار زیبا. درود بر شما و تبریک بابت پیشرفت های روزافزون شما
توسط (8.7k امتیاز)
بسیار عالی. تشکر از کار مفیدتون.
توسط (735 امتیاز)
با تشكر از شما اساتید محترم در سایت كه‌ اطلاعات خودتون رو در اختیار دیگران میگذارید و اموزش میدهید.
خدا اجرتون بده‌.
توسط (679 امتیاز)
پرسیدن سوال
وب‌سایت پرسش و پاسخ پارسی‌لاتک جایی برای پرسش و پاسخ درباره سیستم حروف‌چینی لاتک و بسته زی‌پرشین است. در اینجا می‌توانید سوال‌های خود را بپرسید و به سوال‌های دیگران پاسخ دهید.

7.1k پرسش

6.6k پاسخ

23.5k نظر

7.2k کاربر

محبوب‌ترین برچسب‌ها

رفع خطا جدول xepersian مراجع ریاضی‌نویسی شکل bidi فونت فهرست مطالب شماره‌گذاری منابع پانویس بیب‌تک tikz تک‌لایو parsilatex بیمر اسلاید زی‌پرشین پاورقی bibtex سربرگ نماد رسم شکل فرمول‌نویسی ارجاع‌دهی biditexmaker هدر ویرایشگر قالب beamer واژه‌نامه اندازه فونت texstudio عنوان فصل ماتریس اعمال نشدن تغییرات در پی‌دی‌اف رسم جدول شماره صفحه bidipresentation حاشیه رنگ عنوان شکل اسلاید فارسی محیط قضیه گراف مکان شکل tikzpicture enumerate حروف‌چینی کد شماره فصل tabriz_thesis نمایه align زیرنویس شکل کادر itemize فهرست اشکال الگوریتم عدم اجرا listings نیم‌فاصله متن لاتین و فارسی بسته فاصله بین خطوط قالب پایان‌نامه فرمول نصب تک‌لایو فارسی‌تک hyperref شماره فرمول glossaries کپشن نمودار خروجی لاتک حروف‌چینی چندستونی فونت فارسی و انگلیسی ماکرونویسی biditools شماره پاورقی پیوست‌ سوال امتحانی فاصله‌گذاری فرمول چندضابطه‌ای extrafootnotefeatures subfigure biditufte-book header texmaker pdf خطا tex longtable تصویر شمارنده زیرنویس texlive2015 دیاگرام رسم نمودار شماره‌گذاری صفحات پایان نامه فهرست جداول میک‌تک texlive2016 تنظیم جدول آکولاد شعر kashida بولد تورفتگی texworks caption اندیس اعداد فارسی lollipop iust-thesis multicol فصل‌نویسی سوال چهارگزینه‌ای فاصله عمودی pgfplots xindy چپ‌چینی اوبونتو میکروسافت ورد قاب geometry xelatex texlive fancyhdr وسط‌چینی تک لایو 2015 tcolorbox عنوان بخش شماره گذاری به‌روزرسانی بسته aimc46 صفر توخالی فرمول طولانی بیرون‌زدگی کاما پوستر فاصله سطرها نوشتافت شکست خط tex-programming فونت اعداد قرآن tabriz-thesis
...