matita/matita/contribs/ng_assembly2/emulator/opcodes/HC08_table.ma

   1 (**************************************************************************)
   2 (*       ___                                                              *)
   3 (*      ||M||                                                             *)
   4 (*      ||A||       A project by Andrea Asperti                           *)
   5 (*      ||T||                                                             *)
   6 (*      ||I||       Developers:                                           *)
   7 (*      ||T||         The HELM team.                                      *)
   8 (*      ||A||         http://helm.cs.unibo.it                             *)
   9 (*      \   /                                                             *)
  10 (*       \ /        This file is distributed under the terms of the       *)
  11 (*        v         GNU General Public License Version 2                  *)
  12 (*                                                                        *)
  13 (**************************************************************************)
  14
  15 (* ********************************************************************** *)
  16 (*                          Progetto FreeScale                            *)
  17 (*                                                                        *)
  18 (*   Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it              *)
  19 (*   Sviluppo: 2008-2010                                                  *)
  20 (*                                                                        *)
  21 (* ********************************************************************** *)
  22
  23 include "emulator/opcodes/Freescale_pseudo.ma".
  24 include "emulator/opcodes/Freescale_instr_mode.ma".
  25 include "emulator/opcodes/byte_or_word.ma".
  26 include "common/list.ma".
  27
  28 (* ***************** *)
  29 (* TABELLA DELL'HC08 *)
  30 (* ***************** *)
  31
  32 (* definizione come concatenazione finale di liste per velocizzare il parsing *)
  33 (* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
  34
  35 ndefinition opcode_table_HC08_1 ≝
  36 [
  37   quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) nat2
  38 ; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) nat3
  39 ; quadruple … ADC MODE_DIR2 (Byte 〈xC,x9〉) nat4
  40 ; quadruple … ADC MODE_IX2  (Byte 〈xD,x9〉) nat4
  41 ; quadruple … ADC MODE_IX1  (Byte 〈xE,x9〉) nat3
  42 ; quadruple … ADC MODE_IX0  (Byte 〈xF,x9〉) nat2
  43 ; quadruple … ADC MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x9〉〉) nat5
  44 ; quadruple … ADC MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x9〉〉) nat4
  45 ].
  46
  47 ndefinition opcode_table_HC08_2 ≝
  48 [
  49   quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) nat2
  50 ; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) nat3
  51 ; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) nat4
  52 ; quadruple … ADD MODE_IX2  (Byte 〈xD,xB〉) nat4
  53 ; quadruple … ADD MODE_IX1  (Byte 〈xE,xB〉) nat3
  54 ; quadruple … ADD MODE_IX0  (Byte 〈xF,xB〉) nat2
  55 ; quadruple … ADD MODE_SP2  (Word 〈〈x9,xE〉:〈xD,xB〉〉) nat5
  56 ; quadruple … ADD MODE_SP1  (Word 〈〈x9,xE〉:〈xE,xB〉〉) nat4
  57 ].
  58
  59 ndefinition opcode_table_HC08_3 ≝
  60 [
  61   quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) nat2
  62 ; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) nat3
  63 ; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) nat4
  64 ; quadruple … AND MODE_IX2  (Byte 〈xD,x4〉) nat4
  65 ; quadruple … AND MODE_IX1  (Byte 〈xE,x4〉) nat3
  66 ; quadruple … AND MODE_IX0  (Byte 〈xF,x4〉) nat2
  67 ; quadruple … AND MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x4〉〉) nat5
  68 ; quadruple … AND MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x4〉〉) nat4
  69 ].
  70
  71 ndefinition opcode_table_HC08_4 ≝
  72 [
  73   quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) nat4
  74 ; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) nat1
  75 ; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) nat1
  76 ; quadruple … ASL MODE_IX1  (Byte 〈x6,x8〉) nat4
  77 ; quadruple … ASL MODE_IX0  (Byte 〈x7,x8〉) nat3
  78 ; quadruple … ASL MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x8〉〉) nat5
  79 ].
  80
  81 ndefinition opcode_table_HC08_5 ≝
  82 [
  83   quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) nat4
  84 ; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) nat1
  85 ; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) nat1
  86 ; quadruple … ASR MODE_IX1  (Byte 〈x6,x7〉) nat4
  87 ; quadruple … ASR MODE_IX0  (Byte 〈x7,x7〉) nat3
  88 ; quadruple … ASR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x7〉〉) nat5
  89 ].
  90
  91 ndefinition opcode_table_HC08_6 ≝
  92 [
  93   quadruple … BRA  MODE_IMM1 (Byte 〈x2,x0〉) nat3
  94 ; quadruple … BRN  MODE_IMM1 (Byte 〈x2,x1〉) nat3
  95 ; quadruple … BHI  MODE_IMM1 (Byte 〈x2,x2〉) nat3
  96 ; quadruple … BLS  MODE_IMM1 (Byte 〈x2,x3〉) nat3
  97 ; quadruple … BCC  MODE_IMM1 (Byte 〈x2,x4〉) nat3
  98 ; quadruple … BCS  MODE_IMM1 (Byte 〈x2,x5〉) nat3
  99 ; quadruple … BNE  MODE_IMM1 (Byte 〈x2,x6〉) nat3
 100 ; quadruple … BEQ  MODE_IMM1 (Byte 〈x2,x7〉) nat3
 101 ; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) nat3
 102 ; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) nat3
 103 ; quadruple … BPL  MODE_IMM1 (Byte 〈x2,xA〉) nat3
 104 ; quadruple … BMI  MODE_IMM1 (Byte 〈x2,xB〉) nat3
 105 ; quadruple … BMC  MODE_IMM1 (Byte 〈x2,xC〉) nat3
 106 ; quadruple … BMS  MODE_IMM1 (Byte 〈x2,xD〉) nat3
 107 ; quadruple … BIL  MODE_IMM1 (Byte 〈x2,xE〉) nat3
 108 ; quadruple … BIH  MODE_IMM1 (Byte 〈x2,xF〉) nat3
 109 ; quadruple … BGE  MODE_IMM1 (Byte 〈x9,x0〉) nat3
 110 ; quadruple … BLT  MODE_IMM1 (Byte 〈x9,x1〉) nat3
 111 ; quadruple … BGT  MODE_IMM1 (Byte 〈x9,x2〉) nat3
 112 ; quadruple … BLE  MODE_IMM1 (Byte 〈x9,x3〉) nat3
 113 ].
 114
 115 ndefinition opcode_table_HC08_7 ≝
 116 [
 117   quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) nat4
 118 ; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) nat4
 119 ; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) nat4
 120 ; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) nat4
 121 ; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) nat4
 122 ; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) nat4
 123 ; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) nat4
 124 ; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) nat4
 125 ; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) nat4
 126 ; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) nat4
 127 ; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) nat4
 128 ; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) nat4
 129 ; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) nat4
 130 ; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) nat4
 131 ; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) nat4
 132 ; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) nat4
 133 ].
 134
 135 ndefinition opcode_table_HC08_8 ≝
 136 [
 137   quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) nat5
 138 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) nat5
 139 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) nat5
 140 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) nat5
 141 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) nat5
 142 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) nat5
 143 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) nat5
 144 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) nat5
 145 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) nat5
 146 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) nat5
 147 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) nat5
 148 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) nat5
 149 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) nat5
 150 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) nat5
 151 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) nat5
 152 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) nat5
 153 ].
 154
 155 ndefinition opcode_table_HC08_9 ≝
 156 [
 157   quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) nat2
 158 ; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) nat3
 159 ; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) nat4
 160 ; quadruple … BIT MODE_IX2  (Byte 〈xD,x5〉) nat4
 161 ; quadruple … BIT MODE_IX1  (Byte 〈xE,x5〉) nat3
 162 ; quadruple … BIT MODE_IX0  (Byte 〈xF,x5〉) nat2
 163 ; quadruple … BIT MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x5〉〉) nat5
 164 ; quadruple … BIT MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x5〉〉) nat4
 165 ].
 166
 167 ndefinition opcode_table_HC08_10 ≝
 168 [
 169   quadruple … MUL  MODE_INH  (Byte 〈x4,x2〉) nat5
 170 ; quadruple … DIV  MODE_INH  (Byte 〈x5,x2〉) nat7
 171 ; quadruple … NSA  MODE_INH  (Byte 〈x6,x2〉) nat3
 172 ; quadruple … DAA  MODE_INH  (Byte 〈x7,x2〉) nat2
 173 ; quadruple … RTI  MODE_INH  (Byte 〈x8,x0〉) nat7
 174 ; quadruple … RTS  MODE_INH  (Byte 〈x8,x1〉) nat4
 175 ; quadruple … SWI  MODE_INH  (Byte 〈x8,x3〉) nat9
 176 ; quadruple … TAP  MODE_INH  (Byte 〈x8,x4〉) nat2
 177 ; quadruple … TPA  MODE_INH  (Byte 〈x8,x5〉) nat1
 178 ; quadruple … PULA MODE_INH  (Byte 〈x8,x6〉) nat2
 179 ; quadruple … PSHA MODE_INH  (Byte 〈x8,x7〉) nat2
 180 ; quadruple … PULX MODE_INH  (Byte 〈x8,x8〉) nat2
 181 ; quadruple … PSHX MODE_INH  (Byte 〈x8,x9〉) nat2
 182 ; quadruple … PULH MODE_INH  (Byte 〈x8,xA〉) nat2
 183 ; quadruple … PSHH MODE_INH  (Byte 〈x8,xB〉) nat2
 184 ; quadruple … STOP MODE_INH  (Byte 〈x8,xE〉) nat1
 185 ; quadruple … WAIT MODE_INH  (Byte 〈x8,xF〉) nat1
 186 ; quadruple … TXS  MODE_INH  (Byte 〈x9,x4〉) nat2
 187 ; quadruple … TSX  MODE_INH  (Byte 〈x9,x5〉) nat2
 188 ; quadruple … TAX  MODE_INH  (Byte 〈x9,x7〉) nat1
 189 ; quadruple … CLC  MODE_INH  (Byte 〈x9,x8〉) nat1
 190 ; quadruple … SEC  MODE_INH  (Byte 〈x9,x9〉) nat1
 191 ; quadruple … CLI  MODE_INH  (Byte 〈x9,xA〉) nat2
 192 ; quadruple … SEI  MODE_INH  (Byte 〈x9,xB〉) nat2
 193 ; quadruple … RSP  MODE_INH  (Byte 〈x9,xC〉) nat1
 194 ; quadruple … NOP  MODE_INH  (Byte 〈x9,xD〉) nat1
 195 ; quadruple … TXA  MODE_INH  (Byte 〈x9,xF〉) nat1
 196 ; quadruple … AIS  MODE_IMM1 (Byte 〈xA,x7〉) nat2
 197 ; quadruple … AIX  MODE_IMM1 (Byte 〈xA,xF〉) nat2
 198 ].
 199
 200 ndefinition opcode_table_HC08_11 ≝
 201 [
 202   quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) nat5
 203 ; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) nat4
 204 ; quadruple … CBEQX MODE_IMM1_and_IMM1 (Byte 〈x5,x1〉) nat4
 205 ; quadruple … CBEQA MODE_IX1p_and_IMM1 (Byte 〈x6,x1〉) nat5
 206 ; quadruple … CBEQA MODE_IX0p_and_IMM1 (Byte 〈x7,x1〉) nat4
 207 ; quadruple … CBEQA MODE_SP1_and_IMM1  (Word 〈〈x9,xE〉:〈x6,x1〉〉) nat6
 208 ].
 209
 210 ndefinition opcode_table_HC08_12 ≝
 211 [
 212   quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) nat3
 213 ; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) nat1
 214 ; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) nat1
 215 ; quadruple … CLR MODE_IX1  (Byte 〈x6,xF〉) nat3
 216 ; quadruple … CLR MODE_IX0  (Byte 〈x7,xF〉) nat2
 217 ; quadruple … CLR MODE_INHH (Byte 〈x8,xC〉) nat1
 218 ; quadruple … CLR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xF〉〉) nat4
 219 ].
 220
 221 ndefinition opcode_table_HC08_13 ≝
 222 [
 223   quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) nat2
 224 ; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) nat3
 225 ; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) nat4
 226 ; quadruple … CMP MODE_IX2  (Byte 〈xD,x1〉) nat4
 227 ; quadruple … CMP MODE_IX1  (Byte 〈xE,x1〉) nat3
 228 ; quadruple … CMP MODE_IX0  (Byte 〈xF,x1〉) nat2
 229 ; quadruple … CMP MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x1〉〉) nat5
 230 ; quadruple … CMP MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x1〉〉) nat4
 231 ].
 232
 233 ndefinition opcode_table_HC08_14 ≝
 234 [
 235   quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) nat4
 236 ; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) nat1
 237 ; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) nat1
 238 ; quadruple … COM MODE_IX1  (Byte 〈x6,x3〉) nat4
 239 ; quadruple … COM MODE_IX0  (Byte 〈x7,x3〉) nat3
 240 ; quadruple … COM MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x3〉〉) nat5
 241 ].
 242
 243 ndefinition opcode_table_HC08_15 ≝
 244 [
 245   quadruple … STHX MODE_DIR1 (Byte 〈x3,x5〉) nat4
 246 ; quadruple … LDHX MODE_IMM2 (Byte 〈x4,x5〉) nat3
 247 ; quadruple … LDHX MODE_DIR1 (Byte 〈x5,x5〉) nat4
 248 ; quadruple … CPHX MODE_IMM2 (Byte 〈x6,x5〉) nat3
 249 ; quadruple … CPHX MODE_DIR1 (Byte 〈x7,x5〉) nat4
 250 ].
 251
 252 ndefinition opcode_table_HC08_16 ≝
 253 [
 254   quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) nat2
 255 ; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) nat3
 256 ; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) nat4
 257 ; quadruple … CPX MODE_IX2  (Byte 〈xD,x3〉) nat4
 258 ; quadruple … CPX MODE_IX1  (Byte 〈xE,x3〉) nat3
 259 ; quadruple … CPX MODE_IX0  (Byte 〈xF,x3〉) nat2
 260 ; quadruple … CPX MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x3〉〉) nat5
 261 ; quadruple … CPX MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x3〉〉) nat4
 262 ].
 263
 264 ndefinition opcode_table_HC08_17 ≝
 265 [
 266   quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) nat5
 267 ; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) nat3
 268 ; quadruple … DBNZ MODE_INHX_and_IMM1 (Byte 〈x5,xB〉) nat3
 269 ; quadruple … DBNZ MODE_IX1_and_IMM1  (Byte 〈x6,xB〉) nat5
 270 ; quadruple … DBNZ MODE_IX0_and_IMM1  (Byte 〈x7,xB〉) nat4
 271 ; quadruple … DBNZ MODE_SP1_and_IMM1  (Word 〈〈x9,xE〉:〈x6,xB〉〉) nat6
 272 ].
 273
 274 ndefinition opcode_table_HC08_18 ≝
 275 [
 276   quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) nat4
 277 ; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) nat1
 278 ; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) nat1
 279 ; quadruple … DEC MODE_IX1  (Byte 〈x6,xA〉) nat4
 280 ; quadruple … DEC MODE_IX0  (Byte 〈x7,xA〉) nat3
 281 ; quadruple … DEC MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xA〉〉) nat5
 282 ].
 283
 284 ndefinition opcode_table_HC08_19 ≝
 285 [
 286   quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) nat2
 287 ; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) nat3
 288 ; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) nat4
 289 ; quadruple … EOR MODE_IX2  (Byte 〈xD,x8〉) nat4
 290 ; quadruple … EOR MODE_IX1  (Byte 〈xE,x8〉) nat3
 291 ; quadruple … EOR MODE_IX0  (Byte 〈xF,x8〉) nat2
 292 ; quadruple … EOR MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x8〉〉) nat5
 293 ; quadruple … EOR MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x8〉〉) nat4
 294 ].
 295
 296 ndefinition opcode_table_HC08_20 ≝
 297 [
 298   quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) nat4
 299 ; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) nat1
 300 ; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) nat1
 301 ; quadruple … INC MODE_IX1  (Byte 〈x6,xC〉) nat4
 302 ; quadruple … INC MODE_IX0  (Byte 〈x7,xC〉) nat3
 303 ; quadruple … INC MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xC〉〉) nat5
 304 ].
 305
 306 ndefinition opcode_table_HC08_21 ≝
 307 [
 308   quadruple … JMP MODE_IMM1EXT  (Byte 〈xB,xC〉) nat2
 309 ; quadruple … JMP MODE_IMM2     (Byte 〈xC,xC〉) nat3
 310 ; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) nat4
 311 ; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) nat3
 312 ; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) nat3
 313 ].
 314
 315 ndefinition opcode_table_HC08_22 ≝
 316 [
 317   quadruple … BSR MODE_IMM1     (Byte 〈xA,xD〉) nat4
 318 ; quadruple … JSR MODE_IMM1EXT  (Byte 〈xB,xD〉) nat4
 319 ; quadruple … JSR MODE_IMM2     (Byte 〈xC,xD〉) nat5
 320 ; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) nat6
 321 ; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) nat5
 322 ; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) nat4
 323 ].
 324
 325 ndefinition opcode_table_HC08_23 ≝
 326 [
 327   quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) nat2
 328 ; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) nat3
 329 ; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) nat4
 330 ; quadruple … LDA MODE_IX2  (Byte 〈xD,x6〉) nat4
 331 ; quadruple … LDA MODE_IX1  (Byte 〈xE,x6〉) nat3
 332 ; quadruple … LDA MODE_IX0  (Byte 〈xF,x6〉) nat2
 333 ; quadruple … LDA MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x6〉〉) nat5
 334 ; quadruple … LDA MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x6〉〉) nat4
 335 ].
 336
 337 ndefinition opcode_table_HC08_24 ≝
 338 [
 339   quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) nat2
 340 ; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) nat3
 341 ; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) nat4
 342 ; quadruple … LDX MODE_IX2  (Byte 〈xD,xE〉) nat4
 343 ; quadruple … LDX MODE_IX1  (Byte 〈xE,xE〉) nat3
 344 ; quadruple … LDX MODE_IX0  (Byte 〈xF,xE〉) nat2
 345 ; quadruple … LDX MODE_SP2  (Word 〈〈x9,xE〉:〈xD,xE〉〉) nat5
 346 ; quadruple … LDX MODE_SP1  (Word 〈〈x9,xE〉:〈xE,xE〉〉) nat4
 347 ].
 348
 349 ndefinition opcode_table_HC08_25 ≝
 350 [
 351   quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) nat4
 352 ; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) nat1
 353 ; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) nat1
 354 ; quadruple … LSR MODE_IX1  (Byte 〈x6,x4〉) nat4
 355 ; quadruple … LSR MODE_IX0  (Byte 〈x7,x4〉) nat3
 356 ; quadruple … LSR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x4〉〉) nat5
 357 ].
 358
 359 ndefinition opcode_table_HC08_26 ≝
 360 [
 361   quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) nat5
 362 ; quadruple … MOV MODE_DIR1_to_IX0p (Byte 〈x5,xE〉) nat4
 363 ; quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x6,xE〉) nat4
 364 ; quadruple … MOV MODE_IX0p_to_DIR1 (Byte 〈x7,xE〉) nat4
 365 ].
 366
 367 ndefinition opcode_table_HC08_27 ≝
 368 [
 369   quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) nat4
 370 ; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) nat1
 371 ; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) nat1
 372 ; quadruple … NEG MODE_IX1  (Byte 〈x6,x0〉) nat4
 373 ; quadruple … NEG MODE_IX0  (Byte 〈x7,x0〉) nat3
 374 ; quadruple … NEG MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x0〉〉) nat5
 375 ].
 376
 377 ndefinition opcode_table_HC08_28 ≝
 378 [
 379   quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) nat2
 380 ; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) nat3
 381 ; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) nat4
 382 ; quadruple … ORA MODE_IX2  (Byte 〈xD,xA〉) nat4
 383 ; quadruple … ORA MODE_IX1  (Byte 〈xE,xA〉) nat3
 384 ; quadruple … ORA MODE_IX0  (Byte 〈xF,xA〉) nat2
 385 ; quadruple … ORA MODE_SP2  (Word 〈〈x9,xE〉:〈xD,xA〉〉) nat5
 386 ; quadruple … ORA MODE_SP1  (Word 〈〈x9,xE〉:〈xE,xA〉〉) nat4
 387 ].
 388
 389 ndefinition opcode_table_HC08_29 ≝
 390 [
 391   quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) nat4
 392 ; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) nat1
 393 ; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) nat1
 394 ; quadruple … ROL MODE_IX1  (Byte 〈x6,x9〉) nat4
 395 ; quadruple … ROL MODE_IX0  (Byte 〈x7,x9〉) nat3
 396 ; quadruple … ROL MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x9〉〉) nat5
 397 ].
 398
 399 ndefinition opcode_table_HC08_30 ≝
 400 [
 401   quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) nat4
 402 ; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) nat1
 403 ; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) nat1
 404 ; quadruple … ROR MODE_IX1  (Byte 〈x6,x6〉) nat4
 405 ; quadruple … ROR MODE_IX0  (Byte 〈x7,x6〉) nat3
 406 ; quadruple … ROR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x6〉〉) nat5
 407 ].
 408
 409 ndefinition opcode_table_HC08_31 ≝
 410 [
 411   quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) nat2
 412 ; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) nat3
 413 ; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) nat4
 414 ; quadruple … SBC MODE_IX2  (Byte 〈xD,x2〉) nat4
 415 ; quadruple … SBC MODE_IX1  (Byte 〈xE,x2〉) nat3
 416 ; quadruple … SBC MODE_IX0  (Byte 〈xF,x2〉) nat2
 417 ; quadruple … SBC MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x2〉〉) nat5
 418 ; quadruple … SBC MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x2〉〉) nat4
 419 ].
 420
 421 ndefinition opcode_table_HC08_32 ≝
 422 [
 423   quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) nat3
 424 ; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) nat4
 425 ; quadruple … STA MODE_IX2  (Byte 〈xD,x7〉) nat4
 426 ; quadruple … STA MODE_IX1  (Byte 〈xE,x7〉) nat3
 427 ; quadruple … STA MODE_IX0  (Byte 〈xF,x7〉) nat2
 428 ; quadruple … STA MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x7〉〉) nat5
 429 ; quadruple … STA MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x7〉〉) nat4
 430 ].
 431
 432 ndefinition opcode_table_HC08_33 ≝
 433 [
 434   quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) nat3
 435 ; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) nat4
 436 ; quadruple … STX MODE_IX2  (Byte 〈xD,xF〉) nat4
 437 ; quadruple … STX MODE_IX1  (Byte 〈xE,xF〉) nat3
 438 ; quadruple … STX MODE_IX0  (Byte 〈xF,xF〉) nat2
 439 ; quadruple … STX MODE_SP2  (Word 〈〈x9,xE〉:〈xD,xF〉〉) nat5
 440 ; quadruple … STX MODE_SP1  (Word 〈〈x9,xE〉:〈xE,xF〉〉) nat4
 441 ].
 442
 443 ndefinition opcode_table_HC08_34 ≝
 444 [
 445   quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) nat2
 446 ; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) nat3
 447 ; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) nat4
 448 ; quadruple … SUB MODE_IX2  (Byte 〈xD,x0〉) nat4
 449 ; quadruple … SUB MODE_IX1  (Byte 〈xE,x0〉) nat3
 450 ; quadruple … SUB MODE_IX0  (Byte 〈xF,x0〉) nat2
 451 ; quadruple … SUB MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x0〉〉) nat5
 452 ; quadruple … SUB MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x0〉〉) nat4
 453 ].
 454
 455 ndefinition opcode_table_HC08_35 ≝
 456 [
 457   quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) nat3
 458 ; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) nat1
 459 ; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) nat1
 460 ; quadruple … TST MODE_IX1  (Byte 〈x6,xD〉) nat3
 461 ; quadruple … TST MODE_IX0  (Byte 〈x7,xD〉) nat2
 462 ; quadruple … TST MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xD〉〉) nat4
 463 ].
 464
 465 ndefinition opcode_table_HC08 ≝
 466 opcode_table_HC08_1  @ opcode_table_HC08_2  @ opcode_table_HC08_3  @ opcode_table_HC08_4  @
 467 opcode_table_HC08_5  @ opcode_table_HC08_6  @ opcode_table_HC08_7  @ opcode_table_HC08_8  @
 468 opcode_table_HC08_9  @ opcode_table_HC08_10 @ opcode_table_HC08_11 @ opcode_table_HC08_12 @
 469 opcode_table_HC08_13 @ opcode_table_HC08_14 @ opcode_table_HC08_15 @ opcode_table_HC08_16 @
 470 opcode_table_HC08_17 @ opcode_table_HC08_18 @ opcode_table_HC08_19 @ opcode_table_HC08_20 @
 471 opcode_table_HC08_21 @ opcode_table_HC08_22 @ opcode_table_HC08_23 @ opcode_table_HC08_24 @
 472 opcode_table_HC08_25 @ opcode_table_HC08_26 @ opcode_table_HC08_27 @ opcode_table_HC08_28 @
 473 opcode_table_HC08_29 @ opcode_table_HC08_30 @ opcode_table_HC08_31 @ opcode_table_HC08_32 @
 474 opcode_table_HC08_33 @ opcode_table_HC08_34 @ opcode_table_HC08_35.