New subject: [PD-dev] pd.tk [fonts]

5 Sep 2002 · *-courier-----%d-*


      hi thomas, hi all,
1000x thnx, it works.
ok, so heres the first beta of PUFO (PureFont :). it has still only one size
(7pt [6x9pix]) and is only in windows FON format, so dunno how you use it on
linux/osX :(. but, for win32 just copy the pufo.fon to /windows/fonts
directory and replace your pd.tk (0.35-1) file with the attachment. ready to
use :)
pd.tk changes; changed the font size 8 to 7 (font bomb) and selection of
pufo font on size 7. but if you still need courier on 8pt let me know!
how to use/select pufo font? open/create a patch and change to font size 7
cheers
-andre
ps. yes, any comment IS welcome as its still a beta !
----- Original Message -----
From: "Thomas Musil" musil@iem.kug.ac.at
To: "Andre Schmidt" andre@vju-tv.net; "PD-dev" pd-dev@iem.kug.ac.at
Sent: Wednesday, September 04, 2002 8:12 PM
Subject: Re: [PD-dev] pd.tk [fonts]
...
Hi Andre
revision 1.01
replace "-font [format -*-courier-----%d-* $font]" by "-font $fontname".
############ pdtk_text_new -- create a new text object #2###########
proc pdtk_text_new {canvasname myname x y text font color} {
     if {$font < 8} {set fontname [format -*-pufo-----%d-* $font]}
     if {$font >= 8} {set fontname [format -*-courier-----%d-* $font]}
     $canvasname create text $x $y 

       -font $fontname 

       -tags $myname -text $text -fill $color  -anchor nw
#    pd [concat $myname size [$canvasname bbox $myname] ;]
}
but maybe, you don't see a difference with a smaller font then 8.
good luck
Thomas Musil

PD-dev mailing list
PD-dev@iem.kug.ac.at
http://iem.kug.ac.at/cgi-bin/mailman/listinfo/pd-dev