% +++
% latex="lualatex"
% +++
\documentclass[
	paper={10cm,14.7cm},
	head_space=2mm,
	foot_space=2mm,
	%gutter=5mm,
	%fore-edge=5mm,
	line_length=29zw,
	fontsize=9pt,
]{jlreq}

\usepackage{luatexja}
\ltjdefcharrange{11}{`→,`↑,`↓,`←}
\ltjsetparameter{jacharrange={-2,-8,+11}}
\usepackage[no-math,match,deluxe,jfm_yoko=jlreq]{luatexja-preset}
\usepackage{luatexja-otf,luatexja-adjust,luatexja-fontspec}
\usepackage{ifthen}
\usepackage{pxrubrica,bxokumacro,bxghost}
\usepackage{tikz}
\usepackage{gentombow}
\usepackage{multicol}

\usepackage[loadonly,]{enumitem}
\newlist{desc}{description}{5}
\setlist[desc]{labelindent=0\zw,labelsep*=0\zw,labelwidth=2\zw,leftmargin=2\zw}
\newlist{enu}{enumerate}{5}
\setlist[enu]{label*=\arabic*.}
\usepackage[nocenter]{cwpuzzle}
\usepackage{musikui}

\usepackage[nowidering]{yhmath}
\usepackage{newpxmath,amsmath,mathtools,mleftright}
\usepackage{tabularray}
\usepackage[notrig,italicdiff]{physics}
\mleftright

\usepackage{pdfrender}
\NewDocumentCommand\hmfukuro{O{.2pt} +m O{white}}{\textpdfrender{
	TextRenderingMode=FillStroke,
	LineWidth=#1,
	FillColor=#3,
}{#2}}

\newlength{\OrigWidth}
%% \hminwidth[*]{«横幅»}{«テキスト»}
% テキストを指定の横幅に"イイカンジに"出力する
% *-> 均等割り付けしない
\NewDocumentCommand\hminwidth{s m m}{{%
	\settowidth{\OrigWidth}{#3}% \settowidth 便利
	\ifthenelse{\lengthtest{\OrigWidth > #2}}{%
		% 指定幅より大きい場合は横方向に縮小する
		\resizebox{#2}{\height}{#3}% 横幅だけ変える
	}{%else
		\IfBooleanTF{#1}{%
			% * 付きで指定幅以下ならそのまま出力
			#3
		}{%
			% 指定幅以下の場合は均等割りを行う
			\kintou{#2}{\jghostguarded{}#3\jghostguarded{}}%
		}%
	}%
}}

\usepackage[scr=boondoxo,frak=pxtx,bb=mth]{mathalfa}
\DeclareMathAlphabet{\mathnormal}{T1}{pplx}{m}{it}
\DeclareMathAlphabet{\mathrm}{T1}{pplx}{m}{n}
\DeclareMathAlphabet{\mathit}{T1}{pplx}{m}{it}
\DeclareMathAlphabet{\mathtt}{T1}{lmtt}{m}{n}
\DeclareMathAlphabet{\mathsf}{T1}{kurier}{m}{n}
\DeclareMathAlphabet{\mathbsf}{T1}{kurier}{b}{n}
\DeclareMathAlphabet{\mathbold}{T1}{pplx}{b}{it}
\DeclareMathAlphabet{\mathbf}{T1}{pplx}{b}{n}
\DeclareMathAlphabet{\mathscr}{U}{BOONDOX-calo}{m}{n}
\DeclareMathAlphabet{\mathbscr}{U}{BOONDOX-calo}{b}{n}
%\DeclareMathAlphabet{\mathcal}{OT1}{eusm10}{m}{n}
%\DeclareMathAlphabet{\mathbcal}{OT1}{eusm10}{b}{n}
\DeclareMathAlphabet{\mathfrak}{OT1}{tx-frak}{m}{n}
\DeclareMathAlphabet{\mathbfrak}{OT1}{tx-frak}{b}{n}
\DeclareMathAlphabet{\mathbb}{U}{dsss}{m}{n}
\DeclareSymbolFont{operators}{T1}{uop}{m}{n}

\DeclareSymbolFont{numbers}{T1}{pplx}{m}{n}
\DeclareMathSymbol{0}\mathalpha{numbers}{`0}
\DeclareMathSymbol{1}\mathalpha{numbers}{`1}
\DeclareMathSymbol{2}\mathalpha{numbers}{`2}
\DeclareMathSymbol{3}\mathalpha{numbers}{`3}
\DeclareMathSymbol{4}\mathalpha{numbers}{`4}
\DeclareMathSymbol{5}\mathalpha{numbers}{`5}
\DeclareMathSymbol{6}\mathalpha{numbers}{`6}
\DeclareMathSymbol{7}\mathalpha{numbers}{`7}
\DeclareMathSymbol{8}\mathalpha{numbers}{`8}
\DeclareMathSymbol{9}\mathalpha{numbers}{`9}

%% フォントがない場合は以下の5行を削除
\setmainjfont[Ligatures=TeX,BoldFont=FOT-ModeMinALargePro-B]{FOT-ModeMinALargePro-R}
\setmainfont [Ligatures=TeX,]{Palatino}
\setsansjfont[Ligatures=TeX,BoldFont=RodinNTLGPro-EB]{FOT-RodinNTLGPro-DB}
\setsansfont [Ligatures=TeX,]{futura}
\ltjsetparameter{yjabaselineshift=0pt,yalbaselineshift=0.5pt}

\usepackage{scalefnt}
\ltjenableadjust[lineend=extended,priority=true,profile=true,linestep=true]
\allowdisplaybreaks[4]


%%%%%%%%%%%%%%%%%%%%%%%


\begin{document}

\pagestyle{empty}
\setlength{\parindent}{0pt}

{\hminwidth{\textwidth}{\fontsize{4\zw}{0pt}\jfontspec{FOT-KanaeReishoStd-B.otf}\hmfukuro{芳春凱喜}[red]}}

\null
\renewcommand*\musihgap{.1em}\renewcommand*\musivgap{.1em}
\scalebox{1.75}{
	\begin{musikui}
		\sffamily
		\kake{\eaten&\eaten&6}{2&\eaten}{\eaten&\eaten&0&8}
		\musi{\eaten&0&\eaten&\eaten}{0}
		\musi{2&\eaten&\eaten}{1}
		\sen
	\end{musikui}
}
\hspace*{\fill}
\setlength{\PuzzleUnitlength}{3.2\zw}
\renewcommand\PuzzleNumberFont{\fontsize{1\zw}{0pt}\sffamily}
\newcommand\PuzzleHook{\PuzzleThickline\put(0,0){\framebox(5,5){}}}
\begin{Puzzle}{5}{5}
	|[ ]* |[4]カ|[5]ド|[ ]マ|[8]ツ|.
	|[1]ム|[ ]ツ|[ ]キ|[ ]* |[ ]ク|.
	|[2]シ|[ ]キ|[ ]* |[7]ヒ|[ ]ダ|.
	|[ ]ク|[ ]* |[6]ウ|[ ]マ|[ ]ニ|.
	|[3]イ|[ ]チ|[ ]マ|[ ]ツ|[ ]* |.
\end{Puzzle}
\hspace*{\fill}
\null

\setlength{\columnseprule}{.5pt}
\setlength{\columnsep}{1\zw-\columnseprule}
\begin{multicols}{2}
	\newcommand\hmdash{\mbox{――}}
	\subsection*{{\fontspec{nishiki-teki}🢂}ヨコのカギ}
	\begin{desc}
		\item[1] 今月を古い言葉で言うと?
		\item[2] 今はこれのうちの冬。
		\item[3] \hmdash 模様はチェック柄。
		\item[4] この時期玄関にある竹の飾り。
		\item[6] 甘辛く味付けした煮物。
		\item[7] 岐阜県の富山側の地名。
	\end{desc}
	\subsection*{{\fontspec{nishiki-teki}🢃}タテのカギ}
	\begin{desc}
		\item[1] 左上にあるのは\hmdash 算。
		\item[4] にぎやかで\hmdash 溢れる街。
		\item[5] 遺跡から出土する焼き物。
		\item[6] 今年の干支。
		\item[7] しぶき。\hmdash 感染。
		\item[8] 昆布や海苔のこれをご飯のお供に。ハゼのこれをおせちに入れる地域も。
	\end{desc}
	%\vfill
\end{multicols}

\vspace*{\fill}
{\LARGE\jfontspec{FOT-KanaeReishoStd-B.otf}\fontspec{FOT-KanaeReishoStd-B.otf}\hspace*{\fill} 令和 8 年 元日}

\null
\newpage

\vspace*{\fill}

\PuzzleSolution
\newcommand\PuzzlePre{\fontsize{2.8\zw}{0pt}\sffamily}
\hspace*{\fill}
\begin{Puzzle}{5}{5}
	|[ ]* |[4]カ|[5]ド|[ ]マ|[8]ツ|.
	|[1]ム|[ ]ツ|[ ]キ|[ ]* |[ ]ク|.
	|[2]シ|[ ]キ|[ ]* |[7]ヒ|[ ]ダ|.
	|[ ]ク|[ ]* |[6]ウ|[ ]マ|[ ]ニ|.
	|[3]イ|[ ]チ|[ ]マ|[ ]ツ|[ ]* |.
\end{Puzzle}
\hspace*{\fill}

\vspace*{\fill}

\hspace*{\fill}
\renewcommand*\musihgap{0pt}\renewcommand*\musivgap{0pt}
\scalebox{3}{
	\begin{musikui}
		\sffamily
		\kake{1&3&6}{2&8}{3&8&0&8}
		\musi{1&0&8&8}{0}
		\musi{2&7&2}{1}
		\sen
	\end{musikui}
}
\hspace*{\fill}

\vspace*{\fill}

\end{document}
