blob: d85050972da7ba77f9c28e8923586180779ca4df (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
%%
%% example:
%% uptex "\def\cjk{jpn}\input" console_io.tex
%% uptex "\def\cjk{sch}\input" console_io.tex
%% uptex "\def\cjk{tch}\input" console_io.tex
%% uptex "\def\cjk{kor}\input" console_io.tex
%% uptex console_io.tex
%% ptex "\def\cjk{jis}\input" console_io.tex
%% ptex console_io.tex
%% tex console_io.tex
%%
\def\@jpn{jpn}
\def\@sch{sch}
\def\@tch{tch}
\def\@kor{kor}
\def\@jis{jis}
\ifx\cjk\@jpn
\font\upjpnrm = upjpnrm-h at 10.0pt
\upjpnrm
\fi
\ifx\cjk\@sch
\font\upschrm = upschrm-h at 10.0pt
\upschrm
\fi
\ifx\cjk\@tch
\font\uptchrm = uptchrm-h at 10.0pt
\uptchrm
\fi
\ifx\cjk\@kor
\font\upkorrm = upkorrm-h at 10.0pt
\upkorrm
\fi
\ifx\cjk\@jis
\font\jis = jis at 10.0pt
\jis
\fi
\endlinechar=256\relax
\read16 to\currline
\currline
\immediate\write16{|\currline|}
\end
|