% latexmk -pdfdvi -pvc sebyousi で継続コンパイル。設定と詳細は .latexmkrc 
\documentclass[a4j,11pt]{utarticle}
\usepackage{plext}
\usepackage{xstring}
\usepackage{ifthen}
\usepackage{xcolor}
\usepackage{xparse}
\usepackage{ifthen}
\usepackage{setspace}


\setlength{\textwidth}{210mm}         %%A4の幅 
\setlength{\textheight}{297mm}        %%A4の高さ 
\setlength{\oddsidemargin}{-25.4mm}   %%左横マージンを0にする 
\setlength{\topmargin}{-25.4mm}       %%上マージンを0にする 
\setlength{\headheight}{14mm} 
\setlength{\headsep}{0mm} 
\special{papersize=210mm,297mm} %%A4の大きさにページサイズを指定 

\pagestyle{empty} %%ページ番号を出力しない 

% \setlength{\textheight}{9.5in}
% \setlength{\parskip}{0em}
% \setlength{\topsep}{0em}

% 基準線の長さ(ここを420とかにすると、上下の線がつながる)
\newcounter{tombow}\setcounter{tombow}{5}

% 著者と著者の距離  16 (+20) 36 (+18)  54
\newcounter{ppos}\setcounter{ppos}{54}
\newcounter{pwidth}\setcounter{pwidth}{-18}% 幅

% \usepackage{tikz}%（これで、pgfとpgfforが読み込まれます。）
\makeatletter
\@tfor\x:=0123456789\do{\kansujichar\x=\jis"233\x\relax}
\makeatother

%% 年度を半角数字で記入
\newcommand{\nendo}{令和\kansuji 5 年度 卒業論文} 
% \kansuji のあとは半角数字でよい。全角数字に変換するので。

\newcommand{\Acap}{Ａ} %全角大文字のA

% 学生番号のAで区切って（パターンマッチング）、前半と後半を取り出す(Aは単なる区切り文字)
% xstringパッケージの\StrMid \StrLeft \StrRight でも同様のことができそう
\makeatletter
\def\年部分#1{\年部分@#1\@nil}
\def\年部分@#1A#2\@nil{#1}
\def\番号部分#1{\番号部分@#1\@nil}
\def\番号部分@#1A#2\@nil{#2}
\makeatother

% (必須項目は{}，オプションは[] )
% {題目}{18A5040}{氏名1}[18A5123][氏名2][18A5123][氏名3]
% \NewDocumentEnvironment{sebyousi}{m m m m O{} o o O{} o o}{%
\NewDocumentEnvironment{sebyousi}{m m m O{} o O{} o}{%

\begin{picture}(500,173)(0,175.4)
% \begin{picture}(820,232.5)(0,-90)
\put(-45,100){\color{gray}{\line(1,0){\value{tombow}}}}
\put(-45,-13){\color{gray}{\line(1,0){\value{tombow}}}}
\put(-45,-73){\color{gray}{\line(1,0){\value{tombow}}}}
% \put(-35,0){\framebox(820,120){}}
% \put(0,0){\vector(1,0){80}}
% \put(0,0){\vector(0,1){60}}
\put(-10,78){\large \nendo}
\put(120,78){{\Large #1}}

\setcounter{ppos}{54}
\put(310,\value{ppos}){\large 情報通信システム工学科}
\put(450,\value{ppos}){\large \kansuji \年部分{#2} \Acap \kansuji \番号部分{#2}}
\put(540,\value{ppos}){\large #3}

%%% mynameB が定義されているときだけ
\ifthenelse{\equal{#4}{}}{}{
  \addtocounter{ppos}{\value{pwidth}} % ppos = ppos+pwidth
  \put(450,\value{ppos}){\large \kansuji \年部分{#4} \Acap \kansuji \番号部分{#4}}
  \put(540,\value{ppos}){\large #5}
}
%%% mynameC が定義されているときだけ
\ifthenelse{\equal{#6}{}}{}{
  \addtocounter{ppos}{\value{pwidth}} % ppos = ppos+pwidth
  \put(450,\value{ppos}){\large \kansuji \年部分{#6} \Acap \kansuji \番号部分{#6}}
  \put(540,\value{ppos}){\large #7}
}

% \ifdefined\mynameB
% \fi
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\addtocounter{ppos}{\value{pwidth}} % ppos = ppos+pwidth
\addtocounter{ppos}{-4} % ppos = ppos-4 (数字を減らすと教員が左に動く)
\put(450,\value{ppos}){\large 指導教員}
\put(513,\value{ppos}){\large 三浦 元喜 教授}

% \put(200,-30){\kansuji 5001}}
\put(-10,-44){\large \nendo}
\put(120,-44){{\Large #1}}

\put(787,100){\color{gray}{\line(-1,0){\value{tombow}}}}
\put(787,-13){\color{gray}{\line(-1,0){\value{tombow}}}}
\put(787,-73){\color{gray}{\line(-1,0){\value{tombow}}}}

\end{picture}
}

\begin{document}


%\sebyousi{題目}{18A5040}{氏名1}[18A5123][氏名2][18A5123][氏名3]
\sebyousi{背表紙の生成を簡素化するための手法とその評価\kansuji 1}{20A5555}{羅手歩 増人}
\sebyousi{背表紙の生成を簡素化するための手法とその評価\kansuji 2}{20A5555}{羅手歩 増人}
\sebyousi{背表紙の生成を簡素化するための手法とその評価\kansuji 3}{20A5555}{羅手歩 増人}
% \newpage



\end{document}
