home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / hardware / custom.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  3.1 KB  |  170 lines
  1. {$if not def HARDWARE_CUSTOM_H} CONST HARDWARE_CUSTOM_H=0;
  2.  
  3. { *******************************************************************
  4.   ** KickPascal-Include-Datei "hardware/custom.h" zu Kickstart 3.0 **
  5.   ******************************************************************* }
  6.  
  7. TYPE p_Custom = ^Custom;
  8. TYPE p_AudChannel = ^AudChannel;
  9. TYPE p_SpriteDef = ^SpriteDef;
  10.  
  11.  
  12. TYPE AudChannel = RECORD
  13.  ac_ptr : ^Word;
  14.  ac_len : Word;
  15.  ac_per : Word;
  16.  ac_vol : Word;
  17.  ac_dat : Word;
  18.  ac_pad : ARRAY[0..1] OF Word;
  19. END;
  20.  
  21. TYPE SpriteDef = RECORD
  22.  pos   : Word;
  23.  ctl   : Word;
  24.  dataa : Word;
  25.  datab : Word;
  26. END;
  27.  
  28. Custom = RECORD
  29.  bltddat : Word;
  30.  dmaconr : Word;
  31.  vposr   : Word;
  32.  vhposr  : Word;
  33.  dskdatr : Word;
  34.  joy0dat : Word;
  35.  joy1dat : Word;
  36.  clxdat  : Word;
  37.  adkconr : Word;
  38.  pot0dat : Word;
  39.  pot1dat : Word;
  40.  potinp  : Word;
  41.  serdatr : Word;
  42.  dskbytr : Word;
  43.  intenar : Word;
  44.  intreqr : Word;
  45.  dskpt   : Ptr;
  46.  dsklen  : Word;
  47.  dskdat  : Word;
  48.  refptr  : Word;
  49.  vposw   : Word;
  50.  vhposw  : Word;
  51.  copcon  : Word;
  52.  serdat  : Word;
  53.  serper  : Word;
  54.  potgo   : Word;
  55.  joytest : Word;
  56.  strequ  : Word;
  57.  strvbl  : Word;
  58.  strhor  : Word;
  59.  strlong : Word;
  60.  bltcon0 : Word;
  61.  bltcon1 : Word;
  62.  bltafwm : Word;
  63.  bltalwm : Word;
  64.  bltcpt  : Ptr;
  65.  bltbpt  : Ptr;
  66.  bltapt  : Ptr;
  67.  bltdpt  : Ptr;
  68.  bltsize : Word;
  69.  pad2d   : Byte;
  70.  bltcon0l: Byte;
  71.  bltsizv : Word;
  72.  bltsizh : Word;
  73.  bltcmod : Word;
  74.  bltbmod : Word;
  75.  bltamod : Word;
  76.  bltdmod : Word;
  77.  pad34   : ARRAY[0..3] OF Word;
  78.  bltcdat : Word;
  79.  bltbdat : Word;
  80.  bltadat : Word;
  81.  pad3b   : ARRAY[0..2] OF Word;
  82.  deniseid: Word;
  83.  dsksync : Word;
  84.  cop1lc  : Long;
  85.  cop2lc  : Long;
  86.  copjmp1 : Word;
  87.  copjmp2 : Word;
  88.  copins  : Word;
  89.  diwstrt : Word;
  90.  diwstop : Word;
  91.  ddfstrt : Word;
  92.  ddfstop : Word;
  93.  dmacon  : Word;
  94.  clxcon  : Word;
  95.  intena  : Word;
  96.  intreq  : Word;
  97.  adkcon  : Word;
  98.  aud     : ARRAY[0..3] OF AudChannel;
  99.  bplpt   : ARRAY[0..7] OF Ptr;
  100.  bplcon0 : Word;
  101.  bplcon1 : Word;
  102.  bplcon2 : Word;
  103.  bplcon3 : Word;
  104.  bpl1mod : Word;
  105.  bpl2mod : Word;
  106.  bplhmod : Word;
  107.  pad86   : Word;
  108.  bpldat  : ARRAY[0..7] OF Word;
  109.  sprpt   : ARRAY[0..7] OF Ptr;
  110.  spr     : ARRAY[0..7] OF SpriteDef;
  111.  color   : ARRAY[0..31] OF Word;
  112.  htotal  : Word;
  113.  hsstop  : Word;
  114.  hbstrt  : Word;
  115.  hbstop  : Word;
  116.  vtotal  : Word;
  117.  vsstop  : Word;
  118.  vbstrt  : Word;
  119.  vbstop  : Word;
  120.  sprhstrt: Word;
  121.  sprhstop: Word;
  122.  bplhstrt: Word;
  123.  bplhstop: Word;
  124.  hhposw  : Word;
  125.  hhposr  : Word;
  126.  beamcon0: Word;
  127.  hsstrt  : Word;
  128.  vsstrt  : Word;
  129.  hcenter : Word;
  130.  diwhigh : Word;
  131.  padf3   : Array[0..10] of Word;
  132.  fmode   : Word;
  133. END;
  134.  
  135. CONST
  136.  VARVBLANK   = $1000;
  137.  LOLDIS      = $0800;
  138.  CSCBLANKEN  = $0400;
  139.  VARVSYNC    = $0200;
  140.  VARHSYNC    = $0100;
  141.  VARBEAM     = $0080;
  142.  DISPLAYDUAL = $0040;
  143.  DISPLAYPAL  = $0020;
  144.  VARCSYNC    = $0010;
  145.  CSBLANK     = $0008;
  146.  CSYNCTRUE   = $0004;
  147.  VSYNCTRUE   = $0002;
  148.  HSYNCTRUE   = $0001;
  149.  
  150. CONST
  151.  USE_BPLCON3 = 1;
  152.  
  153. CONST
  154.  BPLCON2_ZDCTEN   = $400;
  155.  BPLCON2_ZDBPEN   = $800;
  156.  BPLCON2_ZDBPSEL0 = $1000;
  157.  BPLCON2_ZDBPSEL1 = $2000;
  158.  BPLCON2_ZDBPSEL2 = $4000;
  159.  
  160. CONST
  161.  BPLCON3_EXTBLNKEN = $1;
  162.  BPLCON3_EXTBLKZD  = $2;
  163.  BPLCON3_ZDCLKEN   = $4;
  164.  BPLCON3_BRDNTRAN  = $10;
  165.  BPLCON3_BRDNBLNK  = $20;
  166.  
  167. CONST Adr_custom = $dff000;
  168.  
  169. {$endif}
  170.