ben
/
crater
mirror of https://github.com/earwig/crater
1
1
Fork 0
Code Releases 0 Activity
An emulator, assembler, and disassembler for the Sega Game Gear
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
143 Commits
2 Branches
818 KiB
 
 
 
 
 
Tree: 5fab99ee17
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '5fab99ee17'
${ noResults }
crater/src/assembler/instructions.inc.c

1435 lines
56 KiB
Raw Blame History 

  1. /* Copyright (C) 2014-2015 Ben Kurtovic <ben.kurtovic@gmail.com>

  2.    Released under the terms of the MIT License. See LICENSE for details. */

  3. 

  4. /*

  5.     This file is AUTO-GENERATED from 'instructions.yml'.

  6. 

  7.     `make` should trigger a rebuild when it is modified; if not, use:

  8.     `python scripts/update_asm_instructions.py`.

  9. 

  10.     @AUTOGEN_DATE Wed May 20 06:24:37 2015 UTC

  11. */

  12. 

  13. /* @AUTOGEN_INST_BLOCK_START */

  14. 

  15. INST_FUNC(adc)

  16. {

  17.     INST_TAKES_ARGS(

  18.         AT_REGISTER,

  19.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  20.         AT_NONE

  21.     )

  22.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {

  23.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_A)

  24.             INST_RETURN(1, 0x8F)

  25.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_B)

  26.             INST_RETURN(1, 0x88)

  27.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_C)

  28.             INST_RETURN(1, 0x89)

  29.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_D)

  30.             INST_RETURN(1, 0x8A)

  31.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_E)

  32.             INST_RETURN(1, 0x8B)

  33.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_H)

  34.             INST_RETURN(1, 0x8C)

  35.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXH)

  36.             INST_RETURN(2, INST_IX_PREFIX, 0x8C)

  37.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYH)

  38.             INST_RETURN(2, INST_IY_PREFIX, 0x8C)

  39.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_L)

  40.             INST_RETURN(1, 0x8D)

  41.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXL)

  42.             INST_RETURN(2, INST_IX_PREFIX, 0x8D)

  43.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYL)

  44.             INST_RETURN(2, INST_IY_PREFIX, 0x8D)

  45.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_BC)

  46.             INST_RETURN(2, 0xED, 0x4A)

  47.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_DE)

  48.             INST_RETURN(2, 0xED, 0x5A)

  49.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_HL)

  50.             INST_RETURN(2, 0xED, 0x6A)

  51.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_SP)

  52.             INST_RETURN(2, 0xED, 0x7A)

  53.         INST_ERROR(ARG_VALUE)

  54.     }

  55.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_IMMEDIATE) {

  56.         if (INST_REG(0) == REG_A && INST_IMM(1).mask & IMM_U8)

  57.             INST_RETURN(2, 0xCE, INST_IMM(1).uval)

  58.         INST_ERROR(ARG_VALUE)

  59.     }

  60.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT &&

  61.             (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {

  62.         if (INST_REG(0) == REG_A)

  63.             INST_RETURN(1, 0x8E)

  64.         INST_ERROR(ARG_VALUE)

  65.     }

  66.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDEXED) {

  67.         if (INST_REG(0) == REG_A)

  68.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x8E, INST_INDEX(1).offset)

  69.         INST_ERROR(ARG_VALUE)

  70.     }

  71.     INST_ERROR(ARG_TYPE)

  72. }

  73. 

  74. INST_FUNC(add)

  75. {

  76.     INST_TAKES_ARGS(

  77.         AT_REGISTER,

  78.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  79.         AT_NONE

  80.     )

  81.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {

  82.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_A)

  83.             INST_RETURN(1, 0x87)

  84.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_B)

  85.             INST_RETURN(1, 0x80)

  86.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_C)

  87.             INST_RETURN(1, 0x81)

  88.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_D)

  89.             INST_RETURN(1, 0x82)

  90.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_E)

  91.             INST_RETURN(1, 0x83)

  92.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_H)

  93.             INST_RETURN(1, 0x84)

  94.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXH)

  95.             INST_RETURN(2, INST_IX_PREFIX, 0x84)

  96.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYH)

  97.             INST_RETURN(2, INST_IY_PREFIX, 0x84)

  98.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_L)

  99.             INST_RETURN(1, 0x85)

  100.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXL)

  101.             INST_RETURN(2, INST_IX_PREFIX, 0x85)

  102.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYL)

  103.             INST_RETURN(2, INST_IY_PREFIX, 0x85)

  104.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_BC)

  105.             INST_RETURN(1, 0x09)

  106.         if (INST_REG(0) == REG_IX && INST_REG(1) == REG_BC)

  107.             INST_RETURN(2, INST_IX_PREFIX, 0x09)

  108.         if (INST_REG(0) == REG_IY && INST_REG(1) == REG_BC)

  109.             INST_RETURN(2, INST_IY_PREFIX, 0x09)

  110.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_DE)

  111.             INST_RETURN(1, 0x19)

  112.         if (INST_REG(0) == REG_IX && INST_REG(1) == REG_DE)

  113.             INST_RETURN(2, INST_IX_PREFIX, 0x19)

  114.         if (INST_REG(0) == REG_IY && INST_REG(1) == REG_DE)

  115.             INST_RETURN(2, INST_IY_PREFIX, 0x19)

  116.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_HL)

  117.             INST_RETURN(1, 0x29)

  118.         if (INST_REG(0) == REG_IX && INST_REG(1) == REG_IX)

  119.             INST_RETURN(2, INST_IX_PREFIX, 0x29)

  120.         if (INST_REG(0) == REG_IY && INST_REG(1) == REG_IY)

  121.             INST_RETURN(2, INST_IY_PREFIX, 0x29)

  122.         if (INST_REG(0) == REG_HL && INST_REG(1) == REG_SP)

  123.             INST_RETURN(1, 0x39)

  124.         if (INST_REG(0) == REG_IX && INST_REG(1) == REG_SP)

  125.             INST_RETURN(2, INST_IX_PREFIX, 0x39)

  126.         if (INST_REG(0) == REG_IY && INST_REG(1) == REG_SP)

  127.             INST_RETURN(2, INST_IY_PREFIX, 0x39)

  128.         INST_ERROR(ARG_VALUE)

  129.     }

  130.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_IMMEDIATE) {

  131.         if (INST_REG(0) == REG_A && INST_IMM(1).mask & IMM_U8)

  132.             INST_RETURN(2, 0xC6, INST_IMM(1).uval)

  133.         INST_ERROR(ARG_VALUE)

  134.     }

  135.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT &&

  136.             (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {

  137.         if (INST_REG(0) == REG_A)

  138.             INST_RETURN(1, 0x86)

  139.         INST_ERROR(ARG_VALUE)

  140.     }

  141.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDEXED) {

  142.         if (INST_REG(0) == REG_A)

  143.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x86, INST_INDEX(1).offset)

  144.         INST_ERROR(ARG_VALUE)

  145.     }

  146.     INST_ERROR(ARG_TYPE)

  147. }

  148. 

  149. INST_FUNC(and)

  150. {

  151.     INST_TAKES_ARGS(

  152.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  153.         AT_NONE,

  154.         AT_NONE

  155.     )

  156.     if (INST_TYPE(0) == AT_REGISTER) {

  157.         if (INST_REG(0) == REG_A)

  158.             INST_RETURN(1, 0xA7)

  159.         if (INST_REG(0) == REG_B)

  160.             INST_RETURN(1, 0xA0)

  161.         if (INST_REG(0) == REG_C)

  162.             INST_RETURN(1, 0xA1)

  163.         if (INST_REG(0) == REG_D)

  164.             INST_RETURN(1, 0xA2)

  165.         if (INST_REG(0) == REG_E)

  166.             INST_RETURN(1, 0xA3)

  167.         if (INST_REG(0) == REG_H)

  168.             INST_RETURN(1, 0xA4)

  169.         if (INST_REG(0) == REG_IXH)

  170.             INST_RETURN(2, INST_IX_PREFIX, 0xA4)

  171.         if (INST_REG(0) == REG_IYH)

  172.             INST_RETURN(2, INST_IY_PREFIX, 0xA4)

  173.         if (INST_REG(0) == REG_L)

  174.             INST_RETURN(1, 0xA5)

  175.         if (INST_REG(0) == REG_IXL)

  176.             INST_RETURN(2, INST_IX_PREFIX, 0xA5)

  177.         if (INST_REG(0) == REG_IYL)

  178.             INST_RETURN(2, INST_IY_PREFIX, 0xA5)

  179.         INST_ERROR(ARG_VALUE)

  180.     }

  181.     if (INST_TYPE(0) == AT_IMMEDIATE) {

  182.         if (INST_IMM(0).mask & IMM_U8)

  183.             INST_RETURN(2, 0xE6, INST_IMM(0).uval)

  184.         INST_ERROR(ARG_VALUE)

  185.     }

  186.     if (INST_TYPE(0) == AT_INDIRECT &&

  187.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  188.         INST_RETURN(1, 0xA6)

  189.     }

  190.     if (INST_TYPE(0) == AT_INDEXED) {

  191.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0xA6, INST_INDEX(0).offset)

  192.     }

  193.     INST_ERROR(ARG_TYPE)

  194. }

  195. 

  196. INST_FUNC(bit)

  197. {

  198.     INST_TAKES_ARGS(

  199.         AT_IMMEDIATE,

  200.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  201.         AT_NONE

  202.     )

  203.     if (INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_REGISTER) {

  204.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0) && INST_REG(1) == REG_A)

  205.             INST_RETURN(2, 0xCB, 0x47)

  206.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0) && INST_REG(1) == REG_B)

  207.             INST_RETURN(2, 0xCB, 0x40)

  208.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0) && INST_REG(1) == REG_C)

  209.             INST_RETURN(2, 0xCB, 0x41)

  210.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0) && INST_REG(1) == REG_D)

  211.             INST_RETURN(2, 0xCB, 0x42)

  212.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0) && INST_REG(1) == REG_E)

  213.             INST_RETURN(2, 0xCB, 0x43)

  214.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0) && INST_REG(1) == REG_H)

  215.             INST_RETURN(2, 0xCB, 0x44)

  216.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0) && INST_REG(1) == REG_L)

  217.             INST_RETURN(2, 0xCB, 0x45)

  218.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1) && INST_REG(1) == REG_A)

  219.             INST_RETURN(2, 0xCB, 0x4F)

  220.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1) && INST_REG(1) == REG_B)

  221.             INST_RETURN(2, 0xCB, 0x48)

  222.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1) && INST_REG(1) == REG_C)

  223.             INST_RETURN(2, 0xCB, 0x49)

  224.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1) && INST_REG(1) == REG_D)

  225.             INST_RETURN(2, 0xCB, 0x4A)

  226.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1) && INST_REG(1) == REG_E)

  227.             INST_RETURN(2, 0xCB, 0x4B)

  228.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1) && INST_REG(1) == REG_H)

  229.             INST_RETURN(2, 0xCB, 0x4C)

  230.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1) && INST_REG(1) == REG_L)

  231.             INST_RETURN(2, 0xCB, 0x4D)

  232.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2) && INST_REG(1) == REG_A)

  233.             INST_RETURN(2, 0xCB, 0x57)

  234.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2) && INST_REG(1) == REG_B)

  235.             INST_RETURN(2, 0xCB, 0x50)

  236.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2) && INST_REG(1) == REG_C)

  237.             INST_RETURN(2, 0xCB, 0x51)

  238.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2) && INST_REG(1) == REG_D)

  239.             INST_RETURN(2, 0xCB, 0x52)

  240.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2) && INST_REG(1) == REG_E)

  241.             INST_RETURN(2, 0xCB, 0x53)

  242.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2) && INST_REG(1) == REG_H)

  243.             INST_RETURN(2, 0xCB, 0x54)

  244.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2) && INST_REG(1) == REG_L)

  245.             INST_RETURN(2, 0xCB, 0x55)

  246.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(1) == REG_A)

  247.             INST_RETURN(2, 0xCB, 0x5F)

  248.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(1) == REG_B)

  249.             INST_RETURN(2, 0xCB, 0x58)

  250.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(1) == REG_C)

  251.             INST_RETURN(2, 0xCB, 0x59)

  252.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(1) == REG_D)

  253.             INST_RETURN(2, 0xCB, 0x5A)

  254.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(1) == REG_E)

  255.             INST_RETURN(2, 0xCB, 0x5B)

  256.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(1) == REG_H)

  257.             INST_RETURN(2, 0xCB, 0x5C)

  258.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(1) == REG_L)

  259.             INST_RETURN(2, 0xCB, 0x5D)

  260.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(1) == REG_A)

  261.             INST_RETURN(2, 0xCB, 0x67)

  262.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(1) == REG_B)

  263.             INST_RETURN(2, 0xCB, 0x60)

  264.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(1) == REG_C)

  265.             INST_RETURN(2, 0xCB, 0x61)

  266.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(1) == REG_D)

  267.             INST_RETURN(2, 0xCB, 0x62)

  268.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(1) == REG_E)

  269.             INST_RETURN(2, 0xCB, 0x63)

  270.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(1) == REG_H)

  271.             INST_RETURN(2, 0xCB, 0x64)

  272.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(1) == REG_L)

  273.             INST_RETURN(2, 0xCB, 0x65)

  274.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(1) == REG_A)

  275.             INST_RETURN(2, 0xCB, 0x6F)

  276.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(1) == REG_B)

  277.             INST_RETURN(2, 0xCB, 0x68)

  278.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(1) == REG_C)

  279.             INST_RETURN(2, 0xCB, 0x69)

  280.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(1) == REG_D)

  281.             INST_RETURN(2, 0xCB, 0x6A)

  282.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(1) == REG_E)

  283.             INST_RETURN(2, 0xCB, 0x6B)

  284.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(1) == REG_H)

  285.             INST_RETURN(2, 0xCB, 0x6C)

  286.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(1) == REG_L)

  287.             INST_RETURN(2, 0xCB, 0x6D)

  288.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(1) == REG_A)

  289.             INST_RETURN(2, 0xCB, 0x77)

  290.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(1) == REG_B)

  291.             INST_RETURN(2, 0xCB, 0x70)

  292.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(1) == REG_C)

  293.             INST_RETURN(2, 0xCB, 0x71)

  294.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(1) == REG_D)

  295.             INST_RETURN(2, 0xCB, 0x72)

  296.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(1) == REG_E)

  297.             INST_RETURN(2, 0xCB, 0x73)

  298.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(1) == REG_H)

  299.             INST_RETURN(2, 0xCB, 0x74)

  300.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(1) == REG_L)

  301.             INST_RETURN(2, 0xCB, 0x75)

  302.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(1) == REG_A)

  303.             INST_RETURN(2, 0xCB, 0x7F)

  304.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(1) == REG_B)

  305.             INST_RETURN(2, 0xCB, 0x78)

  306.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(1) == REG_C)

  307.             INST_RETURN(2, 0xCB, 0x79)

  308.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(1) == REG_D)

  309.             INST_RETURN(2, 0xCB, 0x7A)

  310.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(1) == REG_E)

  311.             INST_RETURN(2, 0xCB, 0x7B)

  312.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(1) == REG_H)

  313.             INST_RETURN(2, 0xCB, 0x7C)

  314.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(1) == REG_L)

  315.             INST_RETURN(2, 0xCB, 0x7D)

  316.         INST_ERROR(ARG_VALUE)

  317.     }

  318.     if (INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDIRECT &&

  319.             (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {

  320.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0))

  321.             INST_RETURN(2, 0xCB, 0x46)

  322.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1))

  323.             INST_RETURN(2, 0xCB, 0x4E)

  324.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2))

  325.             INST_RETURN(2, 0xCB, 0x56)

  326.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3))

  327.             INST_RETURN(2, 0xCB, 0x5E)

  328.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4))

  329.             INST_RETURN(2, 0xCB, 0x66)

  330.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5))

  331.             INST_RETURN(2, 0xCB, 0x6E)

  332.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6))

  333.             INST_RETURN(2, 0xCB, 0x76)

  334.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7))

  335.             INST_RETURN(2, 0xCB, 0x7E)

  336.         INST_ERROR(ARG_VALUE)

  337.     }

  338.     if (INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED) {

  339.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 0))

  340.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x46)

  341.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 1))

  342.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x4E)

  343.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 2))

  344.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x56)

  345.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3))

  346.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x5E)

  347.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4))

  348.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x66)

  349.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5))

  350.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x6E)

  351.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6))

  352.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x76)

  353.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7))

  354.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x7E)

  355.         INST_ERROR(ARG_VALUE)

  356.     }

  357.     INST_ERROR(ARG_TYPE)

  358. }

  359. 

  360. INST_FUNC(call)

  361. {

  362.     INST_TAKES_ARGS(

  363.         AT_CONDITION|AT_IMMEDIATE,

  364.         AT_IMMEDIATE|AT_OPTIONAL,

  365.         AT_NONE

  366.     )

  367.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_IMMEDIATE) {

  368.         if (INST_IMM(0).mask & IMM_U16)

  369.             INST_RETURN(3, 0xCD, INST_IMM_U16_B1(INST_IMM(0)), INST_IMM_U16_B2(INST_IMM(0)))

  370.         INST_ERROR(ARG_VALUE)

  371.     }

  372.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_CONDITION && INST_TYPE(1) == AT_IMMEDIATE) {

  373.         if (INST_COND(0) == COND_NZ && INST_IMM(1).mask & IMM_U16)

  374.             INST_RETURN(3, 0xC4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  375.         if (INST_COND(0) == COND_Z && INST_IMM(1).mask & IMM_U16)

  376.             INST_RETURN(3, 0xCC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  377.         if (INST_COND(0) == COND_NC && INST_IMM(1).mask & IMM_U16)

  378.             INST_RETURN(3, 0xD4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  379.         if (INST_COND(0) == COND_C && INST_IMM(1).mask & IMM_U16)

  380.             INST_RETURN(3, 0xDC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  381.         if (INST_COND(0) == COND_PO && INST_IMM(1).mask & IMM_U16)

  382.             INST_RETURN(3, 0xE4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  383.         if (INST_COND(0) == COND_PE && INST_IMM(1).mask & IMM_U16)

  384.             INST_RETURN(3, 0xEC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  385.         if (INST_COND(0) == COND_P && INST_IMM(1).mask & IMM_U16)

  386.             INST_RETURN(3, 0xF4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  387.         if (INST_COND(0) == COND_M && INST_IMM(1).mask & IMM_U16)

  388.             INST_RETURN(3, 0xFC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  389.         INST_ERROR(ARG_VALUE)

  390.     }

  391.     INST_ERROR(ARG_TYPE)

  392. }

  393. 

  394. INST_FUNC(ccf)

  395. {

  396.     INST_TAKES_NO_ARGS

  397.     INST_RETURN(1, 0x3F)

  398. }

  399. 

  400. INST_FUNC(cp)

  401. {

  402.     INST_TAKES_ARGS(

  403.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  404.         AT_NONE,

  405.         AT_NONE

  406.     )

  407.     if (INST_TYPE(0) == AT_REGISTER) {

  408.         if (INST_REG(0) == REG_A)

  409.             INST_RETURN(1, 0xBF)

  410.         if (INST_REG(0) == REG_B)

  411.             INST_RETURN(1, 0xB8)

  412.         if (INST_REG(0) == REG_C)

  413.             INST_RETURN(1, 0xB9)

  414.         if (INST_REG(0) == REG_D)

  415.             INST_RETURN(1, 0xBA)

  416.         if (INST_REG(0) == REG_E)

  417.             INST_RETURN(1, 0xBB)

  418.         if (INST_REG(0) == REG_H)

  419.             INST_RETURN(1, 0xBC)

  420.         if (INST_REG(0) == REG_IXH)

  421.             INST_RETURN(2, INST_IX_PREFIX, 0xBC)

  422.         if (INST_REG(0) == REG_IYH)

  423.             INST_RETURN(2, INST_IY_PREFIX, 0xBC)

  424.         if (INST_REG(0) == REG_L)

  425.             INST_RETURN(1, 0xBD)

  426.         if (INST_REG(0) == REG_IXL)

  427.             INST_RETURN(2, INST_IX_PREFIX, 0xBD)

  428.         if (INST_REG(0) == REG_IYL)

  429.             INST_RETURN(2, INST_IY_PREFIX, 0xBD)

  430.         INST_ERROR(ARG_VALUE)

  431.     }

  432.     if (INST_TYPE(0) == AT_INDIRECT &&

  433.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  434.         INST_RETURN(1, 0xBE)

  435.     }

  436.     if (INST_TYPE(0) == AT_INDEXED) {

  437.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0xBE, INST_INDEX(0).offset)

  438.     }

  439.     if (INST_TYPE(0) == AT_IMMEDIATE) {

  440.         if (INST_IMM(0).mask & IMM_U8)

  441.             INST_RETURN(2, 0xFE, INST_IMM(0).uval)

  442.         INST_ERROR(ARG_VALUE)

  443.     }

  444.     INST_ERROR(ARG_TYPE)

  445. }

  446. 

  447. INST_FUNC(cpd)

  448. {

  449.     INST_TAKES_NO_ARGS

  450.     INST_RETURN(2, 0xED, 0xA9)

  451. }

  452. 

  453. INST_FUNC(cpdr)

  454. {

  455.     INST_TAKES_NO_ARGS

  456.     INST_RETURN(2, 0xED, 0xB9)

  457. }

  458. 

  459. INST_FUNC(cpi)

  460. {

  461.     INST_TAKES_NO_ARGS

  462.     INST_RETURN(2, 0xED, 0xA1)

  463. }

  464. 

  465. INST_FUNC(cpir)

  466. {

  467.     INST_TAKES_NO_ARGS

  468.     INST_RETURN(2, 0xED, 0xB1)

  469. }

  470. 

  471. INST_FUNC(cpl)

  472. {

  473.     INST_TAKES_NO_ARGS

  474.     INST_RETURN(1, 0x2F)

  475. }

  476. 

  477. INST_FUNC(daa)

  478. {

  479.     INST_TAKES_NO_ARGS

  480.     INST_RETURN(1, 0x27)

  481. }

  482. 

  483. INST_FUNC(dec)

  484. {

  485.     INST_TAKES_ARGS(

  486.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  487.         AT_NONE,

  488.         AT_NONE

  489.     )

  490.     if (INST_TYPE(0) == AT_REGISTER) {

  491.         if (INST_REG(0) == REG_A)

  492.             INST_RETURN(1, 0x3D)

  493.         if (INST_REG(0) == REG_B)

  494.             INST_RETURN(1, 0x05)

  495.         if (INST_REG(0) == REG_C)

  496.             INST_RETURN(1, 0x0D)

  497.         if (INST_REG(0) == REG_D)

  498.             INST_RETURN(1, 0x15)

  499.         if (INST_REG(0) == REG_E)

  500.             INST_RETURN(1, 0x1D)

  501.         if (INST_REG(0) == REG_H)

  502.             INST_RETURN(1, 0x25)

  503.         if (INST_REG(0) == REG_IXH)

  504.             INST_RETURN(2, INST_IX_PREFIX, 0x25)

  505.         if (INST_REG(0) == REG_IYH)

  506.             INST_RETURN(2, INST_IY_PREFIX, 0x25)

  507.         if (INST_REG(0) == REG_L)

  508.             INST_RETURN(1, 0x2D)

  509.         if (INST_REG(0) == REG_IXL)

  510.             INST_RETURN(2, INST_IX_PREFIX, 0x2D)

  511.         if (INST_REG(0) == REG_IYL)

  512.             INST_RETURN(2, INST_IY_PREFIX, 0x2D)

  513.         if (INST_REG(0) == REG_BC)

  514.             INST_RETURN(1, 0x0B)

  515.         if (INST_REG(0) == REG_DE)

  516.             INST_RETURN(1, 0x1B)

  517.         if (INST_REG(0) == REG_HL)

  518.             INST_RETURN(1, 0x2B)

  519.         if (INST_REG(0) == REG_IX)

  520.             INST_RETURN(2, INST_IX_PREFIX, 0x2B)

  521.         if (INST_REG(0) == REG_IY)

  522.             INST_RETURN(2, INST_IY_PREFIX, 0x2B)

  523.         if (INST_REG(0) == REG_SP)

  524.             INST_RETURN(1, 0x3B)

  525.         INST_ERROR(ARG_VALUE)

  526.     }

  527.     if (INST_TYPE(0) == AT_INDIRECT &&

  528.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  529.         INST_RETURN(1, 0x35)

  530.     }

  531.     if (INST_TYPE(0) == AT_INDEXED) {

  532.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0x35, INST_INDEX(0).offset)

  533.     }

  534.     INST_ERROR(ARG_TYPE)

  535. }

  536. 

  537. INST_FUNC(di)

  538. {

  539.     INST_TAKES_NO_ARGS

  540.     INST_RETURN(1, 0xF3)

  541. }

  542. 

  543. INST_FUNC(djnz)

  544. {

  545.     INST_TAKES_ARGS(

  546.         AT_IMMEDIATE,

  547.         AT_NONE,

  548.         AT_NONE

  549.     )

  550.     if (INST_TYPE(0) == AT_IMMEDIATE) {

  551.         if (INST_IMM(0).mask & IMM_REL)

  552.             INST_RETURN(2, 0x10, INST_IMM(0).sval - 2)

  553.         INST_ERROR(ARG_VALUE)

  554.     }

  555.     INST_ERROR(ARG_TYPE)

  556. }

  557. 

  558. INST_FUNC(ei)

  559. {

  560.     INST_TAKES_NO_ARGS

  561.     INST_RETURN(1, 0xFB)

  562. }

  563. 

  564. INST_FUNC(ex)

  565. {

  566.     INST_TAKES_ARGS(

  567.         AT_INDIRECT|AT_REGISTER,

  568.         AT_REGISTER,

  569.         AT_NONE

  570.     )

  571.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {

  572.         if (INST_REG(0) == REG_AF && INST_REG(1) == REG_AF_)

  573.             INST_RETURN(1, 0x08)

  574.         if (INST_REG(0) == REG_DE && INST_REG(1) == REG_HL)

  575.             INST_RETURN(1, 0xEB)

  576.         INST_ERROR(ARG_VALUE)

  577.     }

  578.     if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_REGISTER) {

  579.         if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_SP) && INST_REG(1) == REG_HL)

  580.             INST_RETURN(1, 0xE3)

  581.         if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_SP) && INST_REG(1) == REG_IX)

  582.             INST_RETURN(2, INST_IX_PREFIX, 0xE3)

  583.         if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_SP) && INST_REG(1) == REG_IY)

  584.             INST_RETURN(2, INST_IY_PREFIX, 0xE3)

  585.         INST_ERROR(ARG_VALUE)

  586.     }

  587.     INST_ERROR(ARG_TYPE)

  588. }

  589. 

  590. INST_FUNC(exx)

  591. {

  592.     INST_TAKES_NO_ARGS

  593.     INST_RETURN(1, 0xD9)

  594. }

  595. 

  596. INST_FUNC(halt)

  597. {

  598.     INST_TAKES_NO_ARGS

  599.     INST_RETURN(1, 0x76)

  600. }

  601. 

  602. INST_FUNC(im)

  603. {

  604.     INST_TAKES_ARGS(

  605.         AT_IMMEDIATE,

  606.         AT_NONE,

  607.         AT_NONE

  608.     )

  609.     if (INST_TYPE(0) == AT_IMMEDIATE) {

  610.         if ((INST_IMM(0).mask & IMM_IM && INST_IMM(0).uval == 0))

  611.             INST_RETURN(2, 0xED, 0x46)

  612.         if ((INST_IMM(0).mask & IMM_IM && INST_IMM(0).uval == 1))

  613.             INST_RETURN(2, 0xED, 0x56)

  614.         if ((INST_IMM(0).mask & IMM_IM && INST_IMM(0).uval == 2))

  615.             INST_RETURN(2, 0xED, 0x5E)

  616.         INST_ERROR(ARG_VALUE)

  617.     }

  618.     INST_ERROR(ARG_TYPE)

  619. }

  620. 

  621. INST_FUNC(in)

  622. {

  623.     INST_TAKES_ARGS(

  624.         AT_PORT|AT_REGISTER,

  625.         AT_OPTIONAL|AT_PORT,

  626.         AT_NONE

  627.     )

  628.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_PORT) {

  629.         if (INST_REG(0) == REG_A && INST_PORT(1).type == AT_IMMEDIATE)

  630.             INST_RETURN(2, 0xDB, INST_PORT(1).port.imm.uval)

  631.         if (INST_REG(0) == REG_A && INST_PORT(1).type == AT_REGISTER)

  632.             INST_RETURN(2, 0xED, 0x78)

  633.         if (INST_REG(0) == REG_B && INST_PORT(1).type == AT_REGISTER)

  634.             INST_RETURN(2, 0xED, 0x40)

  635.         if (INST_REG(0) == REG_C && INST_PORT(1).type == AT_REGISTER)

  636.             INST_RETURN(2, 0xED, 0x48)

  637.         if (INST_REG(0) == REG_D && INST_PORT(1).type == AT_REGISTER)

  638.             INST_RETURN(2, 0xED, 0x50)

  639.         if (INST_REG(0) == REG_E && INST_PORT(1).type == AT_REGISTER)

  640.             INST_RETURN(2, 0xED, 0x58)

  641.         if (INST_REG(0) == REG_H && INST_PORT(1).type == AT_REGISTER)

  642.             INST_RETURN(2, 0xED, 0x60)

  643.         if (INST_REG(0) == REG_L && INST_PORT(1).type == AT_REGISTER)

  644.             INST_RETURN(2, 0xED, 0x68)

  645.         INST_ERROR(ARG_VALUE)

  646.     }

  647.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_PORT) {

  648.         if (INST_PORT(0).type == AT_REGISTER)

  649.             INST_RETURN(2, 0xED, 0x70)

  650.         INST_ERROR(ARG_VALUE)

  651.     }

  652.     INST_ERROR(ARG_TYPE)

  653. }

  654. 

  655. INST_FUNC(inc)

  656. {

  657.     INST_TAKES_ARGS(

  658.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  659.         AT_NONE,

  660.         AT_NONE

  661.     )

  662.     if (INST_TYPE(0) == AT_REGISTER) {

  663.         if (INST_REG(0) == REG_A)

  664.             INST_RETURN(1, 0x3C)

  665.         if (INST_REG(0) == REG_B)

  666.             INST_RETURN(1, 0x04)

  667.         if (INST_REG(0) == REG_C)

  668.             INST_RETURN(1, 0x0C)

  669.         if (INST_REG(0) == REG_D)

  670.             INST_RETURN(1, 0x14)

  671.         if (INST_REG(0) == REG_E)

  672.             INST_RETURN(1, 0x1C)

  673.         if (INST_REG(0) == REG_H)

  674.             INST_RETURN(1, 0x24)

  675.         if (INST_REG(0) == REG_IXH)

  676.             INST_RETURN(2, INST_IX_PREFIX, 0x24)

  677.         if (INST_REG(0) == REG_IYH)

  678.             INST_RETURN(2, INST_IY_PREFIX, 0x24)

  679.         if (INST_REG(0) == REG_L)

  680.             INST_RETURN(1, 0x2C)

  681.         if (INST_REG(0) == REG_IXL)

  682.             INST_RETURN(2, INST_IX_PREFIX, 0x2C)

  683.         if (INST_REG(0) == REG_IYL)

  684.             INST_RETURN(2, INST_IY_PREFIX, 0x2C)

  685.         if (INST_REG(0) == REG_BC)

  686.             INST_RETURN(1, 0x03)

  687.         if (INST_REG(0) == REG_DE)

  688.             INST_RETURN(1, 0x13)

  689.         if (INST_REG(0) == REG_HL)

  690.             INST_RETURN(1, 0x23)

  691.         if (INST_REG(0) == REG_IX)

  692.             INST_RETURN(2, INST_IX_PREFIX, 0x23)

  693.         if (INST_REG(0) == REG_IY)

  694.             INST_RETURN(2, INST_IY_PREFIX, 0x23)

  695.         if (INST_REG(0) == REG_SP)

  696.             INST_RETURN(1, 0x33)

  697.         INST_ERROR(ARG_VALUE)

  698.     }

  699.     if (INST_TYPE(0) == AT_INDIRECT &&

  700.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  701.         INST_RETURN(1, 0x34)

  702.     }

  703.     if (INST_TYPE(0) == AT_INDEXED) {

  704.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0x34, INST_INDEX(0).offset)

  705.     }

  706.     INST_ERROR(ARG_TYPE)

  707. }

  708. 

  709. INST_FUNC(ind)

  710. {

  711.     INST_TAKES_NO_ARGS

  712.     INST_RETURN(2, 0xED, 0xAA)

  713. }

  714. 

  715. INST_FUNC(indr)

  716. {

  717.     INST_TAKES_NO_ARGS

  718.     INST_RETURN(2, 0xED, 0xBA)

  719. }

  720. 

  721. INST_FUNC(ini)

  722. {

  723.     INST_TAKES_NO_ARGS

  724.     INST_RETURN(2, 0xED, 0xA2)

  725. }

  726. 

  727. INST_FUNC(inir)

  728. {

  729.     INST_TAKES_NO_ARGS

  730.     INST_RETURN(2, 0xED, 0xB2)

  731. }

  732. 

  733. INST_FUNC(jp)

  734. {

  735.     INST_TAKES_ARGS(

  736.         AT_CONDITION|AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT,

  737.         AT_IMMEDIATE|AT_OPTIONAL,

  738.         AT_NONE

  739.     )

  740.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_IMMEDIATE) {

  741.         if (INST_IMM(0).mask & IMM_U16)

  742.             INST_RETURN(3, 0xC3, INST_IMM_U16_B1(INST_IMM(0)), INST_IMM_U16_B2(INST_IMM(0)))

  743.         INST_ERROR(ARG_VALUE)

  744.     }

  745.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_CONDITION && INST_TYPE(1) == AT_IMMEDIATE) {

  746.         if (INST_COND(0) == COND_NZ && INST_IMM(1).mask & IMM_U16)

  747.             INST_RETURN(3, 0xC2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  748.         if (INST_COND(0) == COND_Z && INST_IMM(1).mask & IMM_U16)

  749.             INST_RETURN(3, 0xCA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  750.         if (INST_COND(0) == COND_NC && INST_IMM(1).mask & IMM_U16)

  751.             INST_RETURN(3, 0xD2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  752.         if (INST_COND(0) == COND_C && INST_IMM(1).mask & IMM_U16)

  753.             INST_RETURN(3, 0xDA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  754.         if (INST_COND(0) == COND_PO && INST_IMM(1).mask & IMM_U16)

  755.             INST_RETURN(3, 0xE2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  756.         if (INST_COND(0) == COND_PE && INST_IMM(1).mask & IMM_U16)

  757.             INST_RETURN(3, 0xEA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  758.         if (INST_COND(0) == COND_P && INST_IMM(1).mask & IMM_U16)

  759.             INST_RETURN(3, 0xF2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  760.         if (INST_COND(0) == COND_M && INST_IMM(1).mask & IMM_U16)

  761.             INST_RETURN(3, 0xFA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  762.         INST_ERROR(ARG_VALUE)

  763.     }

  764.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&

  765.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  766.         INST_RETURN(1, 0xE9)

  767.     }

  768.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {

  769.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0xE9, INST_INDEX(0).offset)

  770.     }

  771.     INST_ERROR(ARG_TYPE)

  772. }

  773. 

  774. INST_FUNC(jr)

  775. {

  776.     INST_TAKES_ARGS(

  777.         AT_CONDITION|AT_IMMEDIATE,

  778.         AT_IMMEDIATE|AT_OPTIONAL,

  779.         AT_NONE

  780.     )

  781.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_IMMEDIATE) {

  782.         if (INST_IMM(0).mask & IMM_REL)

  783.             INST_RETURN(2, 0x18, INST_IMM(0).sval - 2)

  784.         INST_ERROR(ARG_VALUE)

  785.     }

  786.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_CONDITION && INST_TYPE(1) == AT_IMMEDIATE) {

  787.         if (INST_COND(0) == COND_NZ && INST_IMM(1).mask & IMM_REL)

  788.             INST_RETURN(2, 0x20, INST_IMM(1).sval - 2)

  789.         if (INST_COND(0) == COND_Z && INST_IMM(1).mask & IMM_REL)

  790.             INST_RETURN(2, 0x28, INST_IMM(1).sval - 2)

  791.         if (INST_COND(0) == COND_NC && INST_IMM(1).mask & IMM_REL)

  792.             INST_RETURN(2, 0x30, INST_IMM(1).sval - 2)

  793.         if (INST_COND(0) == COND_C && INST_IMM(1).mask & IMM_REL)

  794.             INST_RETURN(2, 0x38, INST_IMM(1).sval - 2)

  795.         INST_ERROR(ARG_VALUE)

  796.     }

  797.     INST_ERROR(ARG_TYPE)

  798. }

  799. 

  800. INST_FUNC(ld)

  801. {

  802.     INST_TAKES_ARGS(

  803.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  804.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  805.         AT_NONE

  806.     )

  807.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {

  808.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_A)

  809.             INST_RETURN(1, 0x7F)

  810.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_B)

  811.             INST_RETURN(1, 0x78)

  812.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_C)

  813.             INST_RETURN(1, 0x79)

  814.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_D)

  815.             INST_RETURN(1, 0x7A)

  816.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_E)

  817.             INST_RETURN(1, 0x7B)

  818.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_H)

  819.             INST_RETURN(1, 0x7C)

  820.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXH)

  821.             INST_RETURN(2, INST_IX_PREFIX, 0x7C)

  822.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYH)

  823.             INST_RETURN(2, INST_IY_PREFIX, 0x7C)

  824.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_L)

  825.             INST_RETURN(1, 0x7D)

  826.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXL)

  827.             INST_RETURN(2, INST_IX_PREFIX, 0x7D)

  828.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYL)

  829.             INST_RETURN(2, INST_IY_PREFIX, 0x7D)

  830.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_A)

  831.             INST_RETURN(1, 0x47)

  832.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_B)

  833.             INST_RETURN(1, 0x40)

  834.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_C)

  835.             INST_RETURN(1, 0x41)

  836.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_D)

  837.             INST_RETURN(1, 0x42)

  838.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_E)

  839.             INST_RETURN(1, 0x43)

  840.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_H)

  841.             INST_RETURN(1, 0x44)

  842.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_IXH)

  843.             INST_RETURN(2, INST_IX_PREFIX, 0x44)

  844.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_IYH)

  845.             INST_RETURN(2, INST_IY_PREFIX, 0x44)

  846.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_L)

  847.             INST_RETURN(1, 0x45)

  848.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_IXL)

  849.             INST_RETURN(2, INST_IX_PREFIX, 0x45)

  850.         if (INST_REG(0) == REG_B && INST_REG(1) == REG_IYL)

  851.             INST_RETURN(2, INST_IY_PREFIX, 0x45)

  852.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_A)

  853.             INST_RETURN(1, 0x4F)

  854.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_B)

  855.             INST_RETURN(1, 0x48)

  856.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_C)

  857.             INST_RETURN(1, 0x49)

  858.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_D)

  859.             INST_RETURN(1, 0x4A)

  860.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_E)

  861.             INST_RETURN(1, 0x4B)

  862.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_H)

  863.             INST_RETURN(1, 0x4C)

  864.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_IXH)

  865.             INST_RETURN(2, INST_IX_PREFIX, 0x4C)

  866.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_IYH)

  867.             INST_RETURN(2, INST_IY_PREFIX, 0x4C)

  868.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_L)

  869.             INST_RETURN(1, 0x4D)

  870.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_IXL)

  871.             INST_RETURN(2, INST_IX_PREFIX, 0x4D)

  872.         if (INST_REG(0) == REG_C && INST_REG(1) == REG_IYL)

  873.             INST_RETURN(2, INST_IY_PREFIX, 0x4D)

  874.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_A)

  875.             INST_RETURN(1, 0x57)

  876.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_B)

  877.             INST_RETURN(1, 0x50)

  878.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_C)

  879.             INST_RETURN(1, 0x51)

  880.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_D)

  881.             INST_RETURN(1, 0x52)

  882.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_E)

  883.             INST_RETURN(1, 0x53)

  884.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_H)

  885.             INST_RETURN(1, 0x54)

  886.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_IXH)

  887.             INST_RETURN(2, INST_IX_PREFIX, 0x54)

  888.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_IYH)

  889.             INST_RETURN(2, INST_IY_PREFIX, 0x54)

  890.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_L)

  891.             INST_RETURN(1, 0x55)

  892.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_IXL)

  893.             INST_RETURN(2, INST_IX_PREFIX, 0x55)

  894.         if (INST_REG(0) == REG_D && INST_REG(1) == REG_IYL)

  895.             INST_RETURN(2, INST_IY_PREFIX, 0x55)

  896.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_A)

  897.             INST_RETURN(1, 0x5F)

  898.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_B)

  899.             INST_RETURN(1, 0x58)

  900.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_C)

  901.             INST_RETURN(1, 0x59)

  902.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_D)

  903.             INST_RETURN(1, 0x5A)

  904.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_E)

  905.             INST_RETURN(1, 0x5B)

  906.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_H)

  907.             INST_RETURN(1, 0x5C)

  908.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_IXH)

  909.             INST_RETURN(2, INST_IX_PREFIX, 0x5C)

  910.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_IYH)

  911.             INST_RETURN(2, INST_IY_PREFIX, 0x5C)

  912.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_L)

  913.             INST_RETURN(1, 0x5D)

  914.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_IXL)

  915.             INST_RETURN(2, INST_IX_PREFIX, 0x5D)

  916.         if (INST_REG(0) == REG_E && INST_REG(1) == REG_IYL)

  917.             INST_RETURN(2, INST_IY_PREFIX, 0x5D)

  918.         if (INST_REG(0) == REG_H && INST_REG(1) == REG_A)

  919.             INST_RETURN(1, 0x67)

  920.         if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_A)

  921.             INST_RETURN(2, INST_IX_PREFIX, 0x67)

  922.         if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_A)

  923.             INST_RETURN(2, INST_IY_PREFIX, 0x67)

  924.         if (INST_REG(0) == REG_H && INST_REG(1) == REG_B)

  925.             INST_RETURN(1, 0x60)

  926.         if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_B)

  927.             INST_RETURN(2, INST_IX_PREFIX, 0x60)

  928.         if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_B)

  929.             INST_RETURN(2, INST_IY_PREFIX, 0x60)

  930.         if (INST_REG(0) == REG_H && INST_REG(1) == REG_C)

  931.             INST_RETURN(1, 0x61)

  932.         if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_C)

  933.             INST_RETURN(2, INST_IX_PREFIX, 0x61)

  934.         if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_C)

  935.             INST_RETURN(2, INST_IY_PREFIX, 0x61)

  936.         if (INST_REG(0) == REG_H && INST_REG(1) == REG_D)

  937.             INST_RETURN(1, 0x62)

  938.         if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_D)

  939.             INST_RETURN(2, INST_IX_PREFIX, 0x62)

  940.         if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_D)

  941.             INST_RETURN(2, INST_IY_PREFIX, 0x62)

  942.         if (INST_REG(0) == REG_H && INST_REG(1) == REG_E)

  943.             INST_RETURN(1, 0x63)

  944.         if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_E)

  945.             INST_RETURN(2, INST_IX_PREFIX, 0x63)

  946.         if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_E)

  947.             INST_RETURN(2, INST_IY_PREFIX, 0x63)

  948.         if (INST_REG(0) == REG_H && INST_REG(1) == REG_H)

  949.             INST_RETURN(1, 0x64)

  950.         if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_IXH)

  951.             INST_RETURN(2, INST_IX_PREFIX, 0x64)

  952.         if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_IYH)

  953.             INST_RETURN(2, INST_IY_PREFIX, 0x64)

  954.         if (INST_REG(0) == REG_H && INST_REG(1) == REG_L)

  955.             INST_RETURN(1, 0x65)

  956.         if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_IXL)

  957.             INST_RETURN(2, INST_IX_PREFIX, 0x65)

  958.         if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_IYL)

  959.             INST_RETURN(2, INST_IY_PREFIX, 0x65)

  960.         if (INST_REG(0) == REG_L && INST_REG(1) == REG_A)

  961.             INST_RETURN(1, 0x6F)

  962.         if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_A)

  963.             INST_RETURN(2, INST_IX_PREFIX, 0x6F)

  964.         if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_A)

  965.             INST_RETURN(2, INST_IY_PREFIX, 0x6F)

  966.         if (INST_REG(0) == REG_L && INST_REG(1) == REG_B)

  967.             INST_RETURN(1, 0x68)

  968.         if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_B)

  969.             INST_RETURN(2, INST_IX_PREFIX, 0x68)

  970.         if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_B)

  971.             INST_RETURN(2, INST_IY_PREFIX, 0x68)

  972.         if (INST_REG(0) == REG_L && INST_REG(1) == REG_C)

  973.             INST_RETURN(1, 0x69)

  974.         if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_C)

  975.             INST_RETURN(2, INST_IX_PREFIX, 0x69)

  976.         if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_C)

  977.             INST_RETURN(2, INST_IY_PREFIX, 0x69)

  978.         if (INST_REG(0) == REG_L && INST_REG(1) == REG_D)

  979.             INST_RETURN(1, 0x6A)

  980.         if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_D)

  981.             INST_RETURN(2, INST_IX_PREFIX, 0x6A)

  982.         if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_D)

  983.             INST_RETURN(2, INST_IY_PREFIX, 0x6A)

  984.         if (INST_REG(0) == REG_L && INST_REG(1) == REG_E)

  985.             INST_RETURN(1, 0x6B)

  986.         if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_E)

  987.             INST_RETURN(2, INST_IX_PREFIX, 0x6B)

  988.         if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_E)

  989.             INST_RETURN(2, INST_IY_PREFIX, 0x6B)

  990.         if (INST_REG(0) == REG_L && INST_REG(1) == REG_H)

  991.             INST_RETURN(1, 0x6C)

  992.         if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_IXH)

  993.             INST_RETURN(2, INST_IX_PREFIX, 0x6C)

  994.         if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_IYH)

  995.             INST_RETURN(2, INST_IY_PREFIX, 0x6C)

  996.         if (INST_REG(0) == REG_L && INST_REG(1) == REG_L)

  997.             INST_RETURN(1, 0x6D)

  998.         if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_IXL)

  999.             INST_RETURN(2, INST_IX_PREFIX, 0x6D)

  1000.         if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_IYL)

  1001.             INST_RETURN(2, INST_IY_PREFIX, 0x6D)

  1002.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IX)

  1003.             INST_RETURN(3, INST_IX_PREFIX, 0xED, 0x57)

  1004.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_IY)

  1005.             INST_RETURN(3, INST_IY_PREFIX, 0xED, 0x57)

  1006.         if (INST_REG(0) == REG_IX && INST_REG(1) == REG_A)

  1007.             INST_RETURN(3, INST_IX_PREFIX, 0xED, 0x47)

  1008.         if (INST_REG(0) == REG_IY && INST_REG(1) == REG_A)

  1009.             INST_RETURN(3, INST_IY_PREFIX, 0xED, 0x47)

  1010.         if (INST_REG(0) == REG_A && INST_REG(1) == REG_R)

  1011.             INST_RETURN(2, 0xED, 0x5F)

  1012.         if (INST_REG(0) == REG_R && INST_REG(1) == REG_A)

  1013.             INST_RETURN(2, 0xED, 0x4F)

  1014.         if (INST_REG(0) == REG_SP && INST_REG(1) == REG_HL)

  1015.             INST_RETURN(1, 0xF9)

  1016.         if (INST_REG(0) == REG_SP && INST_REG(1) == REG_IX)

  1017.             INST_RETURN(2, INST_IX_PREFIX, 0xF9)

  1018.         if (INST_REG(0) == REG_SP && INST_REG(1) == REG_IY)

  1019.             INST_RETURN(2, INST_IY_PREFIX, 0xF9)

  1020.         INST_ERROR(ARG_VALUE)

  1021.     }

  1022.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_IMMEDIATE) {

  1023.         if (INST_REG(0) == REG_A && INST_IMM(1).mask & IMM_U8)

  1024.             INST_RETURN(2, 0x3E, INST_IMM(1).uval)

  1025.         if (INST_REG(0) == REG_B && INST_IMM(1).mask & IMM_U8)

  1026.             INST_RETURN(2, 0x06, INST_IMM(1).uval)

  1027.         if (INST_REG(0) == REG_C && INST_IMM(1).mask & IMM_U8)

  1028.             INST_RETURN(2, 0x0E, INST_IMM(1).uval)

  1029.         if (INST_REG(0) == REG_D && INST_IMM(1).mask & IMM_U8)

  1030.             INST_RETURN(2, 0x16, INST_IMM(1).uval)

  1031.         if (INST_REG(0) == REG_E && INST_IMM(1).mask & IMM_U8)

  1032.             INST_RETURN(2, 0x1E, INST_IMM(1).uval)

  1033.         if (INST_REG(0) == REG_H && INST_IMM(1).mask & IMM_U8)

  1034.             INST_RETURN(2, 0x26, INST_IMM(1).uval)

  1035.         if (INST_REG(0) == REG_IXH && INST_IMM(1).mask & IMM_U8)

  1036.             INST_RETURN(3, INST_IX_PREFIX, 0x26, INST_IMM(1).uval)

  1037.         if (INST_REG(0) == REG_IYH && INST_IMM(1).mask & IMM_U8)

  1038.             INST_RETURN(3, INST_IY_PREFIX, 0x26, INST_IMM(1).uval)

  1039.         if (INST_REG(0) == REG_L && INST_IMM(1).mask & IMM_U8)

  1040.             INST_RETURN(2, 0x2E, INST_IMM(1).uval)

  1041.         if (INST_REG(0) == REG_IXL && INST_IMM(1).mask & IMM_U8)

  1042.             INST_RETURN(3, INST_IX_PREFIX, 0x2E, INST_IMM(1).uval)

  1043.         if (INST_REG(0) == REG_IYL && INST_IMM(1).mask & IMM_U8)

  1044.             INST_RETURN(3, INST_IY_PREFIX, 0x2E, INST_IMM(1).uval)

  1045.         if (INST_REG(0) == REG_BC && INST_IMM(1).mask & IMM_U16)

  1046.             INST_RETURN(3, 0x01, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  1047.         if (INST_REG(0) == REG_DE && INST_IMM(1).mask & IMM_U16)

  1048.             INST_RETURN(3, 0x11, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  1049.         if (INST_REG(0) == REG_HL && INST_IMM(1).mask & IMM_U16)

  1050.             INST_RETURN(3, 0x21, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  1051.         if (INST_REG(0) == REG_IX && INST_IMM(1).mask & IMM_U16)

  1052.             INST_RETURN(4, INST_IX_PREFIX, 0x21, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  1053.         if (INST_REG(0) == REG_IY && INST_IMM(1).mask & IMM_U16)

  1054.             INST_RETURN(4, INST_IY_PREFIX, 0x21, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  1055.         if (INST_REG(0) == REG_SP && INST_IMM(1).mask & IMM_U16)

  1056.             INST_RETURN(3, 0x31, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))

  1057.         INST_ERROR(ARG_VALUE)

  1058.     }

  1059.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT &&

  1060.             (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {

  1061.         if (INST_REG(0) == REG_A)

  1062.             INST_RETURN(1, 0x7E)

  1063.         if (INST_REG(0) == REG_B)

  1064.             INST_RETURN(1, 0x46)

  1065.         if (INST_REG(0) == REG_C)

  1066.             INST_RETURN(1, 0x4E)

  1067.         if (INST_REG(0) == REG_D)

  1068.             INST_RETURN(1, 0x56)

  1069.         if (INST_REG(0) == REG_E)

  1070.             INST_RETURN(1, 0x5E)

  1071.         if (INST_REG(0) == REG_H)

  1072.             INST_RETURN(1, 0x66)

  1073.         if (INST_REG(0) == REG_L)

  1074.             INST_RETURN(1, 0x6E)

  1075.         INST_ERROR(ARG_VALUE)

  1076.     }

  1077.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDEXED) {

  1078.         if (INST_REG(0) == REG_A)

  1079.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x7E, INST_INDEX(1).offset)

  1080.         if (INST_REG(0) == REG_B)

  1081.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x46, INST_INDEX(1).offset)

  1082.         if (INST_REG(0) == REG_C)

  1083.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x4E, INST_INDEX(1).offset)

  1084.         if (INST_REG(0) == REG_D)

  1085.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x56, INST_INDEX(1).offset)

  1086.         if (INST_REG(0) == REG_E)

  1087.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x5E, INST_INDEX(1).offset)

  1088.         if (INST_REG(0) == REG_H)

  1089.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x66, INST_INDEX(1).offset)

  1090.         if (INST_REG(0) == REG_L)

  1091.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x6E, INST_INDEX(1).offset)

  1092.         INST_ERROR(ARG_VALUE)

  1093.     }

  1094.     if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT) {

  1095.         if (INST_REG(0) == REG_A && (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_BC))

  1096.             INST_RETURN(1, 0x0A)

  1097.         if (INST_REG(0) == REG_A && (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_DE))

  1098.             INST_RETURN(1, 0x1A)

  1099.         if (INST_REG(0) == REG_HL && INST_INDIRECT(1).type == AT_IMMEDIATE)

  1100.             INST_RETURN(3, 0x2A, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))

  1101.         if (INST_REG(0) == REG_IX && INST_INDIRECT(1).type == AT_IMMEDIATE)

  1102.             INST_RETURN(4, INST_IX_PREFIX, 0x2A, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))

  1103.         if (INST_REG(0) == REG_IY && INST_INDIRECT(1).type == AT_IMMEDIATE)

  1104.             INST_RETURN(4, INST_IY_PREFIX, 0x2A, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))

  1105.         if (INST_REG(0) == REG_A && INST_INDIRECT(1).type == AT_IMMEDIATE)

  1106.             INST_RETURN(3, 0x3A, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))

  1107.         if (INST_REG(0) == REG_BC && INST_INDIRECT(1).type == AT_IMMEDIATE)

  1108.             INST_RETURN(4, 0xED, 0x4B, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))

  1109.         if (INST_REG(0) == REG_DE && INST_INDIRECT(1).type == AT_IMMEDIATE)

  1110.             INST_RETURN(4, 0xED, 0x5B, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))

  1111.         if (INST_REG(0) == REG_SP && INST_INDIRECT(1).type == AT_IMMEDIATE)

  1112.             INST_RETURN(4, 0xED, 0x7B, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))

  1113.         INST_ERROR(ARG_VALUE)

  1114.     }

  1115.     if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_REGISTER &&

  1116.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  1117.         if (INST_REG(1) == REG_A)

  1118.             INST_RETURN(1, 0x77)

  1119.         if (INST_REG(1) == REG_B)

  1120.             INST_RETURN(1, 0x70)

  1121.         if (INST_REG(1) == REG_C)

  1122.             INST_RETURN(1, 0x71)

  1123.         if (INST_REG(1) == REG_D)

  1124.             INST_RETURN(1, 0x72)

  1125.         if (INST_REG(1) == REG_E)

  1126.             INST_RETURN(1, 0x73)

  1127.         if (INST_REG(1) == REG_H)

  1128.             INST_RETURN(1, 0x74)

  1129.         if (INST_REG(1) == REG_L)

  1130.             INST_RETURN(1, 0x75)

  1131.         INST_ERROR(ARG_VALUE)

  1132.     }

  1133.     if (INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

  1134.         if (INST_REG(1) == REG_A)

  1135.             INST_RETURN(3, INST_INDEX_PREFIX(0), 0x77, INST_INDEX(0).offset)

  1136.         if (INST_REG(1) == REG_B)

  1137.             INST_RETURN(3, INST_INDEX_PREFIX(0), 0x70, INST_INDEX(0).offset)

  1138.         if (INST_REG(1) == REG_C)

  1139.             INST_RETURN(3, INST_INDEX_PREFIX(0), 0x71, INST_INDEX(0).offset)

  1140.         if (INST_REG(1) == REG_D)

  1141.             INST_RETURN(3, INST_INDEX_PREFIX(0), 0x72, INST_INDEX(0).offset)

  1142.         if (INST_REG(1) == REG_E)

  1143.             INST_RETURN(3, INST_INDEX_PREFIX(0), 0x73, INST_INDEX(0).offset)

  1144.         if (INST_REG(1) == REG_H)

  1145.             INST_RETURN(3, INST_INDEX_PREFIX(0), 0x74, INST_INDEX(0).offset)

  1146.         if (INST_REG(1) == REG_L)

  1147.             INST_RETURN(3, INST_INDEX_PREFIX(0), 0x75, INST_INDEX(0).offset)

  1148.         INST_ERROR(ARG_VALUE)

  1149.     }

  1150.     if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_IMMEDIATE &&

  1151.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  1152.         if (INST_IMM(1).mask & IMM_U8)

  1153.             INST_RETURN(2, 0x36, INST_IMM(1).uval)

  1154.         INST_ERROR(ARG_VALUE)

  1155.     }

  1156.     if (INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_IMMEDIATE) {

  1157.         if (INST_IMM(1).mask & IMM_U8)

  1158.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0x36, INST_INDEX(0).offset, INST_IMM(1).uval)

  1159.         INST_ERROR(ARG_VALUE)

  1160.     }

  1161.     if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_REGISTER) {

  1162.         if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_BC) && INST_REG(1) == REG_A)

  1163.             INST_RETURN(1, 0x02)

  1164.         if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_DE) && INST_REG(1) == REG_A)

  1165.             INST_RETURN(1, 0x12)

  1166.         if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_HL)

  1167.             INST_RETURN(3, 0x22, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))

  1168.         if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_IX)

  1169.             INST_RETURN(4, INST_IX_PREFIX, 0x22, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))

  1170.         if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_IY)

  1171.             INST_RETURN(4, INST_IY_PREFIX, 0x22, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))

  1172.         if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_A)

  1173.             INST_RETURN(3, 0x32, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))

  1174.         if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_BC)

  1175.             INST_RETURN(4, 0xED, 0x43, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))

  1176.         if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_DE)

  1177.             INST_RETURN(4, 0xED, 0x53, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))

  1178.         if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_SP)

  1179.             INST_RETURN(4, 0xED, 0x73, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))

  1180.         INST_ERROR(ARG_VALUE)

  1181.     }

  1182.     INST_ERROR(ARG_TYPE)

  1183. }

  1184. 

  1185. INST_FUNC(ldd)

  1186. {

  1187.     INST_TAKES_NO_ARGS

  1188.     INST_RETURN(2, 0xED, 0xA8)

  1189. }

  1190. 

  1191. INST_FUNC(lddr)

  1192. {

  1193.     INST_TAKES_NO_ARGS

  1194.     INST_RETURN(2, 0xED, 0xB8)

  1195. }

  1196. 

  1197. INST_FUNC(ldi)

  1198. {

  1199.     INST_TAKES_NO_ARGS

  1200.     INST_RETURN(2, 0xED, 0xA0)

  1201. }

  1202. 

  1203. INST_FUNC(ldir)

  1204. {

  1205.     INST_TAKES_NO_ARGS

  1206.     INST_RETURN(2, 0xED, 0xB0)

  1207. }

  1208. 

  1209. INST_FUNC(neg)

  1210. {

  1211.     INST_TAKES_NO_ARGS

  1212.     INST_RETURN(2, 0xED, 0x44)

  1213. }

  1214. 

  1215. INST_FUNC(nop)

  1216. {

  1217.     INST_TAKES_NO_ARGS

  1218.     INST_RETURN(1, 0x00)

  1219. }

  1220. 

  1221. INST_FUNC(or)

  1222. {

  1223.     INST_TAKES_ARGS(

  1224.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  1225.         AT_NONE,

  1226.         AT_NONE

  1227.     )

  1228.     if (INST_TYPE(0) == AT_REGISTER) {

  1229.         if (INST_REG(0) == REG_A)

  1230.             INST_RETURN(1, 0xB7)

  1231.         if (INST_REG(0) == REG_B)

  1232.             INST_RETURN(1, 0xB0)

  1233.         if (INST_REG(0) == REG_C)

  1234.             INST_RETURN(1, 0xB1)

  1235.         if (INST_REG(0) == REG_D)

  1236.             INST_RETURN(1, 0xB2)

  1237.         if (INST_REG(0) == REG_E)

  1238.             INST_RETURN(1, 0xB3)

  1239.         if (INST_REG(0) == REG_H)

  1240.             INST_RETURN(1, 0xB4)

  1241.         if (INST_REG(0) == REG_IXH)

  1242.             INST_RETURN(2, INST_IX_PREFIX, 0xB4)

  1243.         if (INST_REG(0) == REG_IYH)

  1244.             INST_RETURN(2, INST_IY_PREFIX, 0xB4)

  1245.         if (INST_REG(0) == REG_L)

  1246.             INST_RETURN(1, 0xB5)

  1247.         if (INST_REG(0) == REG_IXL)

  1248.             INST_RETURN(2, INST_IX_PREFIX, 0xB5)

  1249.         if (INST_REG(0) == REG_IYL)

  1250.             INST_RETURN(2, INST_IY_PREFIX, 0xB5)

  1251.         INST_ERROR(ARG_VALUE)

  1252.     }

  1253.     if (INST_TYPE(0) == AT_IMMEDIATE) {

  1254.         if (INST_IMM(0).mask & IMM_U8)

  1255.             INST_RETURN(2, 0xF6, INST_IMM(0).uval)

  1256.         INST_ERROR(ARG_VALUE)

  1257.     }

  1258.     if (INST_TYPE(0) == AT_INDIRECT &&

  1259.             (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {

  1260.         INST_RETURN(1, 0xB6)

  1261.     }

  1262.     if (INST_TYPE(0) == AT_INDEXED) {

  1263.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0xB6, INST_INDEX(0).offset)

  1264.     }

  1265.     INST_ERROR(ARG_TYPE)

  1266. }

  1267. 

  1268. INST_FUNC(otdr)

  1269. {

  1270.     INST_TAKES_NO_ARGS

  1271.     INST_RETURN(2, 0xED, 0xBB)

  1272. }

  1273. 

  1274. INST_FUNC(otir)

  1275. {

  1276.     INST_TAKES_NO_ARGS

  1277.     INST_RETURN(2, 0xED, 0xB3)

  1278. }

  1279. 

  1280. INST_FUNC(out)

  1281. {

  1282.     INST_TAKES_ARGS(

  1283.         AT_PORT,

  1284.         AT_IMMEDIATE|AT_REGISTER,

  1285.         AT_NONE

  1286.     )

  1287.     if (INST_TYPE(0) == AT_PORT && INST_TYPE(1) == AT_REGISTER) {

  1288.         if (INST_PORT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_A)

  1289.             INST_RETURN(2, 0xD3, INST_PORT(0).port.imm.uval)

  1290.         if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_A)

  1291.             INST_RETURN(2, 0xED, 0x79)

  1292.         if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_B)

  1293.             INST_RETURN(2, 0xED, 0x41)

  1294.         if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_C)

  1295.             INST_RETURN(2, 0xED, 0x49)

  1296.         if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_D)

  1297.             INST_RETURN(2, 0xED, 0x51)

  1298.         if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_E)

  1299.             INST_RETURN(2, 0xED, 0x59)

  1300.         if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_H)

  1301.             INST_RETURN(2, 0xED, 0x61)

  1302.         if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_L)

  1303.             INST_RETURN(2, 0xED, 0x69)

  1304.         INST_ERROR(ARG_VALUE)

  1305.     }

  1306.     if (INST_TYPE(0) == AT_PORT && INST_TYPE(1) == AT_IMMEDIATE) {

  1307.         if (INST_PORT(0).type == AT_REGISTER && (INST_IMM(1).mask & IMM_U8 && INST_IMM(1).uval == 0))

  1308.             INST_RETURN(2, 0xED, 0x71)

  1309.         INST_ERROR(ARG_VALUE)

  1310.     }

  1311.     INST_ERROR(ARG_TYPE)

  1312. }

  1313. 

  1314. INST_FUNC(outd)

  1315. {

  1316.     INST_TAKES_NO_ARGS

  1317.     INST_RETURN(2, 0xED, 0xAB)

  1318. }

  1319. 

  1320. INST_FUNC(outi)

  1321. {

  1322.     INST_TAKES_NO_ARGS

  1323.     INST_RETURN(2, 0xED, 0xA3)

  1324. }

  1325. 

  1326. INST_FUNC(reti)

  1327. {

  1328.     INST_TAKES_NO_ARGS

  1329.     INST_RETURN(2, 0xED, 0x4D)

  1330. }

  1331. 

  1332. INST_FUNC(retn)

  1333. {

  1334.     INST_TAKES_NO_ARGS

  1335.     INST_RETURN(2, 0xED, 0x45)

  1336. }

  1337. 

  1338. INST_FUNC(rla)

  1339. {

  1340.     INST_TAKES_NO_ARGS

  1341.     INST_RETURN(1, 0x17)

  1342. }

  1343. 

  1344. INST_FUNC(rlca)

  1345. {

  1346.     INST_TAKES_NO_ARGS

  1347.     INST_RETURN(1, 0x07)

  1348. }

  1349. 

  1350. INST_FUNC(rld)

  1351. {

  1352.     INST_TAKES_NO_ARGS

  1353.     INST_RETURN(2, 0xED, 0x6F)

  1354. }

  1355. 

  1356. INST_FUNC(rra)

  1357. {

  1358.     INST_TAKES_NO_ARGS

  1359.     INST_RETURN(1, 0x1F)

  1360. }

  1361. 

  1362. INST_FUNC(rrca)

  1363. {

  1364.     INST_TAKES_NO_ARGS

  1365.     INST_RETURN(1, 0x0F)

  1366. }

  1367. 

  1368. INST_FUNC(scf)

  1369. {

  1370.     INST_TAKES_NO_ARGS

  1371.     INST_RETURN(1, 0x37)

  1372. }

  1373. 

  1374. /* @AUTOGEN_INST_BLOCK_END */

  1375. 

  1376. /*

  1377.     Return the relevant ASMInstParser function for the given encoded mnemonic.

  1378. */

  1379. static ASMInstParser lookup_parser(uint32_t key)

  1380. {

  1381. /* @AUTOGEN_LOOKUP_BLOCK_START */

  1382.     HANDLE(adc)

  1383.     HANDLE(add)

  1384.     HANDLE(and)

  1385.     HANDLE(bit)

  1386.     HANDLE(call)

  1387.     HANDLE(ccf)

  1388.     HANDLE(cp)

  1389.     HANDLE(cpd)

  1390.     HANDLE(cpdr)

  1391.     HANDLE(cpi)

  1392.     HANDLE(cpir)

  1393.     HANDLE(cpl)

  1394.     HANDLE(daa)

  1395.     HANDLE(dec)

  1396.     HANDLE(di)

  1397.     HANDLE(djnz)

  1398.     HANDLE(ei)

  1399.     HANDLE(ex)

  1400.     HANDLE(exx)

  1401.     HANDLE(halt)

  1402.     HANDLE(im)

  1403.     HANDLE(in)

  1404.     HANDLE(inc)

  1405.     HANDLE(ind)

  1406.     HANDLE(indr)

  1407.     HANDLE(ini)

  1408.     HANDLE(inir)

  1409.     HANDLE(jp)

  1410.     HANDLE(jr)

  1411.     HANDLE(ld)

  1412.     HANDLE(ldd)

  1413.     HANDLE(lddr)

  1414.     HANDLE(ldi)

  1415.     HANDLE(ldir)

  1416.     HANDLE(neg)

  1417.     HANDLE(nop)

  1418.     HANDLE(or)

  1419.     HANDLE(otdr)

  1420.     HANDLE(otir)

  1421.     HANDLE(out)

  1422.     HANDLE(outd)

  1423.     HANDLE(outi)

  1424.     HANDLE(reti)

  1425.     HANDLE(retn)

  1426.     HANDLE(rla)

  1427.     HANDLE(rlca)

  1428.     HANDLE(rld)

  1429.     HANDLE(rra)

  1430.     HANDLE(rrca)

  1431.     HANDLE(scf)

  1432. /* @AUTOGEN_LOOKUP_BLOCK_END */

  1433.     return NULL;

  1434. }