home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / develop / as65 / demo / d / io.d < prev    next >
Text File  |  1995-02-27  |  3KB  |  138 lines
  1. ;**************************************************************************
  2. ;
  3. ; Filename : IO.D
  4. ; ---------------
  5. ;
  6. ; (c) 1990 by Thomas Lehmann
  7. ;
  8. ;
  9. ; Jackophone V5.00
  10. ;
  11. ;
  12. ; I/O Adressen
  13. ;
  14. ;
  15. ;**************************************************************************
  16.  
  17.  
  18.  
  19.     ; ==========================
  20.     ; VIA 65C22 Register Offsets
  21.     ; ==========================
  22.  
  23. IORB    equ    0    ; Output Register B
  24. IORA    equ    1    ; Output Register A
  25. DDRB    equ    2    ; Data Direction Register B
  26. DDRA    equ    3    ; Data Direction Register A
  27. T1C_L    equ    4    ; Timer 1 low Order Counter
  28. T1C_H    equ    5    ; Timer 1 high Order Counter
  29. T2C_L    equ    8    ; Timer 2 low Order Counter
  30. T2C_H    equ    9    ; Timer 2 high Order Counter
  31. ACR    equ    11    ; Auxiliary Control Register
  32. PCR    equ    12    ; Peripheral Control Register
  33. IFR    equ    13    ; Interrupt Flag Register
  34. IER    equ    14    ; Interrupt Enable Register
  35.  
  36.  
  37.     ; VIA 65C22 IFR-Register, Interrupt Quellen
  38.     ; -----------------------------------------
  39.  
  40. IFR_CA2    equ    %00000001    ; CA2 Active Edge
  41. IFR_CA1    equ    %00000010    ; CA1 Active Edge
  42. IFR_SHIFT    equ    %00000100    ; Complete 8 Shifts
  43. IFR_CB2    equ    %00001000    ; CB2 Active Edge
  44. IFR_CB1    equ    %00010000    ; CB1 Active Edge
  45. IFR_TIM2    equ    %00100000    ; Time Out of Timer 2
  46. IFR_TIM1    equ    %01000000    ; Time Out of Timer 1
  47. IFR_IRQ    equ    %10000000    ; Any Enabled Interrupt
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.     ;=============
  56.     ; I/O Adressen
  57.     ;=============
  58.  
  59. Dp_rs    equ    $1000    ; RS-Flag Display
  60. Display    equ    $1600    ; Display Adresse
  61. Acia    equ    $2000    ; ACIA 6551
  62. Dip_sw    equ    $1700    ; DIP-Switch
  63.  
  64. Via    equ    $2800    ; Basisadresse VIA 65C22
  65. Via_portb    equ    Via+IORB    ; Via Port B
  66. Via_porta    equ    Via+IORA    ; Via Port A
  67. Wta_port    equ    Via+IORA    ; VIA Port A, Wähltastatur
  68.  
  69. Tin    equ    $1100    ; Tasten Y00-Y0F
  70. Tout_1    equ    Via+$0c    ; Tasten X00-X01
  71. Tout_2    equ    $1000    ; Tasten X02-X09
  72. Tout_3    equ    $1500    ; Tasten X0A-X0F
  73.  
  74. Port_yl    equ    $1200    ; LED YL0-YL7
  75. Port_xl1    equ    $1300    ; LED XL0-XL7
  76. Port_xl2    equ    $1400    ; LED XL8-XL15
  77.  
  78. Port_rl23    equ    $1500    ; RL2, RL3
  79.  
  80.  
  81.  
  82.  
  83.     ;=====================
  84.     ; I/O BIT Definitionen
  85.     ;=====================
  86.  
  87.  
  88.     ; ----------
  89.     ; VIA Port A
  90.     ; ----------
  91.  
  92. HTON    equ    %10000000    ; PA7, Hörtonerkennung
  93.  
  94.  
  95.     ; ----------
  96.     ; VIA Port B
  97.     ; ----------
  98.  
  99. FS    equ    %00000001    ; Rel1, Freisprechen
  100. SU    equ    %00000010    ; Rel2, Summer
  101. STR_REL3    equ    %00000100    ; Rel3, frei
  102. NSI    equ    %00001000    ; RL0,  nsi Relais
  103. NSA    equ    %00010000    ; RL1,  nsa Relais
  104. GU    equ    %00100000    ; SW0,  Gabelumschalter
  105. UHR    equ    %01000000    ; SW1,  Uhrimpuls 100Hz
  106. ANR    equ    %10000000    ; SW2,  Anruferkennung
  107.  
  108.     ; ------
  109.     ; VIA CB
  110.     ; ------
  111.  
  112. GEB    equ    %10000000    ; CB2, Gebührenimpuls
  113.  
  114.  
  115.     ; ------------------------
  116.     ; Port TX-Enable und RL2/3
  117.     ; ------------------------
  118.  
  119. TX_ENABLE    equ    %00100000    ; TX-Enable
  120. RL2    equ    %01000000    ; Port RL2, frei programmierbar
  121. RL3    equ    %10000000    ; Port RL3, frei programmierbar
  122.  
  123.  
  124.     ; ------------------------------------------
  125.     ; Kopie des DIP Switch in Zeropage: dip_stat
  126.     ; ------------------------------------------
  127.  
  128. DIP_1    equ    0    ; DIP 1= frei
  129. DIP_FS_MOD    equ    1    ; DIP 2= normale FS Fkt. oder 2x betätigen
  130. DIP_GEB    equ    2    ; DIP 3= Gebührenauswertung installiert
  131. DIP_HTON    equ    3    ; DIP 4= Hörtonauswertung installiert
  132. DIP_ANRLED    equ    4    ; DIP 5= LED`s Anzahl Anrufe ein
  133. DIP_SUMTIME    equ    5    ; DIP 6= auto Sommer / Winterzeit Umschaltung
  134. DIP_FS    equ    6    ; DIP 7= Freisprechen oder Lauthören
  135. DIP_SS    equ    7    ; DIP 8= Schlüsselschalter
  136.  
  137.  
  138.