(setq bdf-use-intlfonts16 t) (setq initial-frame-alist '((font . "intlfonts16")))
(w32-add-font "fontset-msgothic12" '((strict-spec ((:char-spec ascii :height any) ((:char-spec ascii :height any :weight bold) ((:char-spec ascii :height any :slant italic) ((:char-spec ascii :height any :weight bold :slant italic) ((:char-spec japanese-jisx0208 :height any) ((:char-spec japanese-jisx0208 :height any :weight bold) ((spacing . -1))) ((:char-spec japanese-jisx0208 :height any :slant italic) ((:char-spec japanese-jisx0208 :height any :weight bold :slant italic) ((spacing . -1))) ((:char-spec katakana-jisx0201 :height any) ((:char-spec katakana-jisx0201 :height any :weight bold) ((spacing . -1))) ((:char-spec katakana-jisx0201 :height any :slant italic) ((:char-spec katakana-jisx0201 :height any :weight bold :slant italic) ((spacing . -1))) )))
(w32-add-font "fontset-fixepson12" '((strict-spec ((:char-spec ascii :height any) (w32-logfont "Fixed98Epson" 0 -12 400 0 nil nil nil 128 1 1 49)) ((:char-spec ascii :height any :weight bold) (w32-logfont "Fixed98Epson" 0 -12 700 0 nil nil nil 128 1 1 49)) ((:char-spec ascii :height any :slant italic) (w32-logfont "Fixed98Epson" 0 -12 400 0 t nil nil 128 1 1 49)) ((:char-spec ascii :height any :weight bold :slant italic) (w32-logfont "Fixed98Epson" 0 -12 700 0 t nil nil 128 1 1 49)) ((:char-spec japanese-jisx0208 :height any) (w32-logfont "Fixed98Epson" 0 -12 400 0 nil nil nil 128 1 1 49)) ((:char-spec japanese-jisx0208 :height any :weight bold) (w32-logfont "Fixed98Epson" 0 -12 700 0 nil nil nil 128 1 1 49) ((spacing . -1))) ((:char-spec japanese-jisx0208 :height any :slant italic) (w32-logfont "Fixed98Epson" 0 -12 400 0 t nil nil 128 1 1 49)) ((:char-spec japanese-jisx0208 :height any :weight bold :slant italic) (w32-logfont "Fixed98Epson" 0 -12 700 0 t nil nil 128 1 1 49) ((spacing . -1))) ((:char-spec katakana-jisx0201 :height any) (w32-logfont "Fixed98Epson" 0 -12 400 0 nil nil nil 128 1 1 49)) ((:char-spec katakana-jisx0201 :height any :weight bold) (w32-logfont "Fixed98Epson" 0 -12 700 0 nil nil nil 128 1 1 49) ((spacing . -1))) ((:char-spec katakana-jisx0201 :height any :slant italic) (w32-logfont "Fixed98Epson" 0 -12 400 0 t nil nil 128 1 1 49)) ((:char-spec katakana-jisx0201 :height any :weight bold :slant italic) (w32-logfont "Fixed98Epson" 0 -12 700 0 t nil nil 128 1 1 49) ((spacing . -1))) )))
(w32-query-get-logfont)