summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/platex/pxbase
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2012-12-13 02:05:01 +0000
committerNorbert Preining <preining@logic.at>2012-12-13 02:05:01 +0000
commit9510165181f62f325d431680ced5d9784a02abbf (patch)
treebfc897a6af7848908dd5eecb68f9d4c990052873 /Master/texmf-dist/tex/platex/pxbase
parent7f8a6524083f3cd98b4d9c0599445baf12916244 (diff)
remove duplicate file pxcjkcat.sty
git-svn-id: svn://tug.org/texlive/trunk@28515 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/platex/pxbase')
-rw-r--r--Master/texmf-dist/tex/platex/pxbase/pxcjkcat.sty482
1 files changed, 0 insertions, 482 deletions
diff --git a/Master/texmf-dist/tex/platex/pxbase/pxcjkcat.sty b/Master/texmf-dist/tex/platex/pxbase/pxcjkcat.sty
deleted file mode 100644
index 45b1db0d212..00000000000
--- a/Master/texmf-dist/tex/platex/pxbase/pxcjkcat.sty
+++ /dev/null
@@ -1,482 +0,0 @@
-%
-% pxcjkcat.sty
-%
-%%%% package declaration
-\NeedsTeXFormat{pLaTeX2e}
-\ProvidesPackage{pxcjkcat}[2010/02/07 v0.4a PX cjk-category mode]
-\RequirePackage{ifuptex}[2008/03/14]\RequirenativeupTeX
-
-%%%% error messages
-\def\pxkc@pkgname{pxcjkcat}
-\def\pxkc@error{\PackageError\pxkc@pkgname}
-\def\pxkc@err@ivcsy#1{\pxkc@error
- {Invalid name (#1) for cjk-category}%
- {It was replaced by 18(cjk).}}
-\def\pxkc@err@ivbsy#1{\pxkc@error
- {Invalid name (#1) for Unicode block}\@eha}
-\def\pxkc@err@ivmsy#1{\pxkc@error
- {Invalid name (#1) for cjk-category mode}\@eha}
-\ifx\bxUseDebug\@undefined
-\let\pxkc@debug\@gobble
-\else
-\def\pxkc@debug#1{\typeout{**[\pxkc@pkgname] #1}}
-\fi
-
-%%%% prepraration
-\newif\ifpxkc@ok
-
-%%%% option handler
-\chardef\pxkc@mccv=1
-\DeclareOption{ccv1}{\chardef\pxkc@mccv=1 }
-\DeclareOption{ccv2}{\chardef\pxkc@mccv=2 }
-\chardef\pxkc@rccv=0
-%% ** These options are for debugging!
-\DeclareOption{@ccv1}{\chardef\pxkc@rccv=1 }
-\DeclareOption{@ccv2}{\chardef\pxkc@rccv=2 }
-\let\pxkc@ccmode\relax
-\DeclareOption*{\edef\pxkc@ccmode{\CurrentOption}}
-\ProcessOptions\relax
-
-%%-------- classification version check
-
-%% \pxkc@issameblock
-\def\pxkc@issameblock#1#2{%
- \pxkc@okfalse{\kcatcode#1=16\kcatcode#2=17\relax
- \ifnum\kcatcode#1=17 \aftergroup\pxkc@oktrue\fi}}
-\pxkc@issameblock{"FF01}{"FF11}
-\ifpxkc@ok
-\chardef\pxkc@ccv=1 % v0.11+
-\else
-\chardef\pxkc@ccv=2 % v0.29+
-\fi
-\ifnum\pxkc@rccv>\z@ \let\pxkc@ccv\pxkc@rccv \fi
-\pxkc@debug{CJK category version \number\pxkc@ccv}
-%
-\ifnum\pxkc@mccv>\pxkc@ccv
- \pxkc@error{Invalid mode-CCV option (ccv\number\pxkc@mccv)}%
- {The mode-CCV value given (\number\pxkc@mccv) is
- larger than the real CCV (\number\pxkc@ccv).\MessageBreak
- I assume the mode-CCV equals the real CCV.}
- \let\pxkc@mccv\pxkc@ccv
-\fi
-
-%%------ \setcjkcategory, etc.
-
-%% \pxkc@kcatcode
-\ifx\bxUseDebug\@undefined
-\def\pxkc@kcatcode#1#2{\kcatcode#1=#2\relax}
-\else
-\def\pxkc@kcatcode#1#2{\kcatcode#1=#2\relax
- \chardef\pxkc@xa=#1\chardef\pxkc@xb=#2\relax
- \expandafter\pxkc@kcatcode@a\meaning\pxkc@xa\@nil}
-\def\pxkc@kcatcode@a#1"#2\@nil{%
- \pxkc@debug{\string\kcatcode"#2 set to \number\pxkc@xb}}
-\fi
-
-
-%%%% table
-\def\pxkc@bval#1#2{%
- \edef\pxkc@bslst{\pxkc@bslst\pxkc@sep#1}%
- \@namedef{pxkc@B@@#1}{#2}\def\pxkc@sep{,}}
-\def\pxkc@bslst{}\def\pxkc@sep{}
-\def\pxkc@cval#1#2{\@namedef{pxkc@C@@#1}{#2}}
-\def\pxkc@gval#1#2{\@namedef{pxkc@G@@#1}{#2}}
- %
-\pxkc@bval{latn}{"0} % Basic Latin
-\pxkc@bval{latn1}{"80} % Latin-1 Supplement
-\pxkc@bval{latnA}{"100} % Latin Extended-A
-\pxkc@bval{latnB}{"180} % Latin Extended-B
-\pxkc@bval{latn2}{"250} % IPA Extensions
-\pxkc@bval{sym01}{"2B0} % Spacing Modifier Letters
-\pxkc@bval{sym02}{"300} % Combining Diacritical Marks
-\pxkc@bval{grek}{"370} % Greek and Coptic
-\pxkc@bval{cyrl}{"400} % Cyrillic
-\pxkc@bval{cyrl1}{"500} % Cyrillic Supplement
-\pxkc@bval{armn}{"530} % Armenian
-\pxkc@bval{hebr}{"590} % Hebrew
-\pxkc@bval{arab}{"600} % Arabic
-\pxkc@bval{syrc}{"700} % Syriac
-\pxkc@bval{arab1}{"750} % Arabic Supplement
-\pxkc@bval{thaa}{"780} % Thaana
-\pxkc@bval{nkoo}{"7C0} % NKo
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{samr}{"800} % Samaritan
-\fi
-\pxkc@bval{deva}{"900} % Devanagari
-\pxkc@bval{beng}{"980} % Bengali
-\pxkc@bval{guru}{"A00} % Gurmukhi
-\pxkc@bval{gujr}{"A80} % Gujarati
-\pxkc@bval{orya}{"B00} % Oriya
-\pxkc@bval{taml}{"B80} % Tamil
-\pxkc@bval{telu}{"C00} % Telugu
-\pxkc@bval{knda}{"C80} % Kannada
-\pxkc@bval{mlym}{"D00} % Malayalam
-\pxkc@bval{sinh}{"D80} % Sinhala
-\pxkc@bval{thai}{"E00} % Thai
-\pxkc@bval{laoo}{"E80} % Lao
-\pxkc@bval{tibt}{"F00} % Tibetan
-\pxkc@bval{mymr}{"1000} % Myanmar
-\pxkc@bval{geor}{"10A0} % Georgian
-\pxkc@bval{hang1}{"1100} % Hangul Jamo
-\pxkc@bval{ethi}{"1200} % Ethiopic
-\pxkc@bval{ethi1}{"1380} % Ethiopic Supplement
-\pxkc@bval{cher}{"13A0} % Cherokee
-\pxkc@bval{cans}{"1400} % Unified Canadian Aboriginal Syllabics
-\pxkc@bval{ogam}{"1680} % Ogham
-\pxkc@bval{runr}{"16A0} % Runic
-\pxkc@bval{tglg}{"1700} % Tagalog
-\pxkc@bval{hano}{"1720} % Hanunoo
-\pxkc@bval{buhd}{"1740} % Buhid
-\pxkc@bval{tagb}{"1760} % Tagbanwa
-\pxkc@bval{khmr}{"1780} % Khmer
-\pxkc@bval{mong}{"1800} % Mongolian
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{cans1}{"1880} % Unified Canadian Aboriginal Syll. Ext.
-\fi
-\pxkc@bval{limb}{"1900} % Limbu
-\pxkc@bval{tale}{"1950} % Tai Le
-\pxkc@bval{talu}{"1980} % New Tai Lue
-\pxkc@bval{khmr1}{"19E0} % Khmer Symbols
-\pxkc@bval{bugi}{"1A00} % Buginese
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{lana}{"1A20} % Tai Tham
-\fi
-\pxkc@bval{bali}{"1B00} % Balinese
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{sund}{"1B80} % Sundanese
-\pxkc@bval{lepc}{"1C00} % Lepcha
-\pxkc@bval{olck}{"1C50} % Ol Chiki
-\pxkc@bval{sym38}{"1CD0} % Vedic Extensions
-\fi
-\pxkc@bval{latn4}{"1D00} % Phonetic Extensions
-\pxkc@bval{latn5}{"1D80} % Phonetic Extensions Supplement
-\pxkc@bval{sym03}{"1DC0} % Combining Diacritical Marks Supplement
-\pxkc@bval{latn3}{"1E00} % Latin Extended Additional
-\pxkc@bval{grek1}{"1F00} % Greek Extended
-\pxkc@bval{sym04}{"2000} % General Punctuation
-\pxkc@bval{sym05}{"2070} % Superscripts and Subscripts
-\pxkc@bval{sym06}{"20A0} % Currency Symbols
-\pxkc@bval{sym07}{"20D0} % Combining Diacritical Marks for Symbols
-\pxkc@bval{sym08}{"2100} % Letterlike Symbols
-\pxkc@bval{sym09}{"2150} % Number Forms
-\pxkc@bval{sym10}{"2190} % Arrows
-\pxkc@bval{sym11}{"2200} % Mathematical Operators
-\pxkc@bval{sym12}{"2300} % Miscellaneous Technical
-\pxkc@bval{sym13}{"2400} % Control Pictures
-\pxkc@bval{sym14}{"2440} % Optical Character Recognition
-\pxkc@bval{sym15}{"2460} % Enclosed Alphanumerics
-\pxkc@bval{sym16}{"2500} % Box Drawing
-\pxkc@bval{sym17}{"2580} % Block Elements
-\pxkc@bval{sym18}{"25A0} % Geometric Shapes
-\pxkc@bval{sym19}{"2600} % Miscellaneous Symbols
-\pxkc@bval{sym20}{"2700} % Dingbats
-\pxkc@bval{sym21}{"27C0} % Miscellaneous Mathematical Symbols-A
-\pxkc@bval{sym22}{"27F0} % Supplemental Arrows-A
-\pxkc@bval{brai}{"2800} % Braille Patterns
-\pxkc@bval{sym23}{"2900} % Supplemental Arrows-B
-\pxkc@bval{sym24}{"2980} % Miscellaneous Mathematical Symbols-B
-\pxkc@bval{sym25}{"2A00} % Supplemental Mathematical Operators
-\pxkc@bval{sym26}{"2B00} % Miscellaneous Symbols and Arrows
-\pxkc@bval{glag}{"2C00} % Glagolitic
-\pxkc@bval{latnC}{"2C60} % Latin Extended-C
-\pxkc@bval{copt}{"2C80} % Coptic
-\pxkc@bval{geor1}{"2D00} % Georgian Supplement
-\pxkc@bval{tfng}{"2D30} % Tifinagh
-\pxkc@bval{ethi2}{"2D80} % Ethiopic Extended
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{cyrlA}{"2DE0} % Cyrillic Extended-A
-\fi
-\pxkc@bval{sym27}{"2E00} % Supplemental Punctuation
-\pxkc@bval{cjk01}{"2E80} % CJK Radicals Supplement
-\pxkc@bval{cjk02}{"2F00} % Kangxi Radicals
-\pxkc@bval{cjk03}{"2FF0} % Ideographic Description Characters
-\pxkc@bval{cjk04}{"3000} % CJK Symbols and Punctuation
-\pxkc@bval{hira}{"3040} % Hiragana
-\pxkc@bval{kana}{"30A0} % Katakana
-\pxkc@bval{bopo}{"3100} % Bopomofo
-\pxkc@bval{hang2}{"3130} % Hangul Compatibility Jamo
-\pxkc@bval{cjk05}{"3190} % Kanbun
-\pxkc@bval{bopo1}{"31A0} % Bopomofo Extended
-\pxkc@bval{cjk06}{"31C0} % CJK Strokes
-\pxkc@bval{kana1}{"31F0} % Katakana Phonetic Extensions
-\pxkc@bval{cjk07}{"3200} % Enclosed CJK Letters and Months
-\pxkc@bval{cjk08}{"3300} % CJK Compatibility
-\pxkc@bval{haniA}{"3400} % CJK Unified Ideographs Extension A
-\pxkc@bval{sym28}{"4DC0} % Yijing Hexagram Symbols
-\pxkc@bval{hani}{"4E00} % CJK Unified Ideographs
-\pxkc@bval{yiii}{"A000} % Yi Syllables
-\pxkc@bval{yiii1}{"A490} % Yi Radicals
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{lisu}{"A4D0} % Lisu
-\pxkc@bval{vaii}{"A500} % Vai
-\pxkc@bval{cyrlB}{"A640} % Cyrillic Extended-B
-\pxkc@bval{bamu}{"A6A0} % Bamum
-\fi
-\pxkc@bval{sym29}{"A700} % Modifier Tone Letters
-\pxkc@bval{latnD}{"A720} % Latin Extended-D
-\pxkc@bval{sylo}{"A800} % Syloti Nagri
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{sym39}{"A830} % Common Indic Number Forms
-\fi
-\pxkc@bval{phag}{"A840} % Phags-pa
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{saur}{"A830} % Saurashtra
-\pxkc@bval{deva1}{"A8E0} % Devanagari Extended
-\pxkc@bval{kali}{"A900} % Kayah Li
-\pxkc@bval{rjng}{"A930} % Rejang
-\pxkc@bval{hangA}{"A960} % Hangul Jamo Extended-A
-\pxkc@bval{java}{"A980} % Javanese
-\pxkc@bval{cham}{"AA00} % Cham
-\pxkc@bval{mymrA}{"AA60} % Myanmar Extended-A
-\pxkc@bval{tavt}{"AA80} % Tai Viet
-\pxkc@bval{mtei}{"ABC0} % Meetei Mayek
-\fi
-\pxkc@bval{hang}{"AC00} % Hangul Syllables
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{hangB}{"D7B0} % Hangul Jamo Extended-B
-\fi
-\pxkc@bval{spc01}{"D800} % High Surrogates
-\pxkc@bval{spc02}{"DB80} % High Private Use Surrogates
-\pxkc@bval{spc03}{"DC00} % Low Surrogates
-\pxkc@bval{spc04}{"E000} % Private Use Area
-\pxkc@bval{hani1}{"F900} % CJK Compatibility Ideographs
-\pxkc@bval{latn6}{"FB00} % Alphabetic Presentation Forms
-\pxkc@bval{arab2}{"FB50} % Arabic Presentation Forms-A
-\pxkc@bval{spc05}{"FE00} % Variation Selectors
-\pxkc@bval{cjk09}{"FE10} % Vertical Forms
-\pxkc@bval{sym30}{"FE20} % Combining Half Marks
-\pxkc@bval{cjk10}{"FE30} % CJK Compatibility Forms
-\pxkc@bval{cjk11}{"FE50} % Small Form Variants
-\pxkc@bval{arab3}{"FE70} % Arabic Presentation Forms-B
-\ifnum\pxkc@ccv<2
-\pxkc@bval{cjk12}{"FF00} % Halfwidth and Fullwidth Forms
-\else
-\pxkc@gval{cjk12}{cjk1a,cjk1b,cjk1c} % Halfwidth and Fullwidth Forms
-\pxkc@bval{cjk1a}{"FF01} % cjk12 subblock A
-\pxkc@bval{cjk1b}{"FF10} % cjk12 subblock B
-\pxkc@bval{cjk1c}{"FF66} % cjk12 subblock C
-\fi
-\pxkc@bval{spc06}{"FFF0} % Specials
-\pxkc@bval{linb}{"10000} % Linear B Syllabary
-\pxkc@bval{linb1}{"10080} % Linear B Ideograms
-\pxkc@bval{sym31}{"10100} % Aegean Numbers
-\pxkc@bval{grek2}{"10140} % Ancient Greek Numbers
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{sym40}{"10190} % Ancient Greek Numbers
-\pxkc@bval{sym41}{"101D0} % Ancient Greek Numbers
-\pxkc@bval{lyci}{"10280} % Ancient Greek Numbers
-\pxkc@bval{cari}{"102A0} % Ancient Greek Numbers
-\fi
-\pxkc@bval{ital}{"10300} % Old Italic
-\pxkc@bval{goth}{"10330} % Gothic
-\pxkc@bval{ugar}{"10380} % Ugaritic
-\pxkc@bval{xpeo}{"103A0} % Old Persian
-\pxkc@bval{dsrt}{"10400} % Deseret
-\pxkc@bval{shaw}{"10450} % Shavian
-\pxkc@bval{osma}{"10480} % Osmanya
-\pxkc@bval{cprt}{"10800} % Cypriot Syllabary
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{armi}{"10840} % Imperial Aramaic
-\fi
-\pxkc@bval{phnx}{"10900} % Phoenician
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{lydi}{"10920} % Lydian
-\fi
-\pxkc@bval{khar}{"10A00} % Kharoshthi
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{sarb}{"10A60} % Old South Arabian
-\pxkc@bval{avst}{"10B00} % Avestan
-\pxkc@bval{prti}{"10B40} % Inscriptional Parthian
-\pxkc@bval{phli}{"10B60} % Inscriptional Pahlavi
-\pxkc@bval{orkh}{"10C00} % Old Turkic
-\pxkc@bval{sym42}{"10E60} % Rumi Numeral Symbols
-\pxkc@bval{kthi}{"11080} % Kaithi
-\fi
-\pxkc@bval{xsux}{"12000} % Cuneiform
-\pxkc@bval{xsux1}{"12400} % Cuneiform Numbers and Punctuation
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{egyp}{"13000} % Egyptian Hieroglyphs
-\fi
-\pxkc@bval{sym32}{"1D000} % Byzantine Musical Symbols
-\pxkc@bval{sym33}{"1D100} % Musical Symbols
-\pxkc@bval{sym34}{"1D200} % Ancient Greek Musical Notation
-\pxkc@bval{sym35}{"1D300} % Tai Xuan Jing Symbols
-\pxkc@bval{sym36}{"1D360} % Counting Rod Numerals
-\pxkc@bval{sym37}{"1D400} % Mathematical Alphanumeric Symbols
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{sym43}{"1F000} % Mahjong Tiles
-\pxkc@bval{sym44}{"1F030} % Domino Tiles
-\pxkc@bval{sym45}{"1F100} % Enclosed Alphanumeric Supplement
-\pxkc@bval{cjk13}{"1F200} % Enclosed Ideographic Supplement
-\fi
-\pxkc@bval{haniB}{"20000} % CJK Unified Ideographs Extension B
-\ifnum\pxkc@ccv<2\else
-\pxkc@bval{haniC}{"2A700} % CJK Unified Ideographs Extension C
-\fi
-\pxkc@bval{hani2}{"2F800} % CJK Compatibility Ideographs Supplement
-\pxkc@bval{spc07}{"E0000} % Tags
-\pxkc@bval{spc08}{"E0100} % Variation Selectors Supplement
-\pxkc@bval{spc09}{"F0000} % Supplementary Private Use Area-A
-\pxkc@bval{spc10}{"100000} % Supplementary Private Use Area-B
-\pxkc@bval{spc11}{"200000} % illegal
- %
-\pxkc@cval{noncjk}{15}
-\pxkc@cval{kanji}{16}
-\pxkc@cval{han}{16}
-\pxkc@cval{kana}{17}
-\pxkc@cval{cjk}{18}
-\pxkc@cval{hangul}{19}
- %
-\edef\pxkc@foreachblk{\noexpand\@for\noexpand\x:={\pxkc@bslst}}
-\let\pxkc@bval\relax\let\pxkc@cval\relax\let\pxkc@bslst\relax
-
-%%<*> \cjkcategory{<block>}{<category>}
-% Sets the kcatcode of block <block> to <category>.
-% Here <block> is given as a block name or a single character in the
-% block to be specified; <category> is given as a category name or
-% a number ranged in 15--19.
-\def\cjkcategory{%
- \bgroup\forcecjktoken\pxkc@cjkcategory@oa}
-\def\pxkc@cjkcategory@oa#1{%
- \gdef\pxkc@nxt{\pxkc@cjkcategory@ob{#1}}%
- \egroup\pxkc@nxt}
-\def\pxkc@cjkcategory@ob#1#2{%
- \ifnum2<1#2 \edef\pxkc@arg{#2}%
- \else\@ifundefined{pxkc@C@@#2}%
- {\pxkc@err@ivcsy{#2}\def\pxkc@arg{18}}%
- {\edef\pxkc@arg{\@nameuse{pxkc@C@@#2}}}\fi
- \pxkc@cjkcategory@a{#1}}
-\chardef\pxkc@la="7F
-\def\pxkc@cjkcategory@a#1{%
- \@for\pxkc@x:={#1}\do{%
- \expandafter\pxkc@cjkcategory@b\expandafter{\pxkc@x}}}
-\def\pxkc@cjkcategory@b#1{%
- \pxkc@chkchr{#1}\ifnum\pxkc@cc>\pxkc@la
- \pxkc@kcatcode{\pxkc@cc}{\pxkc@arg}%
- \else\expandafter\ifx\csname pxkc@G@@#1\endcsname\relax
- \expandafter\ifx\csname pxkc@B@@#1\endcsname\relax
- \pxkc@err@ivbsy{#1}%
- \else \pxkc@kcatcode{\@nameuse{pxkc@B@@#1}}{\pxkc@arg}\fi
- \else \edef\pxkc@nxt{\noexpand\pxkc@cjkcategory@a
- {\@nameuse{pxkc@G@@#1}}}\pxkc@nxt
- \fi\fi}
-\def\pxkc@chkchr#1{%
- \afterassignment\pxkc@chkchr@a\chardef\pxkc@cc=`#1?\relax}
-\def\pxkc@chkchr@a#1\relax{}
-
-%%<*> \cjkcategorymode{<mode>}
-% Invokes the cjk-category mode <mode>.
-\def\cjkcategorymode#1{%
- \@ifundefined{pxkc@M@@#1}{\pxkc@err@ivmsy}
- {\@nameuse{pxkc@M@@#1}}}
-
-%%%% cjkcategory modes
-\def\pxkc@resetcjkcat{%
- \pxkc@foreachblk\do{\pxkc@kcatcode{\@nameuse{pxkc@B@@\x}}{18}}}
-\def\pxkc@M@@forcecjk{\pxkc@resetcjkcat
- \cjkcategory{latn}{noncjk}%
- \cjkcategory{bopo,bopo1,cjk01,cjk02,cjk03,cjk05,cjk06,hani,hani1}{kanji}%
- \cjkcategory{hani2,haniA,haniB}{kanji}%
- \cjkcategory{hira,kana,kana1}{kana}%
- \cjkcategory{hang,hang1,hang2}{hangul}%
- \ifnum\pxkc@mccv<2\else
- \cjkcategory{cjk1b,cjk1c}{kana}%
- \fi
- \ifnum\pxkc@ccv<2\else
- \cjkcategory{haniC}{kanji}%
- \cjkcategory{hangA,hangB}{hangul}%
- \fi
-}
-\def\pxkc@M@@prefercjk{\pxkc@M@@forcecjk
- \@for\x:={%
- cyrl1,armn,hebr,arab,syrc,arab1,thaa,nkoo,deva,beng,%
- guru,gujr,orya,taml,telu,knda,mlym,sinh,thai,laoo,%
- tibt,mymr,geor,ethi,ethi1,cher,cans,ogam,runr,tglg,%
- hano,buhd,tagb,khmr,mong,limb,tale,talu,khmr1,bugi,%
- bali,latn4,latn5,sym03,sym14,sym21,sym22,brai,sym25,glag,%
- latnC,copt,geor1,tfng,ethi2,sym27,sym28,sym29,latnD,sylo,%
- phag,spc01,spc02,spc03,arab2,spc05,sym30,arab3,spc06,linb,%
- linb1,sym31,grek2,ital,goth,ugar,xpeo,dsrt,shaw,osma,%
- cprt,phnx,khar,xsux,xsux1,sym32,sym33,sym34,sym35,sym36,%
- sym37,spc07,spc08,spc09,spc10%
- }\do{\pxkc@kcatcode{\@nameuse{pxkc@B@@\x}}{15}}%
- \ifnum\pxkc@ccv<2\else
- \cjkcategory{samr,cans1,lana,sund,lepc,olck,sym38,cyrlA}{noncjk}%
- \cjkcategory{lisu,vaii,cyrlB,bamu,sym39,saur,deva1,kali}{noncjk}%
- \cjkcategory{rjng,java,cham,mymrA,tavt,mtei,sym40,sym41}{noncjk}%
- \cjkcategory{lyci,cari,armi,lydi,sarb,avst,prti,phli}{noncjk}%
- \cjkcategory{orkh,sym42,kthi,egyp,sym43,sym44,sym45}{noncjk}%
- \fi
-}
-\@namedef{pxkc@M@@prefercjkvar}{\pxkc@M@@prefercjk
- \cjkcategory{cyrl,grek,grek1}{noncjk}%
-}
-\def\pxkc@M@@prefernoncjk{\pxkc@M@@prefercjkvar
- \cjkcategory{latn1,latn2,latn3,latn6,latnA,latnB,spc04,sym01}{noncjk}%
- \cjkcategory{sym02,sym04,sym05,sym06,sym07,sym08,sym09,sym10}{noncjk}%
- \cjkcategory{sym11,sym12,sym13,sym16,sym17,sym18,sym19,sym20}{noncjk}%
- \cjkcategory{sym23,sym24,sym26}{noncjk}%
-}
-\def\pxkc@M@@prefernoncjkvar{\pxkc@M@@prefernoncjk
- \cjkcategory{sym04,sym10,sym18}{other}%
-}
-
-%%%% \showcjkcategory
-\def\showcjkcategory{%
- \pxkc@foreachblk\do{%
- \typeout{\x\space= \the\kcatcode\@nameuse{pxkc@B@@\x}}}}
-
-%%-------- \withcjktokendisabled, etc.
-
-%% \pxkc@genprobe
-\def\pxkc@genprobe{%
- \edef\pxkc@tmpa{\expandafter\string\csname
- pxkc@@\string ^^e3\string ^^81\string ^^82%
- \string ^^e3\string ^^82\string ^^a2\endcsname}}
-\bgroup \kcatcode"3040=15\kcatcode"30A0=18
- \disablecjktoken\pxkc@genprobe \global\let\pxkc@prb@d\pxkc@tmpa
- \enablecjktoken\pxkc@genprobe \global\let\pxkc@prb@e\pxkc@tmpa
- \forcecjktoken\pxkc@genprobe \global\let\pxkc@prb@f\pxkc@tmpa
-\egroup
-
-%% \pxkc@getcjktokmod\CS
-\def\pxkc@getcjktokmod#1{%
- \bgroup \kcatcode"3040=15\kcatcode"30A0=18\pxkc@genprobe
- \ifx\pxkc@tmpa\pxkc@prb@d \global\chardef\pxkc@gtmpa\z@
- \else\ifx\pxkc@tmpa\pxkc@prb@e \global\chardef\pxkc@gtmpa\@ne
- \else\ifx\pxkc@tmpa\pxkc@prb@f \global\chardef\pxkc@gtmpa\tw@
- \else \global\let\pxkc@gtmpa\m@ne \fi\fi\fi
- \egroup \let#1\pxkc@gtmpa}
-
-%%<+> \getcjktokenmode
-% Returns the value showing current mode to \thecjktokenmode
-% 0: \disablecjktoken
-% 1: \enablecjktoken
-% 2: \forcecjktoken
-\def\getcjktokenmode{\pxkc@getcjktokmod\thecjktokenmode}
-
-%%<*> \setcjktokenmode{<val>}
-\def\pxkc@setcjktokmod#1{%
- \ifcase#1\disablecjktoken\or\enablecjktoken\or\forcecjktoken\fi}
-
-%%<*> \withcjktokendisabled, etc.
-\def\withcjktokendisabled{\pxkc@withcjktokmod\disablecjktoken\@iden}
-\def\withcjktokenenabled{\pxkc@withcjktokmod\enablecjktoken\@iden}
-\def\withcjktokenforced{\pxkc@withcjktokmod\forcecjktoken\@iden}
-\def\withcjktokendisabledex{\pxkc@withcjktokmod\disablecjktoken}
-\def\withcjktokenenabledex{\pxkc@withcjktokmod\enablecjktoken}
-\def\withcjktokenforcedex{\pxkc@withcjktokmod\forcecjktoken}
-\def\pxkc@withcjktokmod#1{%
- \pxkc@getcjktokmod\pxkc@tokmod #1\pxkc@withcjktokmod@a}
-\def\pxkc@withcjktokmod@a#1#2{%
- #1{#2}\pxkc@setcjktokmod\pxkc@tokmod}
-
-%%------ initial setup
-
-\ifx\pxkc@ccmode\relax\else
-\cjkcategorymode{\pxkc@ccmode}
-\fi
-
-%%------ all done
-\endinput
-%% EOF