.Xresources에 다음 처럼 추가하고 xrdb .Xresources하면 됩니다. 폰트는 이름과
크기는 알아서 바꿔 주시고^^

Emacs.Font: fontset-fixedsys
Emacs.Fontset-0:-windows-fixed-medium-r-normal--16-*-*-*-*-*-fontset-fixedsys,\
ascii:-windows-fixed-medium-r-normal--16-*-iso10646-1, \
korean-ksc5601:-*-hangang-*-*-*-*-14-*-*-*-*-*-iso10646-*, \

가능합니다.
원하는 한글 글꼴과 영문글꼴을 묶어서 fontset을 만들어 주면 됩니다.

윈도용 NTEmacs-KTUG 깔았을때 기본으로 설정되는 .emacs 파일 중의 일부분입니다.

원하는 폰트들을 묶어 fontset을 만들고 그 fontset을 사용하는게 보일 겁니다.

참고 하시기 바랍니다.

;; alternative fonts:
; Gulimche:
; korean-ksc5601:-*-\261\274\270\262\303\274-normal-r-*-*-16-*-*-*-c-*-ksc5601.1987-*,
; Batangche:
; korean-ksc5601:-*-\271\331\305\301\303\274-normal-r-*-*-16-*-*-*-c-*-ksc5601.1987-*,
; Dodumche:
; korean-ksc5601:-*-\265\270\277\362\303\274-normal-r-*-*-16-*-*-*-c-*-ksc5601.1987-*,
; Gungseoche:
; korean-ksc5601:-*-\261\303\274\255\303\274-normal-r-*-*-16-*-*-*-c-*-ksc5601.1987-*,
; chinese-gb2312:-*-MS Song-normal-r-*-*-*-*-*-*-c-*-gb2312-*,

(if (eq window-system 'w32)
   (progn
    (create-fontset-from-fontset-spec
     "-*-Fixedsys-normal-r-*-*-12-*-*-*-c-*-fontset-msfixedsys12,
     latin-iso8859-1:-*-Fixedsys-normal-r-*-*-12-*-*-*-c-*-iso8859-1,
     latin-iso8859-2:-*-Courier New CE-normal-r-*-*-*-*-*-*-c-*-iso8859-2,
     latin-iso8859-3:-*-Courier New Tur-normal-r-*-*-*-*-*-*-c-*-iso8859-3,
     latin-iso8859-4:-*-Courier New Baltic-normal-r-*-*-*-*-*-*-c-*-iso8859-4,
     cyrillic-iso8859-5:-*-Courier New Cyr-normal-r-*-*-*-*-*-*-c-*-iso8859-5,
     greek-iso8859-7:-*-Courier New Greek-normal-r-*-*-*-*-*-*-c-*-iso8859-7,
     korean-ksc5601:-*-\261\274\270\262\303\274-normal-r-*-*-12-*-*-*-c-*-ksc5601.1987-*,
     japanese-jisx0208:-*-MS Gothic-normal-r-*-*-12-*-*-*-c-*-jisx0212-sjis,
     japanese-jisx0212:-*-MS Gothic-normal-r-*-*-12-*-*-*-c-*-jisx0212-sjis,
     katakana-jisx0201:-*-MS Gothic-normal-r-*-*-12-*-*-*-c-*-jisx0212-sjis,
     chinese-gb2312:-*-MS Hei-normal-r-*-*-*-*-*-*-c-*-gb2312-*,
     chinese-big5-1:-*-MingLiU-normal-r-*-*-*-*-*-*-c-*-big5-1,
     chinese-big5-2:-*-MingLiU-normal-r-*-*-*-*-*-*-c-*-big5-2"
     t)
    
     (create-fontset-from-fontset-spec
    "-*-Courier New-normal-r-*-*-12-*-*-*-c-*-fontset-mscourier12,
    latin-iso8859-1:-*-Courier New-normal-r-*-*-12-*-*-*-c-*-iso8859-1,
    latin-iso8859-2:-*-Courier New CE-normal-r-*-*-*-*-*-*-c-*-iso8859-2,
    latin-iso8859-3:-*-Courier New Tur-normal-r-*-*-*-*-*-*-c-*-iso8859-3,
    latin-iso8859-4:-*-Courier New Baltic-normal-r-*-*-*-*-*-*-c-*-iso8859-4,
    cyrillic-iso8859-5:-*-Courier New Cyr-normal-r-*-*-*-*-*-*-c-*-iso8859-5,
    greek-iso8859-7:-*-Courier New Greek-normal-r-*-*-*-*-*-*-c-*-iso8859-7,
    korean-ksc5601:-*-\261\274\270\262\303\274-normal-r-*-*-12-*-*-*-c-*-ksc5601.1987-*,
    japanese-jisx0208:-*-MS Gothic-normal-r-*-*-12-*-*-*-c-*-jisx0212-sjis,
    japanese-jisx0212:-*-MS Gothic-normal-r-*-*-12-*-*-*-c-*-jisx0212-sjis,
    katakana-jisx0201:-*-MS Gothic-normal-r-*-*-12-*-*-*-c-*-jisx0212-sjis,
    chinese-gb2312:-*-MS Hei-normal-r-*-*-*-*-*-*-c-*-gb2312-*,
    chinese-big5-1:-*-MingLiU-normal-r-*-*-*-*-*-*-c-*-big5-1,
    chinese-big5-2:-*-MingLiU-normal-r-*-*-*-*-*-*-c-*-big5-2"
    t)

     (setq w32-enable-italics t)
     ;; for better font dialog menu for fontset
     (setq w32-use-w32-font-dialog nil)
     ;(setq w32-enable-unicode-output nil)

     (setq initial-frame-alist '((top . 00) (left . 00)))
     (setq default-frame-alist
       (append '(
             ;; Choose only one for your default font set.
               ;(font . "-*-Courier New-normal-r-*-*-13-*-*-*-c-*-fontset-standard")
             ;(font . "-*-Fixedsys-normal-r-*-*-12-*-*-*-c-*-fontset-msfixedsys12")
               (font . "-*-Courier New-normal-r-*-*-12-*-*-*-c-*-fontset-mscourier12")
             (width . 100)
             (height . 40)
             (background-color . "gray85")
             (foreground-color . "Black") (cursor-color . "red")
             (vertical-scroll-bars . right))
           default-frame-alist))))