Re: Carbon Font Size

[Peter Dyballa]

Am 09.04.2005 um 18:23 schrieb Shug Boabby:

> anyone know how i can get a working size 14 font?

First you need to know which fonts your system has. This can be done in 
Emacs: M-x set-frame-font RET TAB TAB. A *Completions* buffer will 
open. Save it at once!

Now you know your fonts. What you need now are the encodings. M-x 
list-coding-systems. Save the *Help* buffer too! So you can create your 
own fontsets now:

        (create-fontset-from-fontset-spec
	"-*-lucida sans typewriter 
regular-medium-r-*-*-0-*-*-*-*-*-fontset-14pt_lucida_sans_typewriter,
             latin-iso8859-1:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-2:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-3:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-4:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-5:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-6:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-7:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-8:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             latin-iso8859-9:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
            latin-iso8859-12:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
            latin-iso8859-13:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
            latin-iso8859-14:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
            latin-iso8859-15:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
            latin-iso8859-16:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             mac-roman-lower:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
             mac-roman-upper:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
      mule-unicode-0100-24ff:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
      mule-unicode-2500-33ff:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
      mule-unicode-e000-ffff:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
                  iso10646-1:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic,
                       ascii:-*-lucida sans typewriter 
regular-medium-r-*-mac-cyrillic" t 'noerror)

This one uses a font that has only default (bitmap) size. This encoding 
is only determined by newer Emacsen, some elder ones see that it is 
probably more correct a Mac-Roman and Windows-Unicode encoded TrueType 
font.

        (create-fontset-from-fontset-spec
        "-*-courier-medium-r-*-*-14-*-*-*-*-*-fontset-14pt_bitstream_courier,
             latin-iso8859-1:-*-courier-*-14-*-mac-roman,
             latin-iso8859-2:-*-courier-*-14-*-mac-roman,
             latin-iso8859-3:-*-courier-*-14-*-mac-roman,
             latin-iso8859-4:-*-courier-*-14-*-mac-roman,
             latin-iso8859-5:-*-courier ce-*-14-*-mac-roman,
             latin-iso8859-6:-*-courier-*-14-*-mac-roman,
             latin-iso8859-7:-*-courier-*-14-*-mac-roman,
             latin-iso8859-8:-*-courier-*-14-*-mac-roman,
             latin-iso8859-9:-*-courier-*-14-*-mac-roman,
            latin-iso8859-10:-*-courier-*-14-*-mac-roman,
            latin-iso8859-13:-*-courier-*-14-*-mac-roman,
            latin-iso8859-14:-*-courier-*-14-*-mac-roman,
            latin-iso8859-15:-*-courier-*-14-*-mac-roman,
            latin-iso8859-16:-*-courier-*-14-*-mac-roman,
             mac-roman-lower:-*-courier-*-14-*-mac-roman,
             mac-roman-upper:-*-courier-*-14-*-mac-roman,
      mule-unicode-0100-24ff:-*-courier-*-14-*-mac-roman,
      mule-unicode-2500-33ff:-*-courier-*-14-*-mac-roman,
      mule-unicode-e000-ffff:-*-courier-*-14-*-mac-roman,
                  iso10646-1:-*-courier-*-14-*-mac-roman,
                       ascii:-*-courier-*-14-*-mac-roman" t 'noerror)

Here two fonts are used to create one fontset. These fonts have more 
than one (bitmap) size, so I can use it in different sizes.

You actively use these fontsets via M-x set-frame-fontset or in .emacs:

        (setq initial-frame-alist '(
          (mouse-color    . "midnightblue")
          (foreground-color . "grey20")
          (background-color . "alice blue")
          (font . "fontset-12pt_bitstream_courier")
          (top . 10) (left . 650) (width . 89) (height . 60)))
        (setq default-frame-alist '(
          (background-color . "ghost white")
          (foreground-color . "grey10")
          (vertical-scroll-bars . left)
          (font . "fontset-12pt_bitstream_courier")
          (cursor-color . "purple")
          (vertical-scroll-bars . left)
          (cursor-type . box)
          (top . 20) (left . 150) (width . 89) (height . 56)))

Just for your imagination ...


--
Greetings

  Pete