helm/software/matita/contribs/ng_assembly2/emulator/opcodes/HCS08_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'HCS08 *)
  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_HCS08_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〉) nat3
  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_HCS08_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〉) nat3
  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_HCS08_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〉) nat3
  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_HCS08_4 ≝
  72 [
  73   quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) nat5
  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〉) nat5
  77 ; quadruple … ASL MODE_IX0  (Byte 〈x7,x8〉) nat4
  78 ; quadruple … ASL MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x8〉〉) nat6
  79 ].
  80
  81 ndefinition opcode_table_HCS08_5 ≝
  82 [
  83   quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) nat5
  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〉) nat5
  87 ; quadruple … ASR MODE_IX0  (Byte 〈x7,x7〉) nat4
  88 ; quadruple … ASR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x7〉〉) nat6
  89 ].
  90
  91 ndefinition opcode_table_HCS08_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_HCS08_7 ≝
 116 [
 117   quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) nat5
 118 ; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) nat5
 119 ; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) nat5
 120 ; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) nat5
 121 ; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) nat5
 122 ; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) nat5
 123 ; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) nat5
 124 ; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) nat5
 125 ; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) nat5
 126 ; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) nat5
 127 ; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) nat5
 128 ; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) nat5
 129 ; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) nat5
 130 ; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) nat5
 131 ; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) nat5
 132 ; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) nat5
 133 ].
 134
 135 ndefinition opcode_table_HCS08_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_HCS08_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〉) nat3
 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_HCS08_10 ≝
 168 [
 169   quadruple … MUL  MODE_INH  (Byte 〈x4,x2〉) nat5
 170 ; quadruple … DIV  MODE_INH  (Byte 〈x5,x2〉) nat6
 171 ; quadruple … NSA  MODE_INH  (Byte 〈x6,x2〉) nat1
 172 ; quadruple … DAA  MODE_INH  (Byte 〈x7,x2〉) nat1
 173 ; quadruple … RTI  MODE_INH  (Byte 〈x8,x0〉) nat9
 174 ; quadruple … RTS  MODE_INH  (Byte 〈x8,x1〉) nat6
 175 ; quadruple … SWI  MODE_INH  (Byte 〈x8,x3〉) nat11
 176 ; quadruple … BGND MODE_INH  (Byte 〈x8,x2〉) nat5
 177 ; quadruple … TAP  MODE_INH  (Byte 〈x8,x4〉) nat1
 178 ; quadruple … TPA  MODE_INH  (Byte 〈x8,x5〉) nat1
 179 ; quadruple … PULA MODE_INH  (Byte 〈x8,x6〉) nat3
 180 ; quadruple … PSHA MODE_INH  (Byte 〈x8,x7〉) nat2
 181 ; quadruple … PULX MODE_INH  (Byte 〈x8,x8〉) nat3
 182 ; quadruple … PSHX MODE_INH  (Byte 〈x8,x9〉) nat2
 183 ; quadruple … PULH MODE_INH  (Byte 〈x8,xA〉) nat3
 184 ; quadruple … PSHH MODE_INH  (Byte 〈x8,xB〉) nat2
 185 ; quadruple … STOP MODE_INH  (Byte 〈x8,xE〉) nat2
 186 ; quadruple … WAIT MODE_INH  (Byte 〈x8,xF〉) nat2
 187 ; quadruple … TXS  MODE_INH  (Byte 〈x9,x4〉) nat2
 188 ; quadruple … TSX  MODE_INH  (Byte 〈x9,x5〉) nat2
 189 ; quadruple … TAX  MODE_INH  (Byte 〈x9,x7〉) nat1
 190 ; quadruple … CLC  MODE_INH  (Byte 〈x9,x8〉) nat1
 191 ; quadruple … SEC  MODE_INH  (Byte 〈x9,x9〉) nat1
 192 ; quadruple … CLI  MODE_INH  (Byte 〈x9,xA〉) nat1
 193 ; quadruple … SEI  MODE_INH  (Byte 〈x9,xB〉) nat1
 194 ; quadruple … RSP  MODE_INH  (Byte 〈x9,xC〉) nat1
 195 ; quadruple … NOP  MODE_INH  (Byte 〈x9,xD〉) nat1
 196 ; quadruple … TXA  MODE_INH  (Byte 〈x9,xF〉) nat1
 197 ; quadruple … AIS  MODE_IMM1 (Byte 〈xA,x7〉) nat2
 198 ; quadruple … AIX  MODE_IMM1 (Byte 〈xA,xF〉) nat2
 199 ].
 200
 201 ndefinition opcode_table_HCS08_11 ≝
 202 [
 203   quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) nat5
 204 ; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) nat4
 205 ; quadruple … CBEQX MODE_IMM1_and_IMM1 (Byte 〈x5,x1〉) nat4
 206 ; quadruple … CBEQA MODE_IX1p_and_IMM1 (Byte 〈x6,x1〉) nat5
 207 ; quadruple … CBEQA MODE_IX0p_and_IMM1 (Byte 〈x7,x1〉) nat5
 208 ; quadruple … CBEQA MODE_SP1_and_IMM1  (Word 〈〈x9,xE〉:〈x6,x1〉〉) nat6
 209 ].
 210
 211 ndefinition opcode_table_HCS08_12 ≝
 212 [
 213   quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) nat5
 214 ; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) nat1
 215 ; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) nat1
 216 ; quadruple … CLR MODE_IX1  (Byte 〈x6,xF〉) nat5
 217 ; quadruple … CLR MODE_IX0  (Byte 〈x7,xF〉) nat4
 218 ; quadruple … CLR MODE_INHH (Byte 〈x8,xC〉) nat1
 219 ; quadruple … CLR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xF〉〉) nat6
 220 ].
 221
 222 ndefinition opcode_table_HCS08_13 ≝
 223 [
 224   quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) nat2
 225 ; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) nat3
 226 ; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) nat4
 227 ; quadruple … CMP MODE_IX2  (Byte 〈xD,x1〉) nat4
 228 ; quadruple … CMP MODE_IX1  (Byte 〈xE,x1〉) nat3
 229 ; quadruple … CMP MODE_IX0  (Byte 〈xF,x1〉) nat3
 230 ; quadruple … CMP MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x1〉〉) nat5
 231 ; quadruple … CMP MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x1〉〉) nat4
 232 ].
 233
 234 ndefinition opcode_table_HCS08_14 ≝
 235 [
 236   quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) nat5
 237 ; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) nat1
 238 ; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) nat1
 239 ; quadruple … COM MODE_IX1  (Byte 〈x6,x3〉) nat5
 240 ; quadruple … COM MODE_IX0  (Byte 〈x7,x3〉) nat4
 241 ; quadruple … COM MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x3〉〉) nat6
 242 ].
 243
 244 ndefinition opcode_table_HCS08_15 ≝
 245 [
 246   quadruple … CPHX MODE_DIR2 (Byte 〈x3,xE〉) nat6
 247 ; quadruple … CPHX MODE_IMM2 (Byte 〈x6,x5〉) nat3
 248 ; quadruple … CPHX MODE_DIR1 (Byte 〈x7,x5〉) nat5
 249 ; quadruple … CPHX MODE_SP1  (Word 〈〈x9,xE〉:〈xF,x3〉〉) nat6
 250
 251 ; quadruple … LDHX MODE_DIR2 (Byte 〈x3,x2〉) nat5
 252 ; quadruple … LDHX MODE_IMM2 (Byte 〈x4,x5〉) nat3
 253 ; quadruple … LDHX MODE_DIR1 (Byte 〈x5,x5〉) nat4
 254 ; quadruple … LDHX MODE_IX0  (Word 〈〈x9,xE〉:〈xA,xE〉〉) nat5
 255 ; quadruple … LDHX MODE_IX2  (Word 〈〈x9,xE〉:〈xB,xE〉〉) nat6
 256 ; quadruple … LDHX MODE_IX1  (Word 〈〈x9,xE〉:〈xC,xE〉〉) nat5
 257 ; quadruple … LDHX MODE_SP1  (Word 〈〈x9,xE〉:〈xF,xE〉〉) nat5
 258
 259 ; quadruple … STHX MODE_DIR1 (Byte 〈x3,x5〉) nat4
 260 ; quadruple … STHX MODE_DIR2 (Byte 〈x9,x6〉) nat5
 261 ; quadruple … STHX MODE_SP1  (Word 〈〈x9,xE〉:〈xF,xF〉〉) nat5
 262 ].
 263
 264 ndefinition opcode_table_HCS08_16 ≝
 265 [
 266   quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) nat2
 267 ; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) nat3
 268 ; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) nat4
 269 ; quadruple … CPX MODE_IX2  (Byte 〈xD,x3〉) nat4
 270 ; quadruple … CPX MODE_IX1  (Byte 〈xE,x3〉) nat3
 271 ; quadruple … CPX MODE_IX0  (Byte 〈xF,x3〉) nat3
 272 ; quadruple … CPX MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x3〉〉) nat5
 273 ; quadruple … CPX MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x3〉〉) nat4
 274 ].
 275
 276 ndefinition opcode_table_HCS08_17 ≝
 277 [
 278   quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) nat7
 279 ; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) nat4
 280 ; quadruple … DBNZ MODE_INHX_and_IMM1 (Byte 〈x5,xB〉) nat4
 281 ; quadruple … DBNZ MODE_IX1_and_IMM1  (Byte 〈x6,xB〉) nat7
 282 ; quadruple … DBNZ MODE_IX0_and_IMM1  (Byte 〈x7,xB〉) nat6
 283 ; quadruple … DBNZ MODE_SP1_and_IMM1  (Word 〈〈x9,xE〉:〈x6,xB〉〉) nat8
 284 ].
 285
 286 ndefinition opcode_table_HCS08_18 ≝
 287 [
 288   quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) nat5
 289 ; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) nat1
 290 ; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) nat1
 291 ; quadruple … DEC MODE_IX1  (Byte 〈x6,xA〉) nat5
 292 ; quadruple … DEC MODE_IX0  (Byte 〈x7,xA〉) nat4
 293 ; quadruple … DEC MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xA〉〉) nat6
 294 ].
 295
 296 ndefinition opcode_table_HCS08_19 ≝
 297 [
 298   quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) nat2
 299 ; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) nat3
 300 ; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) nat4
 301 ; quadruple … EOR MODE_IX2  (Byte 〈xD,x8〉) nat4
 302 ; quadruple … EOR MODE_IX1  (Byte 〈xE,x8〉) nat3
 303 ; quadruple … EOR MODE_IX0  (Byte 〈xF,x8〉) nat3
 304 ; quadruple … EOR MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x8〉〉) nat5
 305 ; quadruple … EOR MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x8〉〉) nat4
 306 ].
 307
 308 ndefinition opcode_table_HCS08_20 ≝
 309 [
 310   quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) nat5
 311 ; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) nat1
 312 ; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) nat1
 313 ; quadruple … INC MODE_IX1  (Byte 〈x6,xC〉) nat5
 314 ; quadruple … INC MODE_IX0  (Byte 〈x7,xC〉) nat4
 315 ; quadruple … INC MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xC〉〉) nat6
 316 ].
 317
 318 ndefinition opcode_table_HCS08_21 ≝
 319 [
 320   quadruple … JMP MODE_IMM1EXT  (Byte 〈xB,xC〉) nat3
 321 ; quadruple … JMP MODE_IMM2     (Byte 〈xC,xC〉) nat4
 322 ; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) nat4
 323 ; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) nat3
 324 ; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) nat3
 325 ].
 326
 327 ndefinition opcode_table_HCS08_22 ≝
 328 [
 329   quadruple … BSR MODE_IMM1     (Byte 〈xA,xD〉) nat5
 330 ; quadruple … JSR MODE_IMM1EXT  (Byte 〈xB,xD〉) nat5
 331 ; quadruple … JSR MODE_IMM2     (Byte 〈xC,xD〉) nat6
 332 ; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) nat6
 333 ; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) nat5
 334 ; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) nat5
 335 ].
 336
 337 ndefinition opcode_table_HCS08_23 ≝
 338 [
 339   quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) nat2
 340 ; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) nat3
 341 ; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) nat4
 342 ; quadruple … LDA MODE_IX2  (Byte 〈xD,x6〉) nat4
 343 ; quadruple … LDA MODE_IX1  (Byte 〈xE,x6〉) nat3
 344 ; quadruple … LDA MODE_IX0  (Byte 〈xF,x6〉) nat3
 345 ; quadruple … LDA MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x6〉〉) nat5
 346 ; quadruple … LDA MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x6〉〉) nat4
 347 ].
 348
 349 ndefinition opcode_table_HCS08_24 ≝
 350 [
 351   quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) nat2
 352 ; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) nat3
 353 ; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) nat4
 354 ; quadruple … LDX MODE_IX2  (Byte 〈xD,xE〉) nat4
 355 ; quadruple … LDX MODE_IX1  (Byte 〈xE,xE〉) nat3
 356 ; quadruple … LDX MODE_IX0  (Byte 〈xF,xE〉) nat3
 357 ; quadruple … LDX MODE_SP2  (Word 〈〈x9,xE〉:〈xD,xE〉〉) nat5
 358 ; quadruple … LDX MODE_SP1  (Word 〈〈x9,xE〉:〈xE,xE〉〉) nat4
 359 ].
 360
 361 ndefinition opcode_table_HCS08_25 ≝
 362 [
 363   quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) nat5
 364 ; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) nat1
 365 ; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) nat1
 366 ; quadruple … LSR MODE_IX1  (Byte 〈x6,x4〉) nat5
 367 ; quadruple … LSR MODE_IX0  (Byte 〈x7,x4〉) nat4
 368 ; quadruple … LSR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x4〉〉) nat6
 369 ].
 370
 371 ndefinition opcode_table_HCS08_26 ≝
 372 [
 373   quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) nat5
 374 ; quadruple … MOV MODE_DIR1_to_IX0p (Byte 〈x5,xE〉) nat5
 375 ; quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x6,xE〉) nat4
 376 ; quadruple … MOV MODE_IX0p_to_DIR1 (Byte 〈x7,xE〉) nat5
 377 ].
 378
 379 ndefinition opcode_table_HCS08_27 ≝
 380 [
 381   quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) nat5
 382 ; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) nat1
 383 ; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) nat1
 384 ; quadruple … NEG MODE_IX1  (Byte 〈x6,x0〉) nat5
 385 ; quadruple … NEG MODE_IX0  (Byte 〈x7,x0〉) nat4
 386 ; quadruple … NEG MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x0〉〉) nat6
 387 ].
 388
 389 ndefinition opcode_table_HCS08_28 ≝
 390 [
 391   quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) nat2
 392 ; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) nat3
 393 ; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) nat4
 394 ; quadruple … ORA MODE_IX2  (Byte 〈xD,xA〉) nat4
 395 ; quadruple … ORA MODE_IX1  (Byte 〈xE,xA〉) nat3
 396 ; quadruple … ORA MODE_IX0  (Byte 〈xF,xA〉) nat3
 397 ; quadruple … ORA MODE_SP2  (Word 〈〈x9,xE〉:〈xD,xA〉〉) nat5
 398 ; quadruple … ORA MODE_SP1  (Word 〈〈x9,xE〉:〈xE,xA〉〉) nat4
 399 ].
 400
 401 ndefinition opcode_table_HCS08_29 ≝
 402 [
 403   quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) nat5
 404 ; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) nat1
 405 ; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) nat1
 406 ; quadruple … ROL MODE_IX1  (Byte 〈x6,x9〉) nat5
 407 ; quadruple … ROL MODE_IX0  (Byte 〈x7,x9〉) nat4
 408 ; quadruple … ROL MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x9〉〉) nat6
 409 ].
 410
 411 ndefinition opcode_table_HCS08_30 ≝
 412 [
 413   quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) nat5
 414 ; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) nat1
 415 ; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) nat1
 416 ; quadruple … ROR MODE_IX1  (Byte 〈x6,x6〉) nat5
 417 ; quadruple … ROR MODE_IX0  (Byte 〈x7,x6〉) nat4
 418 ; quadruple … ROR MODE_SP1  (Word 〈〈x9,xE〉:〈x6,x6〉〉) nat6
 419 ].
 420
 421 ndefinition opcode_table_HCS08_31 ≝
 422 [
 423   quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) nat2
 424 ; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) nat3
 425 ; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) nat4
 426 ; quadruple … SBC MODE_IX2  (Byte 〈xD,x2〉) nat4
 427 ; quadruple … SBC MODE_IX1  (Byte 〈xE,x2〉) nat3
 428 ; quadruple … SBC MODE_IX0  (Byte 〈xF,x2〉) nat3
 429 ; quadruple … SBC MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x2〉〉) nat5
 430 ; quadruple … SBC MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x2〉〉) nat4
 431 ].
 432
 433 ndefinition opcode_table_HCS08_32 ≝
 434 [
 435   quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) nat3
 436 ; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) nat4
 437 ; quadruple … STA MODE_IX2  (Byte 〈xD,x7〉) nat4
 438 ; quadruple … STA MODE_IX1  (Byte 〈xE,x7〉) nat3
 439 ; quadruple … STA MODE_IX0  (Byte 〈xF,x7〉) nat2
 440 ; quadruple … STA MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x7〉〉) nat5
 441 ; quadruple … STA MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x7〉〉) nat4
 442 ].
 443
 444 ndefinition opcode_table_HCS08_33 ≝
 445 [
 446   quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) nat3
 447 ; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) nat4
 448 ; quadruple … STX MODE_IX2  (Byte 〈xD,xF〉) nat4
 449 ; quadruple … STX MODE_IX1  (Byte 〈xE,xF〉) nat3
 450 ; quadruple … STX MODE_IX0  (Byte 〈xF,xF〉) nat2
 451 ; quadruple … STX MODE_SP2  (Word 〈〈x9,xE〉:〈xD,xF〉〉) nat5
 452 ; quadruple … STX MODE_SP1  (Word 〈〈x9,xE〉:〈xE,xF〉〉) nat4
 453 ].
 454
 455 ndefinition opcode_table_HCS08_34 ≝
 456 [
 457   quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) nat2
 458 ; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) nat3
 459 ; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) nat4
 460 ; quadruple … SUB MODE_IX2  (Byte 〈xD,x0〉) nat4
 461 ; quadruple … SUB MODE_IX1  (Byte 〈xE,x0〉) nat3
 462 ; quadruple … SUB MODE_IX0  (Byte 〈xF,x0〉) nat3
 463 ; quadruple … SUB MODE_SP2  (Word 〈〈x9,xE〉:〈xD,x0〉〉) nat5
 464 ; quadruple … SUB MODE_SP1  (Word 〈〈x9,xE〉:〈xE,x0〉〉) nat4
 465 ].
 466
 467 ndefinition opcode_table_HCS08_35 ≝
 468 [
 469   quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) nat4
 470 ; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) nat1
 471 ; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) nat1
 472 ; quadruple … TST MODE_IX1  (Byte 〈x6,xD〉) nat4
 473 ; quadruple … TST MODE_IX0  (Byte 〈x7,xD〉) nat3
 474 ; quadruple … TST MODE_SP1  (Word 〈〈x9,xE〉:〈x6,xD〉〉) nat5
 475 ].
 476
 477 ndefinition opcode_table_HCS08 ≝
 478 opcode_table_HCS08_1  @ opcode_table_HCS08_2  @ opcode_table_HCS08_3  @ opcode_table_HCS08_4  @
 479 opcode_table_HCS08_5  @ opcode_table_HCS08_6  @ opcode_table_HCS08_7  @ opcode_table_HCS08_8  @
 480 opcode_table_HCS08_9  @ opcode_table_HCS08_10 @ opcode_table_HCS08_11 @ opcode_table_HCS08_12 @
 481 opcode_table_HCS08_13 @ opcode_table_HCS08_14 @ opcode_table_HCS08_15 @ opcode_table_HCS08_16 @
 482 opcode_table_HCS08_17 @ opcode_table_HCS08_18 @ opcode_table_HCS08_19 @ opcode_table_HCS08_20 @
 483 opcode_table_HCS08_21 @ opcode_table_HCS08_22 @ opcode_table_HCS08_23 @ opcode_table_HCS08_24 @
 484 opcode_table_HCS08_25 @ opcode_table_HCS08_26 @ opcode_table_HCS08_27 @ opcode_table_HCS08_28 @
 485 opcode_table_HCS08_29 @ opcode_table_HCS08_30 @ opcode_table_HCS08_31 @ opcode_table_HCS08_32 @
 486 opcode_table_HCS08_33 @ opcode_table_HCS08_34 @ opcode_table_HCS08_35.