\SetHangulFonts 등의 명령을 자주 쓰다보니 구차나져서...

\makeatletter
\def\FirstTwoOfFour#1#2#3#4{#1#2}
\newcommand*\SelectHfonts[2]{%
 	\ifx#2*
		\hangul@fontmap#1\@nil\hanja@fontmap#1\@nil
	\else
		\hangul@fontmap#1\@nil\hanja@fontmap#2\@nil
	\fi
}
\def\hangul@fontmap#1,#2,#3\@nil{%
	\ifx#1*\def\h@ng@ls@rif{unbt}\else\def\h@ng@ls@rif{#1}\fi
	\ifx#2*\def\h@ng@ls@ns{ungt}\else\def\h@ng@ls@ns{#2}\fi
	\ifx#3*\def\h@ng@lt@z@{untz}\else\def\h@ng@lt@z@{#3}\fi
	\SetHangulFonts{\h@ng@ls@rif}{\h@ng@ls@ns}{\h@ng@lt@z@}%
	\def\hfontfamilynameprefix{\expandafter\FirstTwoOfFour\h@ng@ls@rif}%
}
\def\hanja@fontmap#1,#2,#3\@nil{%
	\ifx#1*\def\h@nj@s@rif{unbt}\else\def\h@nj@s@rif{#1}\fi
	\ifx#2*\def\h@nj@s@ns{ungt}\else\def\h@nj@s@ns{#2}\fi
	\ifx#3*\def\h@nj@t@z@{ungt}\else\def\h@nj@t@z@{#3}\fi
	\SetHanjaFonts{\h@nj@s@rif}{\h@nj@s@ns}{\h@nj@t@z@}%
}
\makeatother

사용법은 다음과 같음

• 전체 정의

  \SelectHfonts{utbt,utgt,uttz}{utbt,utgt,utgt}
  

• 한자 부분을 한글 부분과 같게. 주의. 은타자는 한자가 없으므로 타자체로 은타자를 설정한 경우 이 방식을 쓰면 ttfamily에서 오류.

  \SelectHfonts{utbt,utgt,utgt}{*}
  

• 몇 개만 바꿀 때. 별표 부분은 모두 기본폰트(은글꼴)로 설정됨.

  \SelectHfonts{utbt,*,*}{*,*,utgt}
  

특히 \hfontfamilynameprefix를 자동으로 설정해주는데, 이 변수가 설정되면 memhangul-ucs의 경우 문장부호 등에 약간의 변화가 생김. 예를 들면 \bnm, \cntrdot 등이 이 변수에 영향을 받으므로 미리 설정해둠.