simplify codes.

add ASCII environment.
add IDC shorthand.

diff --git a/chise.sty b/chise.sty
index ec215df..b5b61fb 100644 (file)
--- a/chise.sty
+++ b/chise.sty
@@ -179,11 +179,12 @@
 %\def\KS{\pushocplist\CJKadjust\selectksxfont}
 %\def\CNS{\pushocplist\CJKadjust\selectcnsfont}
 
-\newenvironment{JISfont}{\pushocplist\uniJIS\selectjisfont}{\pushocplist\inutf}
-\newenvironment{GBfont}{\pushocplist\uniGB\selectgbsfont}{\pushocplist\inutf}
-\newenvironment{KSfont}{\pushocplist\uniKS\selectksxfont}{\pushocplist\inutf}
-\newenvironment{CNSfont}{\pushocplist\uniCNS\selectcnsfont}{\pushocplist\inutf}
-\newenvironment{Multifont}{\pushocplist\uniMulti}{\pushocplist\inutf}
+\newenvironment{JISfont}{\pushocplist\uniJIS\selectjisfont}{}
+\newenvironment{GBfont}{\pushocplist\uniGB\selectgbsfont}{}
+\newenvironment{KSfont}{\pushocplist\uniKS\selectksxfont}{}
+\newenvironment{CNSfont}{\pushocplist\uniCNS\selectcnsfont}{}
+\newenvironment{Multifont}{\pushocplist\uniMulti}{}
+\newenvironment{ASCII}{\pushocplist\NilOCP\fontencoding{T1}\fontfamily{\rmdefault}\selectfont}{}
 
 \newcommand{\jisfont}[1]{\begingroup%
   \pushocplist\uniJIS\selectjisfont #1\endgroup}
@@ -197,8 +198,27 @@
   \pushocplist\uniMulti #1\endgroup}
 \newcommand{\noncjk}[1]{\begingroup%
   \normalfont\pushocplist\inutf #1\endgroup}
+\newcommand{\ascii}[1]{\begingroup%
+  \pushocplist\NilOCP\fontencoding{T1}\fontfamily{\rmdefault}\selectfont #1\endgroup}
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% IDC shorthand
+% -------------
+\def\idc@#1{{\selectgbsfont\clearocplists\char"#1}}
+\def\idcltr{\idc@{2FF0}}
+\def\idcatb{\idc@{2FF1}}
+\def\idcltmr{\idc@{2FF2}}
+\def\idcatmb{\idc@{2FF3}}
+\def\idcfs{\idc@{2FF4}}
+\def\idcsfa{\idc@{2FF5}}
+\def\idcsfb{\idc@{2FF6}}
+\def\idcsfl{\idc@{2FF7}}
+\def\idcsful{\idc@{2FF8}}
+\def\idcsfur{\idc@{2FF9}}
+\def\idcsfll{\idc@{2FFA}}
+\def\idcol{\idc@{2FFB}}
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % Font Declaration
 % ----------------
 %% omgbs