X-Git-Url: http://git.osdn.jp/view?a=blobdiff_plain;f=test%2Ftest02-latex.tex;h=ccb446f47d33426e542ff49666be51583585f3d7;hb=f078ac2f7998a102c7ec765e725f2269eed9f872;hp=2ff7dd84e1be54329fd37a624bb704439048d43b;hpb=87e426c719f10cdb112e83ffd81dfcad0584f53e;p=luatex-ja%2Fluatexja.git

diff --git a/test/test02-latex.tex b/test/test02-latex.tex
index 2ff7dd8..ccb446f 100644
--- a/test/test02-latex.tex
+++ b/test/test02-latex.tex
@@ -1,94 +1,122 @@
 %#! lualatex
-\documentclass{article}
-\usepackage{luatexja}
+\documentclass{ltjsarticle}
+%\nonstopmode
 
 \makeatletter
-% from jsclasses
-\def\@setfontsize#1#2#3{%
-  \ifx\protect\@typeset@protect
-    \let\@currsize#1%
-  \fi
-  \fontsize{#2}{#3}\selectfont
-  \ifdim\parindent>\z@
-      \parindent=1\zw
-  \fi
-  \ltjsetparameter{kanjiskip={0\zw plus .1\zw minus .01\zw}}%
-  \@tempskipa=\ltjgetparameter{xkanjiskip}%
-  \ifdim\@tempskipa>\z@
-    \ltjsetparameter{xkanjiskip={0.25em plus 0.15em minus 0.06em}}%
-  \fi}
 
+% for test
+\DeclareTextFontCommand{\textix}{\fontshape{ix}\selectfont}
+\DeclareFontFamily{OT1}{hoge}{}\DeclareFontShape{OT1}{hoge}{m}{n}{<-> pagk7t}{}
+\DeclareKanjiFamily{JY3}{hoge}{}
+\DeclareFontShape{JY3}{hoge}{m}{n}{<-> file:ipaexg.ttf:jfm=ujis}{}
+
+\DeclareFontSubstitution{OT1}{cmss}{m}{n}
+
+\makeatother
 \begin{document}
-\section{NFSS2}
+\section{NFSS2 のテスト}
 
 ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}
 
-{\ltjsetparameter{xkanjiskip=0pt}イタリック補正\textit{f}◆\par}
+{\ltjsetparameter{xkanjiskip=0pt}イタリック補正\textit{f}◆{\it f\/}◆\par}
 
 \DeclareFixedFont{\dr}{JY3}{gt}{m}{n}{12}
 あいうえおpqr{\dr かaiu}きく）{\bf （漢字}
 
-\section{fontspec}
+{abcdfghjfgあいう辻）\textbf{（辻あ{\Large あ}いう）}}
 
-かいてない
-\end{document}
+{abcdfghjfgあいう辻）\textbf{\unkern（辻あ{\Large あ}いう}}
 
+\noindent{\tiny ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
 
-%%%%%%%%%%%%%%%%%%%%% OLD TEST
-\documentclass{article}
-\usepackage{fontspec,pdftexcmds}
-
-\input luatexja-core.sty
-
-\ExplSyntaxOn
-\xetex_or_luatex:nnn { \tl_set:Nn \l_fontspec_pre_feat_sclist }
-  {
-    \bool_if:NT \l_fontspec_icu_bool {
-      \tl_if_empty:NF \l_fontspec_script_tl
-      {
-        script   = \l_fontspec_script_tl ;
-        language = \l_fontspec_lang_tl   ;jfm=ujis;
-      }
-    }
-  }
-  {
-    mode     = \l_fontspec_mode_tl   ;
-    \tl_if_empty:NF \l_fontspec_script_tl
-    {
-      script   = \l_fontspec_script_tl ;
-      language = \l_fontspec_lang_tl   ;jfm=ujis;
-    }
-  }
-\ExplSyntaxOff
-
-\newopentypefeature{Style}{OLDJIS}{+jp90}
-\newfontfamily\goth[BoldFont={ipaexg.ttf},Style=OLDJIS]{ipaexm.ttf}
+\noindent{\scriptsize ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
 
-\begin{document}
+\noindent{\footnotesize ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
+
+\noindent{\small ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
+
+\noindent{\normalsize ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
+
+\noindent{\large ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
+
+\noindent{\Large ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
+
+\noindent{\LARGE ◆あいうえおabcかきく{\gt かきくa{\bf uyあ}いう}}
+%\end{document}
+
+\section{slanted, extended}
+\DeclareFontShape{JY3}{mc}{m}{sl}{<-> s*[0.962216] 
+  psft:Ryumin-Light:slant=0.25;jfm=ujiso25}{}
+\DeclareFontShape{JY3}{mc}{x}{n}{<-> s*[0.962216] 
+  psft:Ryumin-Light:extend=1.5;jfm=ujisx50}{}
+\DeclareFontShape{JY3}{gt}{m}{sl}{<-> s*[0.962216] 
+  file:ipam.ttf:slant=0.25;jfm=ujiso25}{}
+\DeclareFontShape{JY3}{gt}{x}{n}{<-> s*[0.962216] 
+  file:ipag.ttf:extend=1.5;jfm=ujisx50}{}
+
+% for test
+\DeclareFontShape{JY3}{gt}{m}{ix}{<-> s*[0.962216] 
+  file:ipag.ttf:slant=0.25;jfm=ujiso25}{}
+
+\paragraph{psft prefix でもOK?}\ 
+
+\textsl{日本語の機械的な斜体}直立，
+\textsl{あいう■\textup{■え■■}■おかき}
+
+{\fontfamily{mc}\fontseries{x}\selectfont あいう}
+
+\paragraph{TTF, OTFではOK}\ 
+
+\textgt{\textsl{日本語の機械的な斜体}直立，
+\textsl{あいう■\textup{■え■■}■おかき}}
+
+{\fontfamily{gt}\fontseries{x}\selectfont あいう}
+
+\paragraph{italic correction inserted by {\tt\char92text...}}\
+
+font series `ix': 欧文は未定義，和文は機械的斜体．
+
+{\gt■\textix{■あabcい■\textup{■うxyzえ■■}■おpqrか■}■}
+
+{\gt■f\textix{f■あい■f\textup{f■うえ■■f}f■おか■f}f■}
+
+イタリック補正なし：{\gt {\slshape ■}■}
+イタリック補正あり：{\gt {\slshape ■\/}■}
+
+\newpage{\obeylines\tt
+\setbox0=\hbox{\gt\textsl{あいう■\textup{■え■}■おかき}}
+\directlua{luatexja.ext_show_node_list(tex.box[0].head, '', tex.print)}\par}
+
+\bigskip
+
+正しい補正量：$0.962216\times 10 \times 0.88\times 0.25 \simeq
+\directlua{tex.print(0.962216*10*0.88*0.25)}\,\textrm{pt}$
+
+\paragraph{fontfamily}\
 \makeatletter
-\def\extract@font{%
-    \get@external@font
-    \ifnum\pdf@strcmp{\f@encoding}{EU2}=0
-      \expandafter\globaljfont\font@name\external@font\relax
-      \font@name\global\zw=\zw\global\zh=\zh
-    \else
-      \global\expandafter\font\font@name\external@font\relax
-      \font@name
-    \fi
-    \ifnum\pdf@strcmp{\f@encoding}{EU2}=0%
-      \ltjglobalsetparameter{kanjiskip={0pt plus 0.4pt minus 0.4pt},
-        xkanjiskip={0.25\zw plus 0.083333\zw minus 0.083333\zw}}%
-    \fi
-    \csname \f@encoding+\f@family\endcsname
-    \csname\curr@fontshape\endcsname
-       }
-% ! The font "ipaexg.ttf/I" cannot be found. というエラーが出る
-
-
-\goth abcdfghjfgあいう辻）\textbf{\unkern（辻あ{\Large あ}いう}
-
-\goth abcdfghjfgあいう辻）\textbf{（辻あ{\Large あ}いう}
-% \unkern がないとうなくいかない
-
-\tracingonline=1\scrollmode\showboxdepth=10000\showboxbreadth=10000\showlists
+\def\TEST#1{\par{\fontfamily{#1}\selectfont あいうabc: font\hfill(#1: \k@family, \f@family)}}
+
+\gt
+\TEST{mc}
+\TEST{fuga}
+\TEST{fuga}
+\TEST{mc}
+
+{\fontfamily{hoge}\selectfont あいうabc: font\hfill(\k@family, \f@family)}
+
+{\romanfamily{hoge}\selectfont あいうabc: roman\hfill(\k@family, \f@family)}
+
+{\kanjifamily{hoge}\selectfont あいうabc: kanji\hfill(\k@family, \f@family)}
+
+\TEST{mc}
+\TEST{ptm}
+\TEST{ptm}
+
+\makeatletter
+\let\@@fontfamily=\fontfamily
+\def\fontfamily#1{(\k@family, \f@family)\@@fontfamily{#1}(\k@family, \f@family)}
+
+あい{うえお\texttt{abc}\globaldefs1あ\/い}うえお
+
+あいうえお{\tt abc}あいうえお
 \end{document}