{$ifndef LIBRARIES_DISKFONT_H}
const LIBRARIES_DISKFONT_H = 1;
{$ifndef EXEC_NODES_H;incl"exec/nodes.h";endif}
{$ifndef EXEC_LISTS_H;incl"exec/lists.h";endif}
{$ifndef GRAPHICS_TEXT_H;incl"graphics/text.h";endif}
const MAXFONTPATH = 256;
      FCH_ID = $0F00;
      DFH_ID = $0F80;
      MAXFONTNAME = 32;
      AFB_MEMORY = 0;
      AFF_MEMORY = 1;
      AFB_DISK = 1;
      AFF_DISK = 2;
Type FontContents = record
                      fc_FileName: String[MAXFONTPATH];
                      fc_YSize: word;
                      fc_Style: byte;
                      fc_Flags: byte
                    end;
     FontContentsHeader = record
                            fch_FileID, fch_NumEntries: word
                          end;
     DiskFontHeader = record
                        dfh_DF: Node;
                        dfh_FileID, dfh_Revision: word;
                        dfh_Segment: long;
                        dfh_Name: String[MAXFONTNAME];
                        dfh_TF: TextFont
                      end;
     _AvailFonts = record
                     af_Type: word;
                     af_Attr: TextAttr
                   end;
     AvailFontsHeader = record
                          afh_NumEntries: word
                        end;
{$endif}
{$ifndef LIBRARIES_DISKFONT_LIB}
const LIBRARIES_DISKFONT_LIB = 0;
Var DiskfontBase: Ptr;
Library DiskFontBase:
-30: Function OpenDiskFont(a0: p_TextAttr): p_TextFont;
-36: Function AvailFonts(a0: Ptr; d0, d1: long): long
end;
{$endif}