等待的日子以 blog 慰己

Fonts settings of NTEmacs under Windows XP
two examples from Michael's .emacs:

1. MS Consolas + MS Yahei
   
   (create-fontset-from-fontset-spec
   "-outline-Consolas-normal-r-mormal-normal-*-*-96-96-p-*-fontset-consolas")
   (set-fontset-font
   "fontset-default" nil
   "-outline-微软雅黑-normal-r-normal-normal-*-*-96-96-p-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-consolas" 'kana
   "-outline-微软雅黑-normal-r-normal-normal-*-*-96-96-p-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-consolas" 'han
   "-outline-微软雅黑-normal-r-normal-normal-*-*-96-96-p-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-consolas" 'cjk-misc
   "-outline-微软雅黑-normal-r-normal-normal-*-*-96-96-p-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-consolas" 'symbol
   "-outline-微软雅黑-normal-r-normal-normal-*-*-96-96-p-*-iso10646-1" nil 'prepend)
   
   
   
   
2. Apple Monaco + MS Simkai
   
   (create-fontset-from-fontset-spec
   "-outline-Monaco-normal-r-normal-normal-15-*-96-96-c-*-fontset-monaco")
   (set-fontset-font
   "fontset-default" nil
   "-outline-楷体-normal-r-normal-normal-17-*-96-96-c-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-monaco" 'kana
   "-outline-楷体-normal-r-normal-normal-17-*-96-96-c-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-monaco" 'han
   "-outline-楷体-normal-r-normal-normal-17-*-96-96-c-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-monaco" 'cjk-misc
   "-outline-楷体-normal-r-normal-normal-17-*-96-96-c-*-iso10646-1" nil 'prepend)
   (set-fontset-font
   "fontset-monaco" 'symbol
   "-outline-楷体-normal-r-normal-normal-17-*-96-96-c-*-iso10646-1" nil 'prepend)
   
   

要切换的时候可以 M-x set-default-font fontset-consolas (fontset-monaco)，非常方便。注意将中英文的字体分别设为 16 和 14 的时候宽度正好是 2:1。