home *** CD-ROM | disk | FTP | other *** search
- /*
- * FILE: font.c
- * Support routines for accessign ROM or disk-based fonts.
- *
- * Public Domain, but keep my name in it as the original author.
- * 31-Aug-88 Jan Sven Trabandt first release version
- * 30-Sep-88 Jan Sven Trabandt gimmeFont now alters given TextAttr
- * 31-Oct-88 Jan Sven Trabandt added gimmeFontLazy
- */
-
-
- #include "gimmelib/gimmefuncs.h"
-
-
- struct TextFont *gimmeFont( textattr )
- struct TextAttr *textattr;
- {
- struct TextFont *tf;
-
- #ifdef GIMME_WIMPY
- if( !textattr ) {
- return( NULL );
- }
- #endif
- tf = OpenDiskFont( textattr );
- if( tf ) {
- textattr->ta_YSize = tf->tf_YSize;
- textattr->ta_Style = tf->tf_Style;
- }
- return( tf );
- } /* gimmeFont */
-
-
- struct TextFont *gimmeFontLazy( name, size )
- UBYTE *name;
- UWORD size;
- {
- struct TextAttr ta;
-
- #ifdef GIMME_WIMPY
- if( !name ) {
- return( NULL );
- }
- #endif
- ta.ta_Name = (STRPTR) name;
- ta.ta_YSize = size;
- ta.ta_Style = FS_NORMAL;
- ta.ta_Flags = FPF_DISKFONT;
- return( OpenDiskFont(&ta) );
- } /* gimmeFontLazy */
-
-
- short getRidOfFont( textfont )
- struct TextFont *textfont;
- {
- #ifdef GIMME_WIMPY
- if( !textfont ) {
- return( -1 );
- }
- #endif
- CloseFont( textfont );
- return( 0 );
- } /* getRidOfFont */
-