実力演習得点記入シート

\documentclass[b5j,6pt,noaux,2in1]{tetsujsarticle}
\usepackage{tetsuchem}
\余白設定[%
上余白=.5truecm,
下余白=.5truecm,
左余白=.8truecm,
左右差=0truecm,
段間隔=6zw,
段組の仕切り線の太さ=0truept,
ヘッダの縦幅=10truept,
ヘッダ下端と本文上端の縦間隔=0truept,
ヘッダと本文を仕切る線の太さ=0truept,
本文下端とフッタ下端の縦間隔=0truept,
本文とフッタを仕切る線の太さ=0truept,
傍注領域の幅=0zw,
本文端と傍注領域との間隔=0truept,
傍注同士の縦間隔=\baselineskip,
奇数ページの傍注位置=右,
偶数ページの傍注位置=左,
傍注の一部利用=しない,
]

\definecolor{framecolor}{gray}{0}
\definecolor{dotcolor}{gray}{0.2}
\definecolor{fillbackcolor}{gray}{0.8}

\DeclareTColorBox{タイトルボックス}{ o m O{3} O{}}%
{enhanced, colback=fillbackcolor, colframe=white,
attach boxed title to top left={xshift=1cm,yshift=-\tcboxedtitleheight/2}, fonttitle=\bfseries,varwidth boxed title=0.7\linewidth, coltitle=black, fonttitle=\gtfamily, 
enlarge top by=2mm, enlarge bottom by=2mm, breakable,
boxed title style={colback=white,left=0mm,right=0mm}, 
borderline={.75pt}{#3pt}{dotcolor,dotted},
underlay unbroken={\draw[framecolor,line width=.5pt]
       ([xshift=-#3*4pt]frame.north east) 
       arc [start angle=180, end angle=270, radius=#3*4pt] 
       -- ([yshift=#3*4pt]frame.south east) 
       arc [start angle=90, end angle=180, radius=#3*4pt] 
       -- ([xshift=#3*4pt]frame.south west)
       arc [start angle=0, end angle=90, radius=#3*4pt] 
       -- ([yshift=-#3*4pt]frame.north west)
       arc [start angle=270, end angle=360, radius=#3*4pt] 
       -- cycle ;
       \filldraw[fill=dotcolor,draw=gray]
       (frame.north east) -- +(0pt,-#3*2pt) -- +(-#3*2pt,-#3*2pt) -- +(-#3*2pt,0pt) -- cycle;
       \filldraw[fill=dotcolor,draw=gray]
       (frame.south east) -- +(-#3*2pt,0pt) -- +(-#3*2pt,#3*2pt) -- +(0pt,#3*2pt) -- cycle;
       \filldraw[fill=dotcolor,draw=gray]
       (frame.south west) -- +(0pt,#3*2pt) -- +(#3*2pt,#3*2pt) -- +(#3*2pt,0pt) -- cycle;
       \filldraw[fill=dotcolor,draw=gray]
       (frame.north west) -- +(0pt,-#3*2pt) -- +(#3*2pt,-#3*2pt) -- +(#3*2pt,0pt) -- cycle;
       },
underlay first={\draw[framecolor,line width=.5pt]
       ([xshift=-#3*4pt]frame.north east) 
       arc [start angle=180, end angle=270, radius=#3*4pt] 
       -- (frame.south east) ;
       \draw[black,line width=.5pt]
       (frame.south west)
       -- ([yshift=-#3*4pt]frame.north west)
       arc [start angle=270, end angle=360, radius=#3*4pt] 
      ;
       \filldraw[fill=dotcolor,draw=dotcolor]
       (frame.north east) -- +(0pt,-#3*2pt) -- +(-#3*2pt,-#3*2pt) -- +(-#3*2pt,0pt) -- cycle;
       \filldraw[fill=dotcolor,draw=dotcolor]
       (frame.north west) -- +(0pt,-#3*2pt) -- +(#3*2pt,-#3*2pt) -- +(#3*2pt,0pt) -- cycle;
       },
underlay middle={\draw[dotcolor,line width=.5pt]
       (frame.north east)--(frame.south east) ;
       \draw[black,line width=.5pt]
       (frame.south west)--(frame.north west) ;
       },
underlay last={\draw[dotcolor,line width=.5pt]
       (frame.north east) -- ([yshift=#3*4pt]frame.south east) 
       arc [start angle=90, end angle=180, radius=#3*4pt] 
       -- ([xshift=#3*4pt]frame.south west)
       arc [start angle=0, end angle=90, radius=#3*4pt] 
       -- (frame.north west);
              \filldraw[fill=dotcolor,draw=dotcolor]
       (frame.south east) -- +(-#3*2pt,0pt) -- +(-#3*2pt,#3*2pt) -- +(0pt,#3*2pt) -- cycle;
       \filldraw[fill=dotcolor,draw=dotcolor]
       (frame.south west) -- +(0pt,#3*2pt) -- +(#3*2pt,#3*2pt) -- +(#3*2pt,0pt) -- cycle;
       },#4}




\def\満点#1{/ #1\makebox[5pt]{}}

\def\点数ボックス#1#2{%
\parboxx{\centering\Large
\baselineskip=20pt
\tabcolsep=3pt
\begin{tabular}{IC{5zw}IcIr|rI}\hlineb
\ifthenelse{\equal{#1}{難関大}}{\cellcolor[gray]{0.75}\sffamily}{}%
\ifthenelse{\equal{#1}{東大}}{\cellcolor[gray]{0.20}\color{white}\fsize{15pt}\HiraKakuWFivefamily}{}%
\ifthenelse{\equal{#1}{医学部}}{\cellcolor[gray]{0.75}\sffamily}{}%
\ifthenelse{\equal{#1}{超難関大}}{\cellcolor[gray]{0.20}\color{white}\fsize{12pt}\HiraKakuWFivefamily}{}%
#1対策& \Large \sffamily 実施日 &  \Large \sffamily １回目(\kern2zw/\kern2zw) & \Large \sffamily ２回目(\kern2zw/\kern2zw) \\\hlineb
 & 第１問 & \満点{20}& \満点{20}  \\\cline{2-4}
\multirow{2}{*}{第\単発tetsuarabic{#2}回} & 第２問 & \満点{20}& \満点{20}\\\cline{2-4}
 & 第３問 & \満点{20}& \満点{20}\\\clineb{2-4}
 & \HiraKakuWFivefamily 合計点  &\HiraKakuWFivefamily  \満点{60}& \HiraKakuWFivefamily \満点{60}\\\hlineb
\end{tabular}}\par\vspace{5pt}}


\begin{document}

\begin{multicols*}{2}\centering\parindent0zw
~\br{-1}\vspace{-4pt}
\begin{jquotation}(0zw)(-1.3zw)[0pt]
\begin{タイトルボックス}{}
\vspace{29pt}
\KleeDemiboldfamily\fsize{40pt}\noindent \hfil\makebox[0zw][c]{\rotatebox[origin=c]{-90}{\鉛筆}\hspace{.2zw}得点記入シート\鉛筆}
\vspace{29pt}
\end{タイトルボックス}
\end{jquotation}

\vspace{-4pt}

\点数ボックス{難関大}{1}
\点数ボックス{難関大}{2}
\点数ボックス{難関大}{3}
\点数ボックス{難関大}{4}
\点数ボックス{難関大}{5}
\点数ボックス{難関大}{6}
\点数ボックス{難関大}{7}
\点数ボックス{難関大}{8}
\点数ボックス{難関大}{9}
\点数ボックス{難関大}{10}
\点数ボックス{難関大}{11}
\点数ボックス{難関大}{12}
\点数ボックス{難関大}{13}
\点数ボックス{難関大}{14}
\点数ボックス{難関大}{15}
\点数ボックス{難関大}{16}
\点数ボックス{難関大}{17}
\点数ボックス{難関大}{18}
\点数ボックス{難関大}{19}
\点数ボックス{難関大}{20}
\点数ボックス{東大}{21}
\点数ボックス{東大}{22}
\点数ボックス{東大}{23}
\点数ボックス{東大}{24}
\点数ボックス{東大}{25}
\点数ボックス{東大}{26}
\点数ボックス{医学部}{27}
\点数ボックス{医学部}{28}
\点数ボックス{医学部}{29}
\点数ボックス{医学部}{30}
\点数ボックス{超難関大}{31}
\点数ボックス{超難関大}{32}
\点数ボックス{超難関大}{33}
\点数ボックス{超難関大}{34}
\点数ボックス{超難関大}{35}
\end{multicols*}

\end{document}