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.
147 Commits
2 Branches
849 KiB
 
 
 
 
 
Tree: 764211a379
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '764211a379'
${ noResults }
crater/src/assembler/instructions.inc.c

2785 lines
123 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 07:34:18 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(pop)

  1327. {

  1328.     INST_TAKES_ARGS(

  1329.         AT_REGISTER,

  1330.         AT_NONE,

  1331.         AT_NONE

  1332.     )

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

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

  1335.             INST_RETURN(1, 0xC1)

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

  1337.             INST_RETURN(1, 0xD1)

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

  1339.             INST_RETURN(1, 0xE1)

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

  1341.             INST_RETURN(2, INST_IX_PREFIX, 0xE1)

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

  1343.             INST_RETURN(2, INST_IY_PREFIX, 0xE1)

  1344.         if (INST_REG(0) == REG_AF)

  1345.             INST_RETURN(1, 0xF1)

  1346.         INST_ERROR(ARG_VALUE)

  1347.     }

  1348.     INST_ERROR(ARG_TYPE)

  1349. }

  1350. 

  1351. INST_FUNC(push)

  1352. {

  1353.     INST_TAKES_ARGS(

  1354.         AT_REGISTER,

  1355.         AT_NONE,

  1356.         AT_NONE

  1357.     )

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

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

  1360.             INST_RETURN(1, 0xC5)

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

  1362.             INST_RETURN(1, 0xD5)

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

  1364.             INST_RETURN(1, 0xE5)

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

  1366.             INST_RETURN(2, INST_IX_PREFIX, 0xE5)

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

  1368.             INST_RETURN(2, INST_IY_PREFIX, 0xE5)

  1369.         if (INST_REG(0) == REG_AF)

  1370.             INST_RETURN(1, 0xF5)

  1371.         INST_ERROR(ARG_VALUE)

  1372.     }

  1373.     INST_ERROR(ARG_TYPE)

  1374. }

  1375. 

  1376. INST_FUNC(res)

  1377. {

  1378.     INST_TAKES_ARGS(

  1379.         AT_IMMEDIATE,

  1380.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  1381.         AT_OPTIONAL|AT_REGISTER

  1382.     )

  1383.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_REGISTER) {

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

  1385.             INST_RETURN(2, 0xCB, 0x87)

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

  1387.             INST_RETURN(2, 0xCB, 0x80)

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

  1389.             INST_RETURN(2, 0xCB, 0x81)

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

  1391.             INST_RETURN(2, 0xCB, 0x82)

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

  1393.             INST_RETURN(2, 0xCB, 0x83)

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

  1395.             INST_RETURN(2, 0xCB, 0x84)

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

  1397.             INST_RETURN(2, 0xCB, 0x85)

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

  1399.             INST_RETURN(2, 0xCB, 0x8F)

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

  1401.             INST_RETURN(2, 0xCB, 0x88)

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

  1403.             INST_RETURN(2, 0xCB, 0x89)

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

  1405.             INST_RETURN(2, 0xCB, 0x8A)

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

  1407.             INST_RETURN(2, 0xCB, 0x8B)

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

  1409.             INST_RETURN(2, 0xCB, 0x8C)

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

  1411.             INST_RETURN(2, 0xCB, 0x8D)

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

  1413.             INST_RETURN(2, 0xCB, 0x97)

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

  1415.             INST_RETURN(2, 0xCB, 0x90)

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

  1417.             INST_RETURN(2, 0xCB, 0x91)

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

  1419.             INST_RETURN(2, 0xCB, 0x92)

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

  1421.             INST_RETURN(2, 0xCB, 0x93)

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

  1423.             INST_RETURN(2, 0xCB, 0x94)

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

  1425.             INST_RETURN(2, 0xCB, 0x95)

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

  1427.             INST_RETURN(2, 0xCB, 0x9F)

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

  1429.             INST_RETURN(2, 0xCB, 0x98)

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

  1431.             INST_RETURN(2, 0xCB, 0x99)

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

  1433.             INST_RETURN(2, 0xCB, 0x9A)

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

  1435.             INST_RETURN(2, 0xCB, 0x9B)

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

  1437.             INST_RETURN(2, 0xCB, 0x9C)

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

  1439.             INST_RETURN(2, 0xCB, 0x9D)

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

  1441.             INST_RETURN(2, 0xCB, 0xA7)

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

  1443.             INST_RETURN(2, 0xCB, 0xA0)

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

  1445.             INST_RETURN(2, 0xCB, 0xA1)

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

  1447.             INST_RETURN(2, 0xCB, 0xA2)

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

  1449.             INST_RETURN(2, 0xCB, 0xA3)

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

  1451.             INST_RETURN(2, 0xCB, 0xA4)

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

  1453.             INST_RETURN(2, 0xCB, 0xA5)

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

  1455.             INST_RETURN(2, 0xCB, 0xAF)

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

  1457.             INST_RETURN(2, 0xCB, 0xA8)

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

  1459.             INST_RETURN(2, 0xCB, 0xA9)

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

  1461.             INST_RETURN(2, 0xCB, 0xAA)

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

  1463.             INST_RETURN(2, 0xCB, 0xAB)

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

  1465.             INST_RETURN(2, 0xCB, 0xAC)

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

  1467.             INST_RETURN(2, 0xCB, 0xAD)

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

  1469.             INST_RETURN(2, 0xCB, 0xB7)

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

  1471.             INST_RETURN(2, 0xCB, 0xB0)

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

  1473.             INST_RETURN(2, 0xCB, 0xB1)

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

  1475.             INST_RETURN(2, 0xCB, 0xB2)

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

  1477.             INST_RETURN(2, 0xCB, 0xB3)

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

  1479.             INST_RETURN(2, 0xCB, 0xB4)

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

  1481.             INST_RETURN(2, 0xCB, 0xB5)

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

  1483.             INST_RETURN(2, 0xCB, 0xBF)

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

  1485.             INST_RETURN(2, 0xCB, 0xB8)

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

  1487.             INST_RETURN(2, 0xCB, 0xB9)

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

  1489.             INST_RETURN(2, 0xCB, 0xBA)

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

  1491.             INST_RETURN(2, 0xCB, 0xBB)

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

  1493.             INST_RETURN(2, 0xCB, 0xBC)

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

  1495.             INST_RETURN(2, 0xCB, 0xBD)

  1496.         INST_ERROR(ARG_VALUE)

  1497.     }

  1498.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDIRECT &&

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

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

  1501.             INST_RETURN(2, 0xCB, 0x86)

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

  1503.             INST_RETURN(2, 0xCB, 0x8E)

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

  1505.             INST_RETURN(2, 0xCB, 0x96)

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

  1507.             INST_RETURN(2, 0xCB, 0x9E)

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

  1509.             INST_RETURN(2, 0xCB, 0xA6)

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

  1511.             INST_RETURN(2, 0xCB, 0xAE)

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

  1513.             INST_RETURN(2, 0xCB, 0xB6)

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

  1515.             INST_RETURN(2, 0xCB, 0xBE)

  1516.         INST_ERROR(ARG_VALUE)

  1517.     }

  1518.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED) {

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

  1520.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x86)

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

  1522.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x8E)

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

  1524.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x96)

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

  1526.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x9E)

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

  1528.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA6)

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

  1530.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xAE)

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

  1532.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB6)

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

  1534.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xBE)

  1535.         INST_ERROR(ARG_VALUE)

  1536.     }

  1537.     if (INST_NARGS == 3 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED && INST_TYPE(2) == AT_REGISTER) {

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

  1539.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x87)

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

  1541.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x80)

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

  1543.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x81)

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

  1545.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x82)

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

  1547.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x83)

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

  1549.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x84)

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

  1551.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x85)

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

  1553.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x8F)

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

  1555.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x88)

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

  1557.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x89)

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

  1559.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x8A)

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

  1561.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x8B)

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

  1563.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x8C)

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

  1565.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x8D)

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

  1567.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x97)

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

  1569.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x90)

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

  1571.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x91)

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

  1573.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x92)

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

  1575.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x93)

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

  1577.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x94)

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

  1579.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x95)

  1580.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_A)

  1581.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x9F)

  1582.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_B)

  1583.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x98)

  1584.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_C)

  1585.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x99)

  1586.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_D)

  1587.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x9A)

  1588.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_E)

  1589.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x9B)

  1590.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_H)

  1591.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x9C)

  1592.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_L)

  1593.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x9D)

  1594.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_A)

  1595.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA7)

  1596.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_B)

  1597.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA0)

  1598.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_C)

  1599.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA1)

  1600.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_D)

  1601.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA2)

  1602.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_E)

  1603.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA3)

  1604.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_H)

  1605.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA4)

  1606.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_L)

  1607.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA5)

  1608.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_A)

  1609.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xAF)

  1610.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_B)

  1611.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA8)

  1612.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_C)

  1613.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xA9)

  1614.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_D)

  1615.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xAA)

  1616.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_E)

  1617.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xAB)

  1618.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_H)

  1619.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xAC)

  1620.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_L)

  1621.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xAD)

  1622.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_A)

  1623.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB7)

  1624.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_B)

  1625.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB0)

  1626.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_C)

  1627.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB1)

  1628.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_D)

  1629.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB2)

  1630.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_E)

  1631.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB3)

  1632.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_H)

  1633.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB4)

  1634.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_L)

  1635.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB5)

  1636.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_A)

  1637.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xBF)

  1638.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_B)

  1639.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB8)

  1640.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_C)

  1641.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xB9)

  1642.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_D)

  1643.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xBA)

  1644.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_E)

  1645.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xBB)

  1646.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_H)

  1647.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xBC)

  1648.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_L)

  1649.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xBD)

  1650.         INST_ERROR(ARG_VALUE)

  1651.     }

  1652.     INST_ERROR(ARG_TYPE)

  1653. }

  1654. 

  1655. INST_FUNC(ret)

  1656. {

  1657.     INST_TAKES_ARGS(

  1658.         AT_CONDITION|AT_OPTIONAL,

  1659.         AT_NONE,

  1660.         AT_NONE

  1661.     )

  1662.     if (INST_NARGS == 0) {

  1663.         INST_RETURN(1, 0xC9)

  1664.     }

  1665.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_CONDITION) {

  1666.         if (INST_COND(0) == COND_NZ)

  1667.             INST_RETURN(1, 0xC0)

  1668.         if (INST_COND(0) == COND_Z)

  1669.             INST_RETURN(1, 0xC8)

  1670.         if (INST_COND(0) == COND_NC)

  1671.             INST_RETURN(1, 0xD0)

  1672.         if (INST_COND(0) == COND_C)

  1673.             INST_RETURN(1, 0xD8)

  1674.         if (INST_COND(0) == COND_PO)

  1675.             INST_RETURN(1, 0xE0)

  1676.         if (INST_COND(0) == COND_PE)

  1677.             INST_RETURN(1, 0xE8)

  1678.         if (INST_COND(0) == COND_P)

  1679.             INST_RETURN(1, 0xF0)

  1680.         if (INST_COND(0) == COND_M)

  1681.             INST_RETURN(1, 0xF8)

  1682.         INST_ERROR(ARG_VALUE)

  1683.     }

  1684.     INST_ERROR(ARG_TYPE)

  1685. }

  1686. 

  1687. INST_FUNC(reti)

  1688. {

  1689.     INST_TAKES_NO_ARGS

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

  1691. }

  1692. 

  1693. INST_FUNC(retn)

  1694. {

  1695.     INST_TAKES_NO_ARGS

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

  1697. }

  1698. 

  1699. INST_FUNC(rl)

  1700. {

  1701.     INST_TAKES_ARGS(

  1702.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  1703.         AT_OPTIONAL|AT_REGISTER,

  1704.         AT_NONE

  1705.     )

  1706.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  1708.             INST_RETURN(2, 0xCB, 0x17)

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

  1710.             INST_RETURN(2, 0xCB, 0x10)

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

  1712.             INST_RETURN(2, 0xCB, 0x11)

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

  1714.             INST_RETURN(2, 0xCB, 0x12)

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

  1716.             INST_RETURN(2, 0xCB, 0x13)

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

  1718.             INST_RETURN(2, 0xCB, 0x14)

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

  1720.             INST_RETURN(2, 0xCB, 0x15)

  1721.         INST_ERROR(ARG_VALUE)

  1722.     }

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

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

  1725.         INST_RETURN(2, 0xCB, 0x16)

  1726.     }

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

  1728.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x16)

  1729.     }

  1730.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  1732.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x17)

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

  1734.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x10)

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

  1736.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x11)

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

  1738.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x12)

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

  1740.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x13)

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

  1742.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x14)

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

  1744.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x15)

  1745.         INST_ERROR(ARG_VALUE)

  1746.     }

  1747.     INST_ERROR(ARG_TYPE)

  1748. }

  1749. 

  1750. INST_FUNC(rla)

  1751. {

  1752.     INST_TAKES_NO_ARGS

  1753.     INST_RETURN(1, 0x17)

  1754. }

  1755. 

  1756. INST_FUNC(rlc)

  1757. {

  1758.     INST_TAKES_ARGS(

  1759.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  1760.         AT_OPTIONAL|AT_REGISTER,

  1761.         AT_NONE

  1762.     )

  1763.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  1765.             INST_RETURN(2, 0xCB, 0x07)

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

  1767.             INST_RETURN(2, 0xCB, 0x00)

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

  1769.             INST_RETURN(2, 0xCB, 0x01)

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

  1771.             INST_RETURN(2, 0xCB, 0x02)

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

  1773.             INST_RETURN(2, 0xCB, 0x03)

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

  1775.             INST_RETURN(2, 0xCB, 0x04)

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

  1777.             INST_RETURN(2, 0xCB, 0x05)

  1778.         INST_ERROR(ARG_VALUE)

  1779.     }

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

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

  1782.         INST_RETURN(2, 0xCB, 0x06)

  1783.     }

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

  1785.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x06)

  1786.     }

  1787.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  1789.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x07)

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

  1791.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x00)

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

  1793.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x01)

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

  1795.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x02)

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

  1797.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x03)

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

  1799.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x04)

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

  1801.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x05)

  1802.         INST_ERROR(ARG_VALUE)

  1803.     }

  1804.     INST_ERROR(ARG_TYPE)

  1805. }

  1806. 

  1807. INST_FUNC(rlca)

  1808. {

  1809.     INST_TAKES_NO_ARGS

  1810.     INST_RETURN(1, 0x07)

  1811. }

  1812. 

  1813. INST_FUNC(rld)

  1814. {

  1815.     INST_TAKES_NO_ARGS

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

  1817. }

  1818. 

  1819. INST_FUNC(rr)

  1820. {

  1821.     INST_TAKES_ARGS(

  1822.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  1823.         AT_OPTIONAL|AT_REGISTER,

  1824.         AT_NONE

  1825.     )

  1826.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  1828.             INST_RETURN(2, 0xCB, 0x1F)

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

  1830.             INST_RETURN(2, 0xCB, 0x18)

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

  1832.             INST_RETURN(2, 0xCB, 0x19)

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

  1834.             INST_RETURN(2, 0xCB, 0x1A)

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

  1836.             INST_RETURN(2, 0xCB, 0x1B)

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

  1838.             INST_RETURN(2, 0xCB, 0x1C)

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

  1840.             INST_RETURN(2, 0xCB, 0x1D)

  1841.         INST_ERROR(ARG_VALUE)

  1842.     }

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

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

  1845.         INST_RETURN(2, 0xCB, 0x1E)

  1846.     }

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

  1848.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1E)

  1849.     }

  1850.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  1852.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1F)

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

  1854.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x18)

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

  1856.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x19)

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

  1858.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1A)

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

  1860.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1B)

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

  1862.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1C)

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

  1864.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1D)

  1865.         INST_ERROR(ARG_VALUE)

  1866.     }

  1867.     INST_ERROR(ARG_TYPE)

  1868. }

  1869. 

  1870. INST_FUNC(rra)

  1871. {

  1872.     INST_TAKES_NO_ARGS

  1873.     INST_RETURN(1, 0x1F)

  1874. }

  1875. 

  1876. INST_FUNC(rrc)

  1877. {

  1878.     INST_TAKES_ARGS(

  1879.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  1880.         AT_OPTIONAL|AT_REGISTER,

  1881.         AT_NONE

  1882.     )

  1883.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  1885.             INST_RETURN(2, 0xCB, 0x0F)

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

  1887.             INST_RETURN(2, 0xCB, 0x08)

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

  1889.             INST_RETURN(2, 0xCB, 0x09)

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

  1891.             INST_RETURN(2, 0xCB, 0x0A)

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

  1893.             INST_RETURN(2, 0xCB, 0x0B)

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

  1895.             INST_RETURN(2, 0xCB, 0x0C)

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

  1897.             INST_RETURN(2, 0xCB, 0x0D)

  1898.         INST_ERROR(ARG_VALUE)

  1899.     }

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

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

  1902.         INST_RETURN(2, 0xCB, 0x0E)

  1903.     }

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

  1905.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0E)

  1906.     }

  1907.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  1909.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0F)

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

  1911.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x08)

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

  1913.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x09)

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

  1915.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0A)

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

  1917.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0B)

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

  1919.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0C)

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

  1921.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0D)

  1922.         INST_ERROR(ARG_VALUE)

  1923.     }

  1924.     INST_ERROR(ARG_TYPE)

  1925. }

  1926. 

  1927. INST_FUNC(rrca)

  1928. {

  1929.     INST_TAKES_NO_ARGS

  1930.     INST_RETURN(1, 0x0F)

  1931. }

  1932. 

  1933. INST_FUNC(rrd)

  1934. {

  1935.     INST_TAKES_NO_ARGS

  1936.     INST_RETURN(2, 0xED, 0x67)

  1937. }

  1938. 

  1939. INST_FUNC(rst)

  1940. {

  1941.     INST_TAKES_ARGS(

  1942.         AT_IMMEDIATE,

  1943.         AT_NONE,

  1944.         AT_NONE

  1945.     )

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

  1947.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 0))

  1948.             INST_RETURN(1, 0xC7)

  1949.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 8))

  1950.             INST_RETURN(1, 0xCF)

  1951.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 16))

  1952.             INST_RETURN(1, 0xD7)

  1953.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 24))

  1954.             INST_RETURN(1, 0xDF)

  1955.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 32))

  1956.             INST_RETURN(1, 0xE7)

  1957.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 40))

  1958.             INST_RETURN(1, 0xEF)

  1959.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 48))

  1960.             INST_RETURN(1, 0xF7)

  1961.         if ((INST_IMM(0).mask & IMM_RST && INST_IMM(0).uval == 56))

  1962.             INST_RETURN(1, 0xFF)

  1963.         INST_ERROR(ARG_VALUE)

  1964.     }

  1965.     INST_ERROR(ARG_TYPE)

  1966. }

  1967. 

  1968. INST_FUNC(sbc)

  1969. {

  1970.     INST_TAKES_ARGS(

  1971.         AT_REGISTER,

  1972.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  1973.         AT_NONE

  1974.     )

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

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

  1977.             INST_RETURN(1, 0x9F)

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

  1979.             INST_RETURN(1, 0x98)

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

  1981.             INST_RETURN(1, 0x99)

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

  1983.             INST_RETURN(1, 0x9A)

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

  1985.             INST_RETURN(1, 0x9B)

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

  1987.             INST_RETURN(1, 0x9C)

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

  1989.             INST_RETURN(2, INST_IX_PREFIX, 0x9C)

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

  1991.             INST_RETURN(2, INST_IY_PREFIX, 0x9C)

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

  1993.             INST_RETURN(1, 0x9D)

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

  1995.             INST_RETURN(2, INST_IX_PREFIX, 0x9D)

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

  1997.             INST_RETURN(2, INST_IY_PREFIX, 0x9D)

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

  1999.             INST_RETURN(2, 0xED, 0x42)

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

  2001.             INST_RETURN(2, 0xED, 0x52)

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

  2003.             INST_RETURN(2, 0xED, 0x62)

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

  2005.             INST_RETURN(2, 0xED, 0x72)

  2006.         INST_ERROR(ARG_VALUE)

  2007.     }

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

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

  2010.             INST_RETURN(2, 0xDE, INST_IMM(1).uval)

  2011.         INST_ERROR(ARG_VALUE)

  2012.     }

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

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

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

  2016.             INST_RETURN(1, 0x9E)

  2017.         INST_ERROR(ARG_VALUE)

  2018.     }

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

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

  2021.             INST_RETURN(3, INST_INDEX_PREFIX(1), 0x9E, INST_INDEX(1).offset)

  2022.         INST_ERROR(ARG_VALUE)

  2023.     }

  2024.     INST_ERROR(ARG_TYPE)

  2025. }

  2026. 

  2027. INST_FUNC(scf)

  2028. {

  2029.     INST_TAKES_NO_ARGS

  2030.     INST_RETURN(1, 0x37)

  2031. }

  2032. 

  2033. INST_FUNC(set)

  2034. {

  2035.     INST_TAKES_ARGS(

  2036.         AT_IMMEDIATE,

  2037.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2038.         AT_OPTIONAL|AT_REGISTER

  2039.     )

  2040.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_REGISTER) {

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

  2042.             INST_RETURN(2, 0xCB, 0xC7)

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

  2044.             INST_RETURN(2, 0xCB, 0xC0)

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

  2046.             INST_RETURN(2, 0xCB, 0xC1)

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

  2048.             INST_RETURN(2, 0xCB, 0xC2)

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

  2050.             INST_RETURN(2, 0xCB, 0xC3)

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

  2052.             INST_RETURN(2, 0xCB, 0xC4)

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

  2054.             INST_RETURN(2, 0xCB, 0xC5)

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

  2056.             INST_RETURN(2, 0xCB, 0xCF)

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

  2058.             INST_RETURN(2, 0xCB, 0xC8)

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

  2060.             INST_RETURN(2, 0xCB, 0xC9)

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

  2062.             INST_RETURN(2, 0xCB, 0xCA)

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

  2064.             INST_RETURN(2, 0xCB, 0xCB)

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

  2066.             INST_RETURN(2, 0xCB, 0xCC)

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

  2068.             INST_RETURN(2, 0xCB, 0xCD)

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

  2070.             INST_RETURN(2, 0xCB, 0xD7)

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

  2072.             INST_RETURN(2, 0xCB, 0xD0)

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

  2074.             INST_RETURN(2, 0xCB, 0xD1)

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

  2076.             INST_RETURN(2, 0xCB, 0xD2)

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

  2078.             INST_RETURN(2, 0xCB, 0xD3)

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

  2080.             INST_RETURN(2, 0xCB, 0xD4)

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

  2082.             INST_RETURN(2, 0xCB, 0xD5)

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

  2084.             INST_RETURN(2, 0xCB, 0xDF)

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

  2086.             INST_RETURN(2, 0xCB, 0xD8)

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

  2088.             INST_RETURN(2, 0xCB, 0xD9)

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

  2090.             INST_RETURN(2, 0xCB, 0xDA)

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

  2092.             INST_RETURN(2, 0xCB, 0xDB)

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

  2094.             INST_RETURN(2, 0xCB, 0xDC)

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

  2096.             INST_RETURN(2, 0xCB, 0xDD)

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

  2098.             INST_RETURN(2, 0xCB, 0xE7)

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

  2100.             INST_RETURN(2, 0xCB, 0xE0)

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

  2102.             INST_RETURN(2, 0xCB, 0xE1)

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

  2104.             INST_RETURN(2, 0xCB, 0xE2)

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

  2106.             INST_RETURN(2, 0xCB, 0xE3)

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

  2108.             INST_RETURN(2, 0xCB, 0xE4)

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

  2110.             INST_RETURN(2, 0xCB, 0xE5)

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

  2112.             INST_RETURN(2, 0xCB, 0xEF)

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

  2114.             INST_RETURN(2, 0xCB, 0xE8)

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

  2116.             INST_RETURN(2, 0xCB, 0xE9)

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

  2118.             INST_RETURN(2, 0xCB, 0xEA)

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

  2120.             INST_RETURN(2, 0xCB, 0xEB)

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

  2122.             INST_RETURN(2, 0xCB, 0xEC)

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

  2124.             INST_RETURN(2, 0xCB, 0xED)

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

  2126.             INST_RETURN(2, 0xCB, 0xF7)

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

  2128.             INST_RETURN(2, 0xCB, 0xF0)

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

  2130.             INST_RETURN(2, 0xCB, 0xF1)

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

  2132.             INST_RETURN(2, 0xCB, 0xF2)

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

  2134.             INST_RETURN(2, 0xCB, 0xF3)

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

  2136.             INST_RETURN(2, 0xCB, 0xF4)

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

  2138.             INST_RETURN(2, 0xCB, 0xF5)

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

  2140.             INST_RETURN(2, 0xCB, 0xFF)

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

  2142.             INST_RETURN(2, 0xCB, 0xF8)

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

  2144.             INST_RETURN(2, 0xCB, 0xF9)

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

  2146.             INST_RETURN(2, 0xCB, 0xFA)

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

  2148.             INST_RETURN(2, 0xCB, 0xFB)

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

  2150.             INST_RETURN(2, 0xCB, 0xFC)

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

  2152.             INST_RETURN(2, 0xCB, 0xFD)

  2153.         INST_ERROR(ARG_VALUE)

  2154.     }

  2155.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDIRECT &&

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

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

  2158.             INST_RETURN(2, 0xCB, 0xC6)

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

  2160.             INST_RETURN(2, 0xCB, 0xCE)

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

  2162.             INST_RETURN(2, 0xCB, 0xD6)

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

  2164.             INST_RETURN(2, 0xCB, 0xDE)

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

  2166.             INST_RETURN(2, 0xCB, 0xE6)

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

  2168.             INST_RETURN(2, 0xCB, 0xEE)

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

  2170.             INST_RETURN(2, 0xCB, 0xF6)

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

  2172.             INST_RETURN(2, 0xCB, 0xFE)

  2173.         INST_ERROR(ARG_VALUE)

  2174.     }

  2175.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED) {

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

  2177.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC6)

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

  2179.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xCE)

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

  2181.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD6)

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

  2183.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xDE)

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

  2185.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE6)

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

  2187.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xEE)

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

  2189.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF6)

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

  2191.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xFE)

  2192.         INST_ERROR(ARG_VALUE)

  2193.     }

  2194.     if (INST_NARGS == 3 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED && INST_TYPE(2) == AT_REGISTER) {

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

  2196.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC7)

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

  2198.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC0)

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

  2200.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC1)

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

  2202.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC2)

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

  2204.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC3)

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

  2206.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC4)

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

  2208.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC5)

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

  2210.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xCF)

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

  2212.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC8)

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

  2214.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC9)

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

  2216.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xCA)

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

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

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

  2220.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xCC)

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

  2222.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xCD)

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

  2224.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD7)

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

  2226.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD0)

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

  2228.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD1)

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

  2230.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD2)

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

  2232.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD3)

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

  2234.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD4)

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

  2236.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD5)

  2237.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_A)

  2238.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xDF)

  2239.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_B)

  2240.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD8)

  2241.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_C)

  2242.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xD9)

  2243.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_D)

  2244.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xDA)

  2245.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_E)

  2246.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xDB)

  2247.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_H)

  2248.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xDC)

  2249.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 3) && INST_REG(2) == REG_L)

  2250.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xDD)

  2251.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_A)

  2252.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE7)

  2253.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_B)

  2254.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE0)

  2255.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_C)

  2256.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE1)

  2257.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_D)

  2258.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE2)

  2259.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_E)

  2260.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE3)

  2261.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_H)

  2262.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE4)

  2263.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 4) && INST_REG(2) == REG_L)

  2264.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE5)

  2265.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_A)

  2266.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xEF)

  2267.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_B)

  2268.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE8)

  2269.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_C)

  2270.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xE9)

  2271.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_D)

  2272.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xEA)

  2273.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_E)

  2274.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xEB)

  2275.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_H)

  2276.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xEC)

  2277.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 5) && INST_REG(2) == REG_L)

  2278.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xED)

  2279.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_A)

  2280.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF7)

  2281.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_B)

  2282.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF0)

  2283.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_C)

  2284.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF1)

  2285.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_D)

  2286.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF2)

  2287.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_E)

  2288.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF3)

  2289.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_H)

  2290.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF4)

  2291.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 6) && INST_REG(2) == REG_L)

  2292.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF5)

  2293.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_A)

  2294.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xFF)

  2295.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_B)

  2296.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF8)

  2297.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_C)

  2298.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xF9)

  2299.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_D)

  2300.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xFA)

  2301.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_E)

  2302.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xFB)

  2303.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_H)

  2304.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xFC)

  2305.         if ((INST_IMM(0).mask & IMM_BIT && INST_IMM(0).uval == 7) && INST_REG(2) == REG_L)

  2306.             INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xFD)

  2307.         INST_ERROR(ARG_VALUE)

  2308.     }

  2309.     INST_ERROR(ARG_TYPE)

  2310. }

  2311. 

  2312. INST_FUNC(sl1)

  2313. {

  2314.     INST_TAKES_ARGS(

  2315.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2316.         AT_OPTIONAL|AT_REGISTER,

  2317.         AT_NONE

  2318.     )

  2319.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  2321.             INST_RETURN(2, 0xCB, 0x37)

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

  2323.             INST_RETURN(2, 0xCB, 0x30)

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

  2325.             INST_RETURN(2, 0xCB, 0x31)

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

  2327.             INST_RETURN(2, 0xCB, 0x32)

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

  2329.             INST_RETURN(2, 0xCB, 0x33)

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

  2331.             INST_RETURN(2, 0xCB, 0x34)

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

  2333.             INST_RETURN(2, 0xCB, 0x35)

  2334.         INST_ERROR(ARG_VALUE)

  2335.     }

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

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

  2338.         INST_RETURN(2, 0xCB, 0x36)

  2339.     }

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

  2341.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x36)

  2342.     }

  2343.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  2345.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x37)

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

  2347.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x30)

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

  2349.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x31)

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

  2351.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x32)

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

  2353.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x33)

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

  2355.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x34)

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

  2357.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x35)

  2358.         INST_ERROR(ARG_VALUE)

  2359.     }

  2360.     INST_ERROR(ARG_TYPE)

  2361. }

  2362. 

  2363. INST_FUNC(sla)

  2364. {

  2365.     INST_TAKES_ARGS(

  2366.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2367.         AT_OPTIONAL|AT_REGISTER,

  2368.         AT_NONE

  2369.     )

  2370.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  2372.             INST_RETURN(2, 0xCB, 0x27)

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

  2374.             INST_RETURN(2, 0xCB, 0x20)

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

  2376.             INST_RETURN(2, 0xCB, 0x21)

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

  2378.             INST_RETURN(2, 0xCB, 0x22)

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

  2380.             INST_RETURN(2, 0xCB, 0x23)

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

  2382.             INST_RETURN(2, 0xCB, 0x24)

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

  2384.             INST_RETURN(2, 0xCB, 0x25)

  2385.         INST_ERROR(ARG_VALUE)

  2386.     }

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

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

  2389.         INST_RETURN(2, 0xCB, 0x26)

  2390.     }

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

  2392.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x26)

  2393.     }

  2394.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  2396.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x27)

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

  2398.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x20)

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

  2400.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x21)

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

  2402.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x22)

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

  2404.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x23)

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

  2406.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x24)

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

  2408.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x25)

  2409.         INST_ERROR(ARG_VALUE)

  2410.     }

  2411.     INST_ERROR(ARG_TYPE)

  2412. }

  2413. 

  2414. INST_FUNC(sll)

  2415. {

  2416.     INST_TAKES_ARGS(

  2417.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2418.         AT_OPTIONAL|AT_REGISTER,

  2419.         AT_NONE

  2420.     )

  2421.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  2423.             INST_RETURN(2, 0xCB, 0x37)

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

  2425.             INST_RETURN(2, 0xCB, 0x30)

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

  2427.             INST_RETURN(2, 0xCB, 0x31)

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

  2429.             INST_RETURN(2, 0xCB, 0x32)

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

  2431.             INST_RETURN(2, 0xCB, 0x33)

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

  2433.             INST_RETURN(2, 0xCB, 0x34)

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

  2435.             INST_RETURN(2, 0xCB, 0x35)

  2436.         INST_ERROR(ARG_VALUE)

  2437.     }

  2438.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT) {

  2439.         INST_RETURN(2, 0xCB, 0x36)

  2440.     }

  2441.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  2443.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x37)

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

  2445.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x30)

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

  2447.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x31)

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

  2449.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x32)

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

  2451.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x33)

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

  2453.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x34)

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

  2455.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x35)

  2456.         INST_ERROR(ARG_VALUE)

  2457.     }

  2458.     INST_ERROR(ARG_TYPE)

  2459. }

  2460. 

  2461. INST_FUNC(sls)

  2462. {

  2463.     INST_TAKES_ARGS(

  2464.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2465.         AT_OPTIONAL|AT_REGISTER,

  2466.         AT_NONE

  2467.     )

  2468.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  2470.             INST_RETURN(2, 0xCB, 0x37)

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

  2472.             INST_RETURN(2, 0xCB, 0x30)

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

  2474.             INST_RETURN(2, 0xCB, 0x31)

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

  2476.             INST_RETURN(2, 0xCB, 0x32)

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

  2478.             INST_RETURN(2, 0xCB, 0x33)

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

  2480.             INST_RETURN(2, 0xCB, 0x34)

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

  2482.             INST_RETURN(2, 0xCB, 0x35)

  2483.         INST_ERROR(ARG_VALUE)

  2484.     }

  2485.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT) {

  2486.         INST_RETURN(2, 0xCB, 0x36)

  2487.     }

  2488.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  2490.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x37)

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

  2492.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x30)

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

  2494.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x31)

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

  2496.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x32)

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

  2498.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x33)

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

  2500.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x34)

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

  2502.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x35)

  2503.         INST_ERROR(ARG_VALUE)

  2504.     }

  2505.     INST_ERROR(ARG_TYPE)

  2506. }

  2507. 

  2508. INST_FUNC(sra)

  2509. {

  2510.     INST_TAKES_ARGS(

  2511.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2512.         AT_OPTIONAL|AT_REGISTER,

  2513.         AT_NONE

  2514.     )

  2515.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  2517.             INST_RETURN(2, 0xCB, 0x2F)

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

  2519.             INST_RETURN(2, 0xCB, 0x28)

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

  2521.             INST_RETURN(2, 0xCB, 0x29)

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

  2523.             INST_RETURN(2, 0xCB, 0x2A)

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

  2525.             INST_RETURN(2, 0xCB, 0x2B)

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

  2527.             INST_RETURN(2, 0xCB, 0x2C)

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

  2529.             INST_RETURN(2, 0xCB, 0x2D)

  2530.         INST_ERROR(ARG_VALUE)

  2531.     }

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

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

  2534.         INST_RETURN(2, 0xCB, 0x2E)

  2535.     }

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

  2537.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2E)

  2538.     }

  2539.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  2541.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2F)

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

  2543.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x28)

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

  2545.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x29)

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

  2547.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2A)

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

  2549.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2B)

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

  2551.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2C)

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

  2553.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2D)

  2554.         INST_ERROR(ARG_VALUE)

  2555.     }

  2556.     INST_ERROR(ARG_TYPE)

  2557. }

  2558. 

  2559. INST_FUNC(srl)

  2560. {

  2561.     INST_TAKES_ARGS(

  2562.         AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2563.         AT_OPTIONAL|AT_REGISTER,

  2564.         AT_NONE

  2565.     )

  2566.     if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {

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

  2568.             INST_RETURN(2, 0xCB, 0x3F)

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

  2570.             INST_RETURN(2, 0xCB, 0x38)

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

  2572.             INST_RETURN(2, 0xCB, 0x39)

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

  2574.             INST_RETURN(2, 0xCB, 0x3A)

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

  2576.             INST_RETURN(2, 0xCB, 0x3B)

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

  2578.             INST_RETURN(2, 0xCB, 0x3C)

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

  2580.             INST_RETURN(2, 0xCB, 0x3D)

  2581.         INST_ERROR(ARG_VALUE)

  2582.     }

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

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

  2585.         INST_RETURN(2, 0xCB, 0x3E)

  2586.     }

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

  2588.         INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3E)

  2589.     }

  2590.     if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {

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

  2592.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3F)

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

  2594.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x38)

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

  2596.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x39)

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

  2598.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3A)

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

  2600.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3B)

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

  2602.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3C)

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

  2604.             INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3D)

  2605.         INST_ERROR(ARG_VALUE)

  2606.     }

  2607.     INST_ERROR(ARG_TYPE)

  2608. }

  2609. 

  2610. INST_FUNC(sub)

  2611. {

  2612.     INST_TAKES_ARGS(

  2613.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2614.         AT_NONE,

  2615.         AT_NONE

  2616.     )

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

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

  2619.             INST_RETURN(1, 0x97)

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

  2621.             INST_RETURN(1, 0x90)

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

  2623.             INST_RETURN(1, 0x91)

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

  2625.             INST_RETURN(1, 0x92)

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

  2627.             INST_RETURN(1, 0x93)

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

  2629.             INST_RETURN(1, 0x94)

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

  2631.             INST_RETURN(2, INST_IX_PREFIX, 0x94)

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

  2633.             INST_RETURN(2, INST_IY_PREFIX, 0x94)

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

  2635.             INST_RETURN(1, 0x95)

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

  2637.             INST_RETURN(2, INST_IX_PREFIX, 0x95)

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

  2639.             INST_RETURN(2, INST_IY_PREFIX, 0x95)

  2640.         INST_ERROR(ARG_VALUE)

  2641.     }

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

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

  2644.             INST_RETURN(2, 0xD6, INST_IMM(0).uval)

  2645.         INST_ERROR(ARG_VALUE)

  2646.     }

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

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

  2649.         INST_RETURN(1, 0x96)

  2650.     }

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

  2652.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0x96, INST_INDEX(0).offset)

  2653.     }

  2654.     INST_ERROR(ARG_TYPE)

  2655. }

  2656. 

  2657. INST_FUNC(xor)

  2658. {

  2659.     INST_TAKES_ARGS(

  2660.         AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,

  2661.         AT_NONE,

  2662.         AT_NONE

  2663.     )

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

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

  2666.             INST_RETURN(1, 0xAF)

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

  2668.             INST_RETURN(1, 0xA8)

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

  2670.             INST_RETURN(1, 0xA9)

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

  2672.             INST_RETURN(1, 0xAA)

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

  2674.             INST_RETURN(1, 0xAB)

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

  2676.             INST_RETURN(1, 0xAC)

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

  2678.             INST_RETURN(2, INST_IX_PREFIX, 0xAC)

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

  2680.             INST_RETURN(2, INST_IY_PREFIX, 0xAC)

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

  2682.             INST_RETURN(1, 0xAD)

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

  2684.             INST_RETURN(2, INST_IX_PREFIX, 0xAD)

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

  2686.             INST_RETURN(2, INST_IY_PREFIX, 0xAD)

  2687.         INST_ERROR(ARG_VALUE)

  2688.     }

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

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

  2691.             INST_RETURN(2, 0xEE, INST_IMM(0).uval)

  2692.         INST_ERROR(ARG_VALUE)

  2693.     }

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

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

  2696.         INST_RETURN(1, 0xAE)

  2697.     }

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

  2699.         INST_RETURN(3, INST_INDEX_PREFIX(0), 0xAE, INST_INDEX(0).offset)

  2700.     }

  2701.     INST_ERROR(ARG_TYPE)

  2702. }

  2703. 

  2704. /* @AUTOGEN_INST_BLOCK_END */

  2705. 

  2706. /*

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

  2708. */

  2709. static ASMInstParser lookup_parser(uint32_t key)

  2710. {

  2711. /* @AUTOGEN_LOOKUP_BLOCK_START */

  2712.     HANDLE(adc)

  2713.     HANDLE(add)

  2714.     HANDLE(and)

  2715.     HANDLE(bit)

  2716.     HANDLE(call)

  2717.     HANDLE(ccf)

  2718.     HANDLE(cp)

  2719.     HANDLE(cpd)

  2720.     HANDLE(cpdr)

  2721.     HANDLE(cpi)

  2722.     HANDLE(cpir)

  2723.     HANDLE(cpl)

  2724.     HANDLE(daa)

  2725.     HANDLE(dec)

  2726.     HANDLE(di)

  2727.     HANDLE(djnz)

  2728.     HANDLE(ei)

  2729.     HANDLE(ex)

  2730.     HANDLE(exx)

  2731.     HANDLE(halt)

  2732.     HANDLE(im)

  2733.     HANDLE(in)

  2734.     HANDLE(inc)

  2735.     HANDLE(ind)

  2736.     HANDLE(indr)

  2737.     HANDLE(ini)

  2738.     HANDLE(inir)

  2739.     HANDLE(jp)

  2740.     HANDLE(jr)

  2741.     HANDLE(ld)

  2742.     HANDLE(ldd)

  2743.     HANDLE(lddr)

  2744.     HANDLE(ldi)

  2745.     HANDLE(ldir)

  2746.     HANDLE(neg)

  2747.     HANDLE(nop)

  2748.     HANDLE(or)

  2749.     HANDLE(otdr)

  2750.     HANDLE(otir)

  2751.     HANDLE(out)

  2752.     HANDLE(outd)

  2753.     HANDLE(outi)

  2754.     HANDLE(pop)

  2755.     HANDLE(push)

  2756.     HANDLE(res)

  2757.     HANDLE(ret)

  2758.     HANDLE(reti)

  2759.     HANDLE(retn)

  2760.     HANDLE(rl)

  2761.     HANDLE(rla)

  2762.     HANDLE(rlc)

  2763.     HANDLE(rlca)

  2764.     HANDLE(rld)

  2765.     HANDLE(rr)

  2766.     HANDLE(rra)

  2767.     HANDLE(rrc)

  2768.     HANDLE(rrca)

  2769.     HANDLE(rrd)

  2770.     HANDLE(rst)

  2771.     HANDLE(sbc)

  2772.     HANDLE(scf)

  2773.     HANDLE(set)

  2774.     HANDLE(sl1)

  2775.     HANDLE(sla)

  2776.     HANDLE(sll)

  2777.     HANDLE(sls)

  2778.     HANDLE(sra)

  2779.     HANDLE(srl)

  2780.     HANDLE(sub)

  2781.     HANDLE(xor)

  2782. /* @AUTOGEN_LOOKUP_BLOCK_END */

  2783.     return NULL;

  2784. }