Add HuC1 and HuC-3 constants

Author: Rangi42

hardware.inc

@@ -729,7 +729,7 @@ def B_IE_VBLANK equ 0 ; 1 = VBlank interrupt is enabled [r/w]
 ; these addresses are what's provided here.
 
 
-; ** MBC1, MBC3, MBC5, MBC6, MBC7, MMM01 **************************************
+; ** Common MBCs (MBC1, MBC3, MBC5, MBC6, MBC7, MMM01, HuC1, HuC-3) ***********
 
 ; -- RAMG ($0000-$1FFF) -------------------------------------------------------
 ; Whether SRAM can be accessed [wo]
@@ -739,6 +739,20 @@ def rRAMG equ $0000
 def RAMG_SRAM_DISABLE equ $00
 def RAMG_SRAM_ENABLE  equ $0A ; some MBCs accept any value whose low nybble is $A
 
+def RAMG_SRAM_IR equ $0E ; (HuC1 only) switch SRAM to IR mode
+
+; (HuC-3 only) switch SRAM to map cartridge RAM, RTC, or IR
+def RAMG_CART_RAM_RO   equ $00 ; select cartridge RAM [ro]
+def RAMG_CART_RAM      equ $0A ; select cartridge RAM [r/w]
+def RAMG_RTC_IN        equ $0B ; select RTC command/argument [wo]
+    def RAMG_RTC_IN_CMD equ %0_111_0000 ; command
+    def RAMG_RTC_IN_ARG equ %0000_1111  ; argument
+def RAMG_RTC_OUT       equ $0C ; select RTC command/response [ro]
+    def RAMG_RTC_OUT_CMD    equ %0_111_0000 ; command
+    def RAMG_RTC_OUT_RESULT equ %0000_1111  ; result
+def RAMG_RTC_SEMAPHORE equ $0D ; select RTC semaphore [r/w]
+def RAMG_IR            equ $0E ; select IR [r/w]
+
 ; -- ROMB ($2000-$3FFF) ------------------------------------------------------
 ; ROM bank number [wo]
 def rROMB equ $2000
@@ -766,7 +780,7 @@ def B_RAMB_RUMBLE equ 3 ; (MBC5 and MBC7 only) enable the rumble motor (if any)
         def RAMB_RUMBLE_ON  equ 1 << B_RAMB_RUMBLE
 
 
-; ** MBC1 only ****************************************************************
+; ** MBC1 and MMM01 only ******************************************************
 
 ; -- BMODE ($6000-$7FFF) ------------------------------------------------------
 ; Banking mode select [wo]
@@ -885,6 +899,16 @@ def rACCELY1 equ $A050
 def rEEPROM equ $A080
 
 
+; ** HuC1 only ****************************************************************
+
+; -- IRREG ($A000-$BFFF) ------------------------------------------------------
+; IR register [r/w]
+def rIRREG equ $A000
+
+def IR_LED_OFF equ $C0
+def IR_LED_ON  equ $C1
+
+
 ;******************************************************************************
 ; Screen-related constants
 ;******************************************************************************