\newcatcodetable\kcjcatcodes
\newcatcodetable\cjkcatcodes

\startcatcodetable \kcjcatcodes
    \catcode`\\ = 0
    \catcode`\{ = 1
    \catcode`\} = 2
    \catcode`\「 = 13
    \catcode`\」 = 13
    \catcode`\（ = 13
    \catcode`\） = 13
    \catcode`\。 = 13
    \catcode`\、 = 13
    \catcode`\： = 13
    \catcode`\・ = 13
    \catcode`\， = 13
\stopcatcodetable

\startcatcodetable \cjkcatcodes
    \catcode`\\ = 0
    \catcode`\{ = 1
    \catcode`\} = 2
    \catcode`\「 = 13
    \catcode`\」 = 13
    \catcode`\（ = 13
    \catcode`\） = 13
    \catcode`\。 = 13
    \catcode`\、 = 13
    \catcode`\： = 13
    \catcode`\・ = 13
    \catcode`\， = 13
\stopcatcodetable

\defcatcodecommand \kcjcatcodes `\「 {\hbox{\char`\「}}
\defcatcodecommand \kcjcatcodes `\」 {\hbox{\char`\」}}
\defcatcodecommand \kcjcatcodes `\（ {\hbox{\char`\（}}
\defcatcodecommand \kcjcatcodes `\） {\hbox{\char`\）}}
\defcatcodecommand \kcjcatcodes `\。 {\hbox{\char`\。}}
\defcatcodecommand \kcjcatcodes `\、 {\hbox{\char`\、}}
\defcatcodecommand \kcjcatcodes `\： {\hbox{\char`\：}}
\defcatcodecommand \kcjcatcodes `\・ {\hbox{\char`\・}}
\defcatcodecommand \kcjcatcodes `\， {\hbox{\char`\，}}

\defcatcodecommand \cjkcatcodes `\「 {\hbox to .5em{\hss\char`\「}}
\defcatcodecommand \cjkcatcodes `\」 {\hbox to .5em{\char`\」\hss}}
\defcatcodecommand \cjkcatcodes `\（ {\hbox to .5em{\hss\char`\（}}
\defcatcodecommand \cjkcatcodes `\） {\hbox to .5em{\char`\）\hss}}
\defcatcodecommand \cjkcatcodes `\。 {\hbox to .5em{\char`\。\hss}}
\defcatcodecommand \cjkcatcodes `\、 {\hbox to .5em{\char`\、\hss}}
\defcatcodecommand \cjkcatcodes `\： {\hbox to .5em{\hss\char`\：\hss}}
\defcatcodecommand \cjkcatcodes `\・ {\hbox to .5em{\hss\char`\・\hss}}
\defcatcodecommand \cjkcatcodes `\， {\hbox to .5em{\char`\，\hss}}

\definefontfeature[hori][mode=node,script=latn,lang=dflt]

\definefont[mincho][name:kozukaminchoprovirbook*hori]

\def\2{\hskip.50em\relax}
\def\4{\hskip.25em\relax}

\starttext

\startbuffer

{\mincho\catcodetable\kcjcatcodes
この「日本語組版規則」は，文字の配置法を規定する。}

\blank

{\mincho\catcodetable\cjkcatcodes
この「日本語組版規則」は，文字の配置法を規定する。}

\blank

{\mincho\catcodetable\cjkcatcodes
この\2「日本語組版規則」\2は，\2文字の配置法を規定する。}

\blank[2*line]

{\mincho\catcodetable\kcjcatcodes
東京・大阪・名古屋などの大都市圏における\crlf
男子（成人だけ）・（１８歳以上の）女子の}

\blank

{\mincho\catcodetable\cjkcatcodes
東京・大阪・名古屋などの大都市圏における\crlf
男子（成人だけ）・（１８歳以上の）女子の}

\blank

{\mincho\catcodetable\cjkcatcodes
東京\4・\4大阪\4・\4名古屋などの大都市圏における\crlf
男子\2（成人だけ）\4・\4（１８歳以上の）\2女子の}

\blank[2*line]

{\mincho\catcodetable\kcjcatcodes
この「（日木語）」「組版」（規則）では}

\blank

{\mincho\catcodetable\cjkcatcodes
この「（日木語）」「組版」（規則）では}

\blank

{\mincho\catcodetable\cjkcatcodes
この\2「（日木語）」\2「組版」\2（規則）\2では}

\blank[2*line]

{\mincho\catcodetable\kcjcatcodes
これは「日木語です。」とのこと，\crlf
また「組版です」。「原則的規則」を}

\blank

{\mincho\catcodetable\cjkcatcodes
これは「日木語です。」とのこと，\crlf
また「組版です」。「原則的規則」を}

\blank

{\mincho\catcodetable\cjkcatcodes
これは\2「日木語です。」\2とのこと，\crlf
また\2「組版です」。\2「原則的規則」\2を}

\stopbuffer

\getbuffer

\page

\showmakeup

\getbuffer

\stoptext
