home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / graphics / gfxbase.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  4.3 KB  |  158 lines

  1. {$if not def GRAPHICS_GFXBASE_H} CONST GRAPHICS_GFXBASE_H=0;
  2.  
  3. { ********************************************************************
  4.   ** KickPascal-Include-Datei "graphics/gfxbase.h" zu Kickstart 3.0 **
  5.   ******************************************************************** }
  6.  
  7. {$if not def EXEC_LISTS_H;incl "exec/lists.h";endif}
  8. {$if not def EXEC_LIBRARIES_H;incl "exec/libraries.h";endif}
  9. {$if not def EXEC_INTERRUPTS_H;incl "exec/interrupts.h";endif}
  10. {$if not def GRAPHICS_MONITOR_H;incl "graphics/monitor.h";endif}
  11. {$if not def GRAPHICS_VIEW_H;incl "graphics/view.h";endif}
  12. {$if not def GRAPHICS_COPPER_H;incl "graphics/copper.h";endif}
  13. {$if not def GRAPHICS_TEXT_H;incl "graphics/text.h";endif}
  14. {$if not def HARDWARE_BLIT_H;incl "hardware/blit.h";endif}
  15.  
  16.  
  17. TYPE p_GfxBase = ^_GfxBase; { "_" ergänzt }
  18.  
  19. TYPE _GfxBase = RECORD
  20.  LibNode          : _Library;
  21.  ActiView         : p_View;
  22.  copinit          : p_copinit;
  23.  cia              : Ptr;
  24.  blitter          : Ptr;
  25.  LOFlist          : Ptr;
  26.  SHFlist          : Ptr;
  27.  blthd            : p_bltnode;
  28.  blttl            : p_bltnode;
  29.  bsblthd          : p_bltnode;
  30.  bsblttl          : p_bltnode;
  31.  vbsrv            : Interrupt;
  32.  timsrv           : Interrupt;
  33.  bltsrv           : Interrupt;
  34.  TextFonts        : List;
  35.  DefaultFont      : p_TextFont;
  36.  Modes            : Word;
  37.  VBlank           : Short;
  38.  Debug            : Short;
  39.  BeamSync         : Integer;
  40.  system_bplcon0   : Integer;
  41.  SpriteReserved   : Byte;
  42.  bytereserved     : Byte;
  43.  Flags            : Word;
  44.  BlitLock         : Integer;
  45.  BlitNest         : Integer;
  46.  BlitWaitQ        : List;
  47.  BlitOwner        : p_Task;
  48.  TOF_WaitQ        : List;
  49.  DisplayFlags     : Word;
  50.  SimpleSprites    : ^Ptr;
  51.  MaxDisplayRow    : Word;
  52.  MaxDisplayColumn : Word;
  53.  NormalDisplayRows: Word;
  54.  NormalDisplayColumns: Word;
  55.  NormalDPMX       : Word;
  56.  NormalDPMY       : Word;
  57.  LastChanceMemory : p_SignalSemaphore;
  58.  LCMptr           : Ptr;
  59.  MicrosPerLine    : Word;
  60.  MinDisplayColumn : Word;
  61.  ChipRevBits0     : Byte;
  62.  crb_reserved     : ARRAY[0..2] OF Byte;
  63.  monitor_id       : Word;
  64.  hedley           : ARRAY[0..7] OF Long;
  65.  hedley_sprites   : ARRAY[0..7] OF Long;
  66.  hedley_sprites1  : ARRAY[0..7] OF Long;
  67.  hedley_count     : Integer;
  68.  hedley_flags     : Word;
  69.  hedley_tmp       : Integer;
  70.  hash_table       : Ptr;
  71.  current_tot_rows : Word;
  72.  current_tot_cclks: Word;
  73.  hedley_hint      : Byte;
  74.  hedley_hint2     : Byte;
  75.  nreserved        : ARRAY[0..3] OF Long;
  76.  a2024_sync_raster: Ptr;
  77.  control_delta_pal: Integer;
  78.  control_delta_ntsc: Integer;
  79.  current_monitor  : p_MonitorSpec;
  80.  MonitorList      : List;
  81.  default_monitor  : p_MonitorSpec;
  82.  MonitorListSemaphore : p_SignalSemaphore;
  83.  DisplayInfoDataBase  : Ptr;
  84.  ActiViewCprSemaphore : p_SignalSemaphore;
  85.  UtilityBase      : Ptr;
  86.  ExecBase         : Ptr;
  87.  bwshifts         : Byte;
  88.  StrtFetchMasks   : Word;
  89.  StopFetchMasks   : Word;
  90.  Overrun          : Word;
  91.  RealStops        : Integer;
  92.  SpriteWidth      : Word;
  93.  SpriteFMode      : Word;
  94.  SoftSprites      : Short;
  95.  arraywidth       : Short;
  96.  DefaultSpriteWidth : Word;
  97.  SprMoveDisable   : Short;
  98.  WantChips        : Byte;
  99.  BoardMemType     : Byte;
  100.  Bugs             : Byte;
  101.  gb_LayerBase     : Ptr;
  102.  ColorMask        : Long;
  103.  IVector          : Ptr;
  104.  IData            : Ptr;
  105.  SpecialCounter   : Long;
  106.  DBList           : Ptr;
  107.  MonitorFlags     : Word;
  108.  ScanDoubledSprites : Byte;
  109.  BP3Bits          : Byte;
  110.  MonitorVBlank    : AnalogSignalInterval;
  111.  natural_monitor  : MonitorSpec;
  112.  ProgData         : Ptr;
  113.  ExtSprites       : Byte;
  114. END;
  115.  
  116. CONST
  117.  NTSC       =  1;
  118.  GENLOC     =  2;
  119.  PAL        =  4;
  120.  TODA_SAFE  =  8;
  121.  REALLY_PAL = 16;
  122.  
  123. CONST
  124.  BLITMSG_FAULT = 4;
  125.  
  126. CONST
  127.  GFXB_BIG_BLITS = 0;
  128.  GFXB_HR_AGNUS  = 0;
  129.  GFXB_HR_DENISE = 1;
  130.  GFXB_AA_ALICE  = 2;
  131.  GFXB_AA_LISA   = 3;
  132.  GFXB_AA_MLISA  = 4;
  133.  
  134.  GFXF_BIG_BLITS =  1;
  135.  GFXF_HR_AGNUS  =  1;
  136.  GFXF_HR_DENISE =  2;
  137.  GFXF_AA_ALICE  =  4;
  138.  GFXF_AA_LISA   =  8;
  139.  GFXF_AA_MLISA  = 16;
  140.  
  141.  SETCHIPREV_A   = GFXF_HR_AGNUS;
  142.  SETCHIPREV_ECS = (GFXF_HR_AGNUS or GFXF_HR_DENISE);
  143.  SETCHIPREV_AA  = (GFXF_AA_ALICE or GFXF_AA_LISA or SETCHIPREV_ECS);
  144.  SETCHIPREV_BEST= $ffffffff;
  145.  
  146.  BUS_16         = 0;
  147.  NML_CAS        = 0;
  148.  BUS_32         = 1;
  149.  DBL_CAS        = 2;
  150.  BANDWIDTH_1X   = (BUS_16 or NML_CAS);
  151.  BANDWIDTH_2XNML= BUS_32;
  152.  BANDWIDTH_2XDBL= DBL_CAS;
  153.  BANDWIDTH_4X   = (BUS_32 or DBL_CAS);
  154.  
  155. CONST GRAPHICSNAME = "graphics.library";
  156.  
  157. {$endif}
  158.