home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / hardware / cia.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  3.4 KB  |  172 lines
  1. {$if not def HARDWARE_CIA_H} CONST HARDWARE_CIA_H=0;
  2.  
  3. { ****************************************************************
  4.   ** KickPascal-Include-Datei "hardware/cia.h" zu Kickstart 3.0 **
  5.   **************************************************************** }
  6.  
  7. TYPE p_CIA = ^CIA;
  8.  
  9. CIA = RECORD
  10.  ciapra    : Byte;
  11.  pad0      : ARRAY[0..$fd] OF Byte;
  12.  ciaprb    : Byte;
  13.  pad1      : ARRAY[0..$fd] OF Byte;
  14.  ciaddra   : Byte;
  15.  pad2      : ARRAY[0..$fd] OF Byte;
  16.  ciaddrb   : Byte;
  17.  pad3      : ARRAY[0..$fd] OF Byte;
  18.  ciatalo   : Byte;
  19.  pad4      : ARRAY[0..$fd] OF Byte;
  20.  ciatahi   : Byte;
  21.  pad5      : ARRAY[0..$fd] OF Byte;
  22.  ciatblo   : Byte;
  23.  pad6      : ARRAY[0..$fd] OF Byte;
  24.  ciatbhi   : Byte;
  25.  pad7      : ARRAY[0..$fd] OF Byte;
  26.  ciatodlow : Byte;
  27.  pad8      : ARRAY[0..$fd] OF Byte;
  28.  ciatodmid : Byte;
  29.  pad9      : ARRAY[0..$fd] OF Byte;
  30.  ciatodhi  : Byte;
  31.  pad10     : ARRAY[0..$fd] OF Byte;
  32.  unusedreg : Byte;
  33.  pad11     : ARRAY[0..$fd] OF Byte;
  34.  ciasdr    : Byte;
  35.  pad12     : ARRAY[0..$fd] OF Byte;
  36.  ciaicr    : Byte;
  37.  pad13     : ARRAY[0..$fd] OF Byte;
  38.  ciacra    : Byte;
  39.  pad14     : ARRAY[0..$fd] OF Byte;
  40.  ciacrb    : Byte;
  41. END;
  42.  
  43.  
  44. CONST
  45.  CIAICRB_TA     = 0;
  46.  CIAICRB_TB     = 1;
  47.  CIAICRB_ALRM   = 2;
  48.  CIAICRB_SP     = 3;
  49.  CIAICRB_FLG    = 4;
  50.  CIAICRB_IR     = 7;
  51.  CIAICRB_SETCLR = 7;
  52.  
  53. CONST
  54.  CIACRAB_START   = 0;
  55.  CIACRAB_PBON    = 1;
  56.  CIACRAB_OUTMODE = 2;
  57.  CIACRAB_RUNMODE = 3;
  58.  CIACRAB_LOAD    = 4;
  59.  CIACRAB_INMODE  = 5;
  60.  CIACRAB_SPMODE  = 6;
  61.  CIACRAB_TODIN   = 7;
  62.  
  63. CONST
  64.  CIACRBB_START   = 0;
  65.  CIACRBB_PBON    = 1;
  66.  CIACRBB_OUTMODE = 2;
  67.  CIACRBB_RUNMODE = 3;
  68.  CIACRBB_LOAD    = 4;
  69.  CIACRBB_INMODE0 = 5;
  70.  CIACRBB_INMODE1 = 6;
  71.  CIACRBB_ALARM   = 7;
  72.  
  73. CONST
  74.  CIAICRF_TA     = $1;
  75.  CIAICRF_TB     = $2;
  76.  CIAICRF_ALRM   = $4;
  77.  CIAICRF_SP     = $8;
  78.  CIAICRF_FLG    = $10;
  79.  CIAICRF_IR     = $80;
  80.  CIAICRF_SETCLR = $80;
  81.  
  82. CONST
  83.  CIACRAF_START   = $1;
  84.  CIACRAF_PBON    = $2;
  85.  CIACRAF_OUTMODE = $4;
  86.  CIACRAF_RUNMODE = $8;
  87.  CIACRAF_LOAD    = $10;
  88.  CIACRAF_INMODE  = $20;
  89.  CIACRAF_SPMODE  = $40;
  90.  CIACRAF_TODIN   = $80;
  91.  
  92. CONST
  93.  CIACRBF_START   = $1;
  94.  CIACRBF_PBON    = $2;
  95.  CIACRBF_OUTMODE = $4;
  96.  CIACRBF_RUNMODE = $8;
  97.  CIACRBF_LOAD    = $10;
  98.  CIACRBF_INMODE0 = $20;
  99.  CIACRBF_INMODE1 = $40;
  100.  CIACRBF_ALARM   = $80;
  101.  
  102. CONST
  103.  CIACRBF_IN_PHI2   = 0;
  104.  CIACRBF_IN_CNT    = CIACRBF_INMODE0;
  105.  CIACRBF_IN_TA     = CIACRBF_INMODE1;
  106.  CIACRBF_IN_CNT_TA = (CIACRBF_INMODE0 or CIACRBF_INMODE1);
  107.  
  108. CONST
  109.  CIAB_GAMEPORT1 = 7;
  110.  CIAB_GAMEPORT0 = 6;
  111.  CIAB_DSKRDY    = 5;
  112.  CIAB_DSKTRACK0 = 4;
  113.  CIAB_DSKPROT   = 3;
  114.  CIAB_DSKCHANGE = 2;
  115.  CIAB_LED       = 1;
  116.  CIAB_OVERLAY   = 0;
  117.  
  118. CONST
  119.  CIAB_COMDTR   = 7;
  120.  CIAB_COMRTS   = 6;
  121.  CIAB_COMCD    = 5;
  122.  CIAB_COMCTS   = 4;
  123.  CIAB_COMDSR   = 3;
  124.  CIAB_PRTRSEL  = 2;
  125.  CIAB_PRTRPOUT = 1;
  126.  CIAB_PRTRBUSY = 0;
  127.  
  128. CONST
  129.  CIAB_DSKMOTOR = 7;
  130.  CIAB_DSKSEL3  = 6;
  131.  CIAB_DSKSEL2  = 5;
  132.  CIAB_DSKSEL1  = 4;
  133.  CIAB_DSKSEL0  = 3;
  134.  CIAB_DSKSIDE  = 2;
  135.  CIAB_DSKDIREC = 1;
  136.  CIAB_DSKSTEP  = 0;
  137.  
  138. CONST
  139.  CIAF_GAMEPORT1 = $80;
  140.  CIAF_GAMEPORT0 = $40;
  141.  CIAF_DSKRDY    = $20;
  142.  CIAF_DSKTRACK0 = $10;
  143.  CIAF_DSKPROT   = $8;
  144.  CIAF_DSKCHANGE = $4;
  145.  CIAF_LED       = $2;
  146.  CIAF_OVERLAY   = $1;
  147.  
  148. CONST
  149.  CIAF_COMDTR   = $80;
  150.  CIAF_COMRTS   = $40;
  151.  CIAF_COMCD    = $20;
  152.  CIAF_COMCTS   = $10;
  153.  CIAF_COMDSR   = $8;
  154.  CIAF_PRTRSEL  = $4;
  155.  CIAF_PRTRPOUT = $2;
  156.  CIAF_PRTRBUSY = $1;
  157.  
  158. CONST
  159.  CIAF_DSKMOTOR = $80;
  160.  CIAF_DSKSEL3  = $40;
  161.  CIAF_DSKSEL2  = $20;
  162.  CIAF_DSKSEL1  = $10;
  163.  CIAF_DSKSEL0  = $8;
  164.  CIAF_DSKSIDE  = $4;
  165.  CIAF_DSKDIREC = $2;
  166.  CIAF_DSKSTEP  = $1;
  167.  
  168. CONST
  169.  Adr_ciaa = $BFE001;
  170.  Adr_ciab = $BFD000;
  171. {$endif}
  172.