1 (**************************************************************************)
4 (* ||A|| A project by Andrea Asperti *)
6 (* ||I|| Developers: *)
7 (* ||T|| The HELM team. *)
8 (* ||A|| http://helm.cs.unibo.it *)
10 (* \ / This file is distributed under the terms of the *)
11 (* v GNU General Public License Version 2 *)
13 (**************************************************************************)
15 (* ********************************************************************** *)
16 (* Progetto FreeScale *)
18 (* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
19 (* Sviluppo: 2008-2010 *)
21 (* ********************************************************************** *)
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".
28 (* ***************** *)
29 (* TABELLA DELL'HC05 *)
30 (* ***************** *)
32 (* definizione come concatenazione finale di liste per velocizzare il parsing *)
33 (* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
35 ndefinition opcode_table_HC05_1 ≝
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〉) nat5
41 ; quadruple … ADC MODE_IX1 (Byte 〈xE,x9〉) nat4
42 ; quadruple … ADC MODE_IX0 (Byte 〈xF,x9〉) nat4
45 ndefinition opcode_table_HC05_2 ≝
47 quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) nat2
48 ; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) nat3
49 ; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) nat4
50 ; quadruple … ADD MODE_IX2 (Byte 〈xD,xB〉) nat5
51 ; quadruple … ADD MODE_IX1 (Byte 〈xE,xB〉) nat4
52 ; quadruple … ADD MODE_IX0 (Byte 〈xF,xB〉) nat3
55 ndefinition opcode_table_HC05_3 ≝
57 quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) nat2
58 ; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) nat3
59 ; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) nat4
60 ; quadruple … AND MODE_IX2 (Byte 〈xD,x4〉) nat5
61 ; quadruple … AND MODE_IX1 (Byte 〈xE,x4〉) nat4
62 ; quadruple … AND MODE_IX0 (Byte 〈xF,x4〉) nat3
65 ndefinition opcode_table_HC05_4 ≝
67 quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) nat5
68 ; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) nat3
69 ; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) nat3
70 ; quadruple … ASL MODE_IX1 (Byte 〈x6,x8〉) nat6
71 ; quadruple … ASL MODE_IX0 (Byte 〈x7,x8〉) nat5
74 ndefinition opcode_table_HC05_5 ≝
76 quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) nat5
77 ; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) nat3
78 ; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) nat3
79 ; quadruple … ASR MODE_IX1 (Byte 〈x6,x7〉) nat6
80 ; quadruple … ASR MODE_IX0 (Byte 〈x7,x7〉) nat5
83 ndefinition opcode_table_HC05_6 ≝
85 quadruple … BRA MODE_IMM1 (Byte 〈x2,x0〉) nat3
86 ; quadruple … BRN MODE_IMM1 (Byte 〈x2,x1〉) nat3
87 ; quadruple … BHI MODE_IMM1 (Byte 〈x2,x2〉) nat3
88 ; quadruple … BLS MODE_IMM1 (Byte 〈x2,x3〉) nat3
89 ; quadruple … BCC MODE_IMM1 (Byte 〈x2,x4〉) nat3
90 ; quadruple … BCS MODE_IMM1 (Byte 〈x2,x5〉) nat3
91 ; quadruple … BNE MODE_IMM1 (Byte 〈x2,x6〉) nat3
92 ; quadruple … BEQ MODE_IMM1 (Byte 〈x2,x7〉) nat3
93 ; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) nat3
94 ; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) nat3
95 ; quadruple … BPL MODE_IMM1 (Byte 〈x2,xA〉) nat3
96 ; quadruple … BMI MODE_IMM1 (Byte 〈x2,xB〉) nat3
97 ; quadruple … BMC MODE_IMM1 (Byte 〈x2,xC〉) nat3
98 ; quadruple … BMS MODE_IMM1 (Byte 〈x2,xD〉) nat3
99 ; quadruple … BIL MODE_IMM1 (Byte 〈x2,xE〉) nat3
100 ; quadruple … BIH MODE_IMM1 (Byte 〈x2,xF〉) nat3
103 ndefinition opcode_table_HC05_7 ≝
105 quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) nat5
106 ; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) nat5
107 ; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) nat5
108 ; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) nat5
109 ; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) nat5
110 ; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) nat5
111 ; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) nat5
112 ; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) nat5
113 ; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) nat5
114 ; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) nat5
115 ; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) nat5
116 ; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) nat5
117 ; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) nat5
118 ; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) nat5
119 ; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) nat5
120 ; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) nat5
123 ndefinition opcode_table_HC05_8 ≝
125 quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) nat5
126 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) nat5
127 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) nat5
128 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) nat5
129 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) nat5
130 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) nat5
131 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) nat5
132 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) nat5
133 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) nat5
134 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) nat5
135 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) nat5
136 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) nat5
137 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) nat5
138 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) nat5
139 ; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) nat5
140 ; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) nat5
143 ndefinition opcode_table_HC05_9 ≝
145 quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) nat2
146 ; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) nat3
147 ; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) nat4
148 ; quadruple … BIT MODE_IX2 (Byte 〈xD,x5〉) nat5
149 ; quadruple … BIT MODE_IX1 (Byte 〈xE,x5〉) nat4
150 ; quadruple … BIT MODE_IX0 (Byte 〈xF,x5〉) nat3
153 ndefinition opcode_table_HC05_10 ≝
155 quadruple … MUL MODE_INH (Byte 〈x4,x2〉) nat11
156 ; quadruple … RTI MODE_INH (Byte 〈x8,x0〉) nat9
157 ; quadruple … RTS MODE_INH (Byte 〈x8,x1〉) nat6
158 ; quadruple … SWI MODE_INH (Byte 〈x8,x3〉) nat10
159 ; quadruple … STOP MODE_INH (Byte 〈x8,xE〉) nat2
160 ; quadruple … WAIT MODE_INH (Byte 〈x8,xF〉) nat2
161 ; quadruple … TAX MODE_INH (Byte 〈x9,x7〉) nat2
162 ; quadruple … CLC MODE_INH (Byte 〈x9,x8〉) nat2
163 ; quadruple … SEC MODE_INH (Byte 〈x9,x9〉) nat2
164 ; quadruple … CLI MODE_INH (Byte 〈x9,xA〉) nat2
165 ; quadruple … SEI MODE_INH (Byte 〈x9,xB〉) nat2
166 ; quadruple … RSP MODE_INH (Byte 〈x9,xC〉) nat2
167 ; quadruple … NOP MODE_INH (Byte 〈x9,xD〉) nat2
168 ; quadruple … TXA MODE_INH (Byte 〈x9,xF〉) nat2
171 ndefinition opcode_table_HC05_11 ≝
173 quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) nat5
174 ; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) nat3
175 ; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) nat3
176 ; quadruple … CLR MODE_IX1 (Byte 〈x6,xF〉) nat6
177 ; quadruple … CLR MODE_IX0 (Byte 〈x7,xF〉) nat5
180 ndefinition opcode_table_HC05_12 ≝
182 quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) nat2
183 ; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) nat3
184 ; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) nat4
185 ; quadruple … CMP MODE_IX2 (Byte 〈xD,x1〉) nat5
186 ; quadruple … CMP MODE_IX1 (Byte 〈xE,x1〉) nat4
187 ; quadruple … CMP MODE_IX0 (Byte 〈xF,x1〉) nat3
190 ndefinition opcode_table_HC05_13 ≝
192 quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) nat5
193 ; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) nat3
194 ; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) nat3
195 ; quadruple … COM MODE_IX1 (Byte 〈x6,x3〉) nat6
196 ; quadruple … COM MODE_IX0 (Byte 〈x7,x3〉) nat5
199 ndefinition opcode_table_HC05_14 ≝
201 quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) nat2
202 ; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) nat3
203 ; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) nat4
204 ; quadruple … CPX MODE_IX2 (Byte 〈xD,x3〉) nat5
205 ; quadruple … CPX MODE_IX1 (Byte 〈xE,x3〉) nat4
206 ; quadruple … CPX MODE_IX0 (Byte 〈xF,x3〉) nat3
209 ndefinition opcode_table_HC05_15 ≝
211 quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) nat5
212 ; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) nat3
213 ; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) nat3
214 ; quadruple … DEC MODE_IX1 (Byte 〈x6,xA〉) nat6
215 ; quadruple … DEC MODE_IX0 (Byte 〈x7,xA〉) nat5
218 ndefinition opcode_table_HC05_16 ≝
220 quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) nat2
221 ; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) nat3
222 ; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) nat4
223 ; quadruple … EOR MODE_IX2 (Byte 〈xD,x8〉) nat5
224 ; quadruple … EOR MODE_IX1 (Byte 〈xE,x8〉) nat4
225 ; quadruple … EOR MODE_IX0 (Byte 〈xF,x8〉) nat3
228 ndefinition opcode_table_HC05_17 ≝
230 quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) nat5
231 ; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) nat3
232 ; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) nat3
233 ; quadruple … INC MODE_IX1 (Byte 〈x6,xC〉) nat6
234 ; quadruple … INC MODE_IX0 (Byte 〈x7,xC〉) nat5
237 ndefinition opcode_table_HC05_18 ≝
239 quadruple … JMP MODE_IMM1EXT (Byte 〈xB,xC〉) nat2
240 ; quadruple … JMP MODE_IMM2 (Byte 〈xC,xC〉) nat3
241 ; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) nat4
242 ; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) nat3
243 ; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) nat2
246 ndefinition opcode_table_HC05_19 ≝
248 quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) nat6
249 ; quadruple … JSR MODE_IMM1EXT (Byte 〈xB,xD〉) nat5
250 ; quadruple … JSR MODE_IMM2 (Byte 〈xC,xD〉) nat6
251 ; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) nat7
252 ; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) nat6
253 ; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) nat5
256 ndefinition opcode_table_HC05_20 ≝
258 quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) nat2
259 ; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) nat3
260 ; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) nat4
261 ; quadruple … LDA MODE_IX2 (Byte 〈xD,x6〉) nat5
262 ; quadruple … LDA MODE_IX1 (Byte 〈xE,x6〉) nat4
263 ; quadruple … LDA MODE_IX0 (Byte 〈xF,x6〉) nat3
266 ndefinition opcode_table_HC05_21 ≝
268 quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) nat2
269 ; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) nat3
270 ; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) nat4
271 ; quadruple … LDX MODE_IX2 (Byte 〈xD,xE〉) nat5
272 ; quadruple … LDX MODE_IX1 (Byte 〈xE,xE〉) nat4
273 ; quadruple … LDX MODE_IX0 (Byte 〈xF,xE〉) nat3
276 ndefinition opcode_table_HC05_22 ≝
278 quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) nat5
279 ; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) nat3
280 ; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) nat3
281 ; quadruple … LSR MODE_IX1 (Byte 〈x6,x4〉) nat6
282 ; quadruple … LSR MODE_IX0 (Byte 〈x7,x4〉) nat5
285 ndefinition opcode_table_HC05_23 ≝
287 quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) nat5
288 ; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) nat3
289 ; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) nat3
290 ; quadruple … NEG MODE_IX1 (Byte 〈x6,x0〉) nat6
291 ; quadruple … NEG MODE_IX0 (Byte 〈x7,x0〉) nat5
294 ndefinition opcode_table_HC05_24 ≝
296 quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) nat2
297 ; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) nat3
298 ; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) nat4
299 ; quadruple … ORA MODE_IX2 (Byte 〈xD,xA〉) nat5
300 ; quadruple … ORA MODE_IX1 (Byte 〈xE,xA〉) nat4
301 ; quadruple … ORA MODE_IX0 (Byte 〈xF,xA〉) nat3
304 ndefinition opcode_table_HC05_25 ≝
306 quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) nat5
307 ; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) nat3
308 ; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) nat3
309 ; quadruple … ROL MODE_IX1 (Byte 〈x6,x9〉) nat6
310 ; quadruple … ROL MODE_IX0 (Byte 〈x7,x9〉) nat5
313 ndefinition opcode_table_HC05_26 ≝
315 quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) nat5
316 ; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) nat3
317 ; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) nat3
318 ; quadruple … ROR MODE_IX1 (Byte 〈x6,x6〉) nat6
319 ; quadruple … ROR MODE_IX0 (Byte 〈x7,x6〉) nat5
322 ndefinition opcode_table_HC05_27 ≝
324 quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) nat2
325 ; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) nat3
326 ; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) nat4
327 ; quadruple … SBC MODE_IX2 (Byte 〈xD,x2〉) nat5
328 ; quadruple … SBC MODE_IX1 (Byte 〈xE,x2〉) nat4
329 ; quadruple … SBC MODE_IX0 (Byte 〈xF,x2〉) nat3
332 ndefinition opcode_table_HC05_28 ≝
334 quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) nat4
335 ; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) nat5
336 ; quadruple … STA MODE_IX2 (Byte 〈xD,x7〉) nat6
337 ; quadruple … STA MODE_IX1 (Byte 〈xE,x7〉) nat5
338 ; quadruple … STA MODE_IX0 (Byte 〈xF,x7〉) nat4
341 ndefinition opcode_table_HC05_29 ≝
343 quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) nat4
344 ; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) nat5
345 ; quadruple … STX MODE_IX2 (Byte 〈xD,xF〉) nat6
346 ; quadruple … STX MODE_IX1 (Byte 〈xE,xF〉) nat5
347 ; quadruple … STX MODE_IX0 (Byte 〈xF,xF〉) nat4
350 ndefinition opcode_table_HC05_30 ≝
352 quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) nat2
353 ; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) nat3
354 ; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) nat4
355 ; quadruple … SUB MODE_IX2 (Byte 〈xD,x0〉) nat5
356 ; quadruple … SUB MODE_IX1 (Byte 〈xE,x0〉) nat4
357 ; quadruple … SUB MODE_IX0 (Byte 〈xF,x0〉) nat3
360 ndefinition opcode_table_HC05_31 ≝
362 quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) nat4
363 ; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) nat3
364 ; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) nat3
365 ; quadruple … TST MODE_IX1 (Byte 〈x6,xD〉) nat5
366 ; quadruple … TST MODE_IX0 (Byte 〈x7,xD〉) nat4
369 ndefinition opcode_table_HC05 ≝
370 opcode_table_HC05_1 @ opcode_table_HC05_2 @ opcode_table_HC05_3 @ opcode_table_HC05_4 @
371 opcode_table_HC05_5 @ opcode_table_HC05_6 @ opcode_table_HC05_7 @ opcode_table_HC05_8 @
372 opcode_table_HC05_9 @ opcode_table_HC05_10 @ opcode_table_HC05_11 @ opcode_table_HC05_12 @
373 opcode_table_HC05_13 @ opcode_table_HC05_14 @ opcode_table_HC05_15 @ opcode_table_HC05_16 @
374 opcode_table_HC05_17 @ opcode_table_HC05_18 @ opcode_table_HC05_19 @ opcode_table_HC05_20 @
375 opcode_table_HC05_21 @ opcode_table_HC05_22 @ opcode_table_HC05_23 @ opcode_table_HC05_24 @
376 opcode_table_HC05_25 @ opcode_table_HC05_26 @ opcode_table_HC05_27 @ opcode_table_HC05_28 @
377 opcode_table_HC05_29 @ opcode_table_HC05_30 @ opcode_table_HC05_31.