Skip to content

Commit

Permalink
make jisfile
Browse files Browse the repository at this point in the history
  • Loading branch information
@aminophen
aminophen committed Apr 6, 2019
1 parent 543099c commit 11d483f
Show file tree
Hide file tree
Showing 6 changed files with 191 additions and 72 deletions.
41 changes: 30 additions & 11 deletions jis/jsarticle.cls
View file
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@
%% in the same archive or directory.)
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{jsarticle}
[2018/12/11 jsclasses (okumura, texjporg)]
[2019/04/06 jsclasses (okumura, texjporg)]
\def\jsc@clsname{jsarticle}
\newif\ifjsc@needsp@tch
\jsc@needsp@tchfalse
Expand Down Expand Up @@ -1885,23 +1885,42 @@
\def\$B@>Nq(B{\$B@>Nq(Btrue}
\def\$BOBNq(B{\$B@>Nq(Bfalse}
\newcount\heisei \heisei\year \advance\heisei-1988\relax
\def\pltx@today@year@#1{%
\ifnum\numexpr\year-#1=1 $B85(B\else
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\numexpr\year-#1\relax
\else
\number\numexpr\year-#1\relax\nobreak
\fi
\fi $BG/(B
}
\def\pltx@today@year{%
\ifnum\numexpr\year*10000+\month*100+\day<19890108
$B><OB(B\pltx@today@year@{1925}%
\else\ifnum\numexpr\year*10000+\month*100+\day<20190501
$BJ?@.(B\pltx@today@year@{1988}%
\else
$BNaOB(B\pltx@today@year@{2018}%
\fi\fi}
\def\today{%
\if@english
\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year
\else\if$B@>Nq(B
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi \kansuji\year
\else\number\year\nobreak\fi $BG/(B
\else
\if$B@>Nq(B
\number\year $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\else
$BJ?@.(B\number\heisei $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\fi
\fi}
\pltx@today@year
\fi
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\month $B7n(B
\kansuji\day $BF|(B
\else
\number\month\nobreak $B7n(B
\number\day\nobreak $BF|(B
\fi\fi}
\hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script}
\if@slide \pagestyle{empty} \else \pagestyle{plain} \fi
\pagenumbering{arabic}
Expand Down
41 changes: 30 additions & 11 deletions jis/jsbook.cls
View file
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@
%% in the same archive or directory.)
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{jsbook}
[2018/12/11 jsclasses (okumura, texjporg)]
[2019/04/06 jsclasses (okumura, texjporg)]
\def\jsc@clsname{jsbook}
\newif\ifjsc@needsp@tch
\jsc@needsp@tchfalse
Expand Down Expand Up @@ -1976,23 +1976,42 @@
\def\$B@>Nq(B{\$B@>Nq(Btrue}
\def\$BOBNq(B{\$B@>Nq(Bfalse}
\newcount\heisei \heisei\year \advance\heisei-1988\relax
\def\pltx@today@year@#1{%
\ifnum\numexpr\year-#1=1 $B85(B\else
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\numexpr\year-#1\relax
\else
\number\numexpr\year-#1\relax\nobreak
\fi
\fi $BG/(B
}
\def\pltx@today@year{%
\ifnum\numexpr\year*10000+\month*100+\day<19890108
$B><OB(B\pltx@today@year@{1925}%
\else\ifnum\numexpr\year*10000+\month*100+\day<20190501
$BJ?@.(B\pltx@today@year@{1988}%
\else
$BNaOB(B\pltx@today@year@{2018}%
\fi\fi}
\def\today{%
\if@english
\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year
\else\if$B@>Nq(B
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi \kansuji\year
\else\number\year\nobreak\fi $BG/(B
\else
\if$B@>Nq(B
\number\year $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\else
$BJ?@.(B\number\heisei $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\fi
\fi}
\pltx@today@year
\fi
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\month $B7n(B
\kansuji\day $BF|(B
\else
\number\month\nobreak $B7n(B
\number\day\nobreak $BF|(B
\fi\fi}
\hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script}
\if@report \pagestyle{plain} \else \pagestyle{headings} \fi
\pagenumbering{arabic}
Expand Down
58 changes: 41 additions & 17 deletions jis/jsclasses.dtx
View file
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,7 @@
%
% Copyright 1995-1999 ASCII Corporation.
% Copyright 1999-2016 Haruhiko Okumura
% Copyright 2016-2018 Japanese TeX Development Community
% Copyright 2016-2019 Japanese TeX Development Community
%
% \fi
%
Expand All @@ -26,7 +26,7 @@
%<*driver>
\ProvidesFile{jsclasses.dtx}
%</driver>
[2018/12/11 jsclasses (okumura, texjporg)]
[2019/04/06 jsclasses (okumura, texjporg)]
%<*driver>
\documentclass{jsarticle}
\usepackage{doc}
Expand Down Expand Up @@ -879,7 +879,7 @@
\fi
\ifnum\@ptsize=-1
\def\n@baseline{15}%
\fi
\fi
\fi
%<*kiyou>
\def\jsc@magscale{0.9769230}
Expand All @@ -888,7 +888,7 @@
\def\inv@mag{1.02354}
\jsc@mpt=1\p@
\jsc@mmm=1mm
\else
\else
\jsc@mpt=\jsc@magscale\p@
\jsc@mmm=\jsc@magscale mm
\def\inv@mag{1}
Expand Down Expand Up @@ -1335,10 +1335,10 @@
\xspcode`+=3
\xspcode`\%=3
% \end{macrocode}
%
%
% $B$3$l0J30$K(BT1$B%(%s%3!<%G%#%s%0$G(B80$B!A(Bff$B$NJ8;z$b$9$Y$F2$J8J8;z$G$9$N$G!$(B
% $BN>B&$NOBJ8J8;z$H$N4V$K%9%Z!<%9$,F~$i$J$1$l$P$J$j$^$;$s!#(B
%
%
% \begin{macrocode}
\xspcode`^^80=3
\xspcode`^^81=3
Expand Down Expand Up @@ -5861,32 +5861,56 @@
% \paragraph{$B:#F|$NF|IU(B}
%
% \LaTeX $B$G=hM}$7$?F|IU$r=PNO$7$^$9!#(B
% |jarticle| $B$J$I$H0c$C$F!$I8=`$r@>Nq$K$7!$M>J,$J6uGr$,F~$i$J$$$h$&$K2~NI$7$^$7$?!#(B
% ^^A |jarticle| $B$J$I$H0c$C$F!$I8=`$r@>Nq$K$7!$(B
% ^^A $BM>J,$J6uGr$,F~$i$J$$$h$&$K2~NI$7$^$7$?!#(B
% ^^A -- 2018$BG/(B7$B7n0J9_$O(B |jarticle| $B$J$I$bI8=`$,@>Nq!$(B
% ^^A -- 2019$BG/(B4$B7n0J9_$OM>J,$J6uGr$,F~$i$J$/$J$C$F$$$^$9!#(B
% $BOBNq$K$9$k$K$O(B |\$BOBNq(B| $B$H=q$$$F$/$@$5$$!#(B
% $B$A$J$_$K$3$NJ8>O$N:[email protected]|$O@>Nq$G$O(B{\$B@>Nq(B\today}$B$G!$(B
% $BOBNq$G$O(B{\$BOBNq(B\today}$B$G$9!#(B
%
% \begin{macro}{\today}
% \begin{macrocode}
\newif\if$B@>Nq(B \$B@>Nq(Btrue
\def\$B@>Nq(B{\$B@>Nq(Btrue}
\def\$BOBNq(B{\$B@>Nq(Bfalse}
\newcount\heisei \heisei\year \advance\heisei-1988\relax
\def\pltx@today@year@#1{%
\ifnum\numexpr\year-#1=1 $B85(B\else
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\numexpr\year-#1\relax
\else
\number\numexpr\year-#1\relax\nobreak
\fi
\fi $BG/(B
}
\def\pltx@today@year{%
\ifnum\numexpr\year*10000+\month*100+\day<19890108
$B><OB(B\pltx@today@year@{1925}%
\else\ifnum\numexpr\year*10000+\month*100+\day<20190501
$BJ?@.(B\pltx@today@year@{1988}%
\else
$BNaOB(B\pltx@today@year@{2018}%
\fi\fi}
\def\today{%
\if@english
\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year
\else\if$B@>Nq(B
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi \kansuji\year
\else\number\year\nobreak\fi $BG/(B
\else
\if$B@>Nq(B
\number\year $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\else
$BJ?@.(B\number\heisei $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\fi
\fi}
\pltx@today@year
\fi
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\month $B7n(B
\kansuji\day $BF|(B
\else
\number\month\nobreak $B7n(B
\number\day\nobreak $BF|(B
\fi\fi}
% \end{macrocode}
% \end{macro}
%
Expand Down
41 changes: 30 additions & 11 deletions jis/jspf.cls
View file
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@
%% in the same archive or directory.)
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{jspf}
[2018/12/11 jsclasses (okumura, texjporg)]
[2019/04/06 jsclasses (okumura, texjporg)]
\def\jsc@clsname{jspf}
\newif\ifjsc@needsp@tch
\jsc@needsp@tchfalse
Expand Down Expand Up @@ -1727,23 +1727,42 @@
\def\$B@>Nq(B{\$B@>Nq(Btrue}
\def\$BOBNq(B{\$B@>Nq(Bfalse}
\newcount\heisei \heisei\year \advance\heisei-1988\relax
\def\pltx@today@year@#1{%
\ifnum\numexpr\year-#1=1 $B85(B\else
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\numexpr\year-#1\relax
\else
\number\numexpr\year-#1\relax\nobreak
\fi
\fi $BG/(B
}
\def\pltx@today@year{%
\ifnum\numexpr\year*10000+\month*100+\day<19890108
$B><OB(B\pltx@today@year@{1925}%
\else\ifnum\numexpr\year*10000+\month*100+\day<20190501
$BJ?@.(B\pltx@today@year@{1988}%
\else
$BNaOB(B\pltx@today@year@{2018}%
\fi\fi}
\def\today{%
\if@english
\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year
\else\if$B@>Nq(B
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi \kansuji\year
\else\number\year\nobreak\fi $BG/(B
\else
\if$B@>Nq(B
\number\year $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\else
$BJ?@.(B\number\heisei $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\fi
\fi}
\pltx@today@year
\fi
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\month $B7n(B
\kansuji\day $BF|(B
\else
\number\month\nobreak $B7n(B
\number\day\nobreak $BF|(B
\fi\fi}
\hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script}
\pagestyle{headings}
\pagenumbering{arabic}
Expand Down
41 changes: 30 additions & 11 deletions jis/jsreport.cls
View file
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@
%% in the same archive or directory.)
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{jsreport}
[2018/12/11 jsclasses (okumura, texjporg)]
[2019/04/06 jsclasses (okumura, texjporg)]
\def\jsc@clsname{jsreport}
\newif\ifjsc@needsp@tch
\jsc@needsp@tchfalse
Expand Down Expand Up @@ -1970,23 +1970,42 @@
\def\$B@>Nq(B{\$B@>Nq(Btrue}
\def\$BOBNq(B{\$B@>Nq(Bfalse}
\newcount\heisei \heisei\year \advance\heisei-1988\relax
\def\pltx@today@year@#1{%
\ifnum\numexpr\year-#1=1 $B85(B\else
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\numexpr\year-#1\relax
\else
\number\numexpr\year-#1\relax\nobreak
\fi
\fi $BG/(B
}
\def\pltx@today@year{%
\ifnum\numexpr\year*10000+\month*100+\day<19890108
$B><OB(B\pltx@today@year@{1925}%
\else\ifnum\numexpr\year*10000+\month*100+\day<20190501
$BJ?@.(B\pltx@today@year@{1988}%
\else
$BNaOB(B\pltx@today@year@{2018}%
\fi\fi}
\def\today{%
\if@english
\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year
\else\if$B@>Nq(B
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi \kansuji\year
\else\number\year\nobreak\fi $BG/(B
\else
\if$B@>Nq(B
\number\year $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\else
$BJ?@.(B\number\heisei $BG/(B
\number\month $B7n(B
\number\day $BF|(B
\fi
\fi}
\pltx@today@year
\fi
\ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
\kansuji\month $B7n(B
\kansuji\day $BF|(B
\else
\number\month\nobreak $B7n(B
\number\day\nobreak $BF|(B
\fi\fi}
\hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script}
\pagestyle{plain}
\pagenumbering{arabic}
Expand Down
Loading

0 comments on commit 11d483f

Please sign in to comment.