home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / graphics / gfxnodes.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  771 b   |  32 lines
  1. {$if not def GRAPHICS_GFXNODES_H} CONST GRAPHICS_GFXNODES_H=0;
  2.  
  3. { *********************************************************************
  4.   ** KickPascal-Include-Datei "graphics/gfxnodes.h" zu Kickstart 3.0 **
  5.   ********************************************************************* }
  6.  
  7. TYPE p_ExtendedNode = ^ExtendedNode;
  8.  
  9. {$if not def EXEC_NODES_H;incl "exec/nodes.h";endif}
  10.  
  11. TYPE ExtendedNode = RECORD
  12.  xln_Succ      : p_Node;
  13.  xln_Pred      : p_Node;
  14.  xln_Type      : Byte;
  15.  xln_Pri       : Short;
  16.  ln_Name       : Str;
  17.  xln_Subsystem : Byte;
  18.  xln_Subtype   : Byte;
  19.  xln_Library   : LongInt;
  20.  xln_Init      : Ptr;
  21. END;
  22.  
  23. CONST SS_GRAPHICS = $02;
  24.  
  25. CONST
  26.  VIEW_EXTRA_TYPE      = 1;
  27.  VIEWPORT_EXTRA_TYPE  = 2;
  28.  SPECIAL_MONITOR_TYPE = 3;
  29.  MONITOR_SPEC_TYPE    = 4;
  30.  
  31. {$endif}
  32.