GNU Intlfonts

    • GNU intlfonts
      wget ftp://m17n.org/pub/mule/intlfonts-1.2.1.tar.gz
  1. .emacs
    (setq bdf-use-intlfonts16 t)
    (setq initial-frame-alist '((font . "intlfonts16")))

  1. .emacs
    (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)))
    )))

Fixed98Epson

  1. .emacs
    (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)




添付ファイル: fileFixed98Epson.lzh 1044件 [詳細]


トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: Tue, 12 Oct 2021 01:10:55 JST (1160d)