An emulator, assembler, and disassembler for the Sega Game Gear
Nevar pievienot vairāk kā 25 tēmas Tēmai ir jāsākas ar burtu vai ciparu, tā var saturēt domu zīmes ('-') un var būt līdz 35 simboliem gara.

instructions.inc.c 82 KiB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194
  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. This file is AUTO-GENERATED from 'instructions.yml'.
  5. `make` should trigger a rebuild when it is modified; if not, use:
  6. `python scripts/update_asm_instructions.py`.
  7. @AUTOGEN_DATE Fri Apr 29 03:32:10 2016 UTC
  8. */
  9. /* @AUTOGEN_INST_BLOCK_START */
  10. INST_FUNC(adc)
  11. {
  12. INST_TAKES_ARGS(
  13. AT_REGISTER,
  14. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  15. AT_NONE
  16. )
  17. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {
  18. if (INST_REG(0) == REG_A && INST_REG(1) == REG_A)
  19. INST_RETURN(1, 0x8F)
  20. if (INST_REG(0) == REG_A && INST_REG(1) == REG_B)
  21. INST_RETURN(1, 0x88)
  22. if (INST_REG(0) == REG_A && INST_REG(1) == REG_C)
  23. INST_RETURN(1, 0x89)
  24. if (INST_REG(0) == REG_A && INST_REG(1) == REG_D)
  25. INST_RETURN(1, 0x8A)
  26. if (INST_REG(0) == REG_A && INST_REG(1) == REG_E)
  27. INST_RETURN(1, 0x8B)
  28. if (INST_REG(0) == REG_A && INST_REG(1) == REG_H)
  29. INST_RETURN(1, 0x8C)
  30. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXH)
  31. INST_RETURN(2, INST_IX_PREFIX, 0x8C)
  32. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYH)
  33. INST_RETURN(2, INST_IY_PREFIX, 0x8C)
  34. if (INST_REG(0) == REG_A && INST_REG(1) == REG_L)
  35. INST_RETURN(1, 0x8D)
  36. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXL)
  37. INST_RETURN(2, INST_IX_PREFIX, 0x8D)
  38. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYL)
  39. INST_RETURN(2, INST_IY_PREFIX, 0x8D)
  40. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_BC)
  41. INST_RETURN(2, 0xED, 0x4A)
  42. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_DE)
  43. INST_RETURN(2, 0xED, 0x5A)
  44. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_HL)
  45. INST_RETURN(2, 0xED, 0x6A)
  46. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_SP)
  47. INST_RETURN(2, 0xED, 0x7A)
  48. INST_ERROR(ARG_VALUE)
  49. }
  50. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_IMMEDIATE) {
  51. if (INST_REG(0) == REG_A && INST_IMM(1).mask & IMM_U8)
  52. INST_RETURN(2, 0xCE, INST_IMM(1).uval)
  53. INST_ERROR(ARG_VALUE)
  54. }
  55. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT &&
  56. (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {
  57. if (INST_REG(0) == REG_A)
  58. INST_RETURN(1, 0x8E)
  59. INST_ERROR(ARG_VALUE)
  60. }
  61. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDEXED) {
  62. if (INST_REG(0) == REG_A)
  63. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x8E, INST_INDEX(1).offset)
  64. INST_ERROR(ARG_VALUE)
  65. }
  66. INST_ERROR(ARG_TYPE)
  67. }
  68. INST_FUNC(add)
  69. {
  70. INST_TAKES_ARGS(
  71. AT_REGISTER,
  72. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  73. AT_NONE
  74. )
  75. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {
  76. if (INST_REG(0) == REG_A && INST_REG(1) == REG_A)
  77. INST_RETURN(1, 0x87)
  78. if (INST_REG(0) == REG_A && INST_REG(1) == REG_B)
  79. INST_RETURN(1, 0x80)
  80. if (INST_REG(0) == REG_A && INST_REG(1) == REG_C)
  81. INST_RETURN(1, 0x81)
  82. if (INST_REG(0) == REG_A && INST_REG(1) == REG_D)
  83. INST_RETURN(1, 0x82)
  84. if (INST_REG(0) == REG_A && INST_REG(1) == REG_E)
  85. INST_RETURN(1, 0x83)
  86. if (INST_REG(0) == REG_A && INST_REG(1) == REG_H)
  87. INST_RETURN(1, 0x84)
  88. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXH)
  89. INST_RETURN(2, INST_IX_PREFIX, 0x84)
  90. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYH)
  91. INST_RETURN(2, INST_IY_PREFIX, 0x84)
  92. if (INST_REG(0) == REG_A && INST_REG(1) == REG_L)
  93. INST_RETURN(1, 0x85)
  94. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXL)
  95. INST_RETURN(2, INST_IX_PREFIX, 0x85)
  96. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYL)
  97. INST_RETURN(2, INST_IY_PREFIX, 0x85)
  98. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_BC)
  99. INST_RETURN(1, 0x09)
  100. if (INST_REG(0) == REG_IX && INST_REG(1) == REG_BC)
  101. INST_RETURN(2, INST_IX_PREFIX, 0x09)
  102. if (INST_REG(0) == REG_IY && INST_REG(1) == REG_BC)
  103. INST_RETURN(2, INST_IY_PREFIX, 0x09)
  104. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_DE)
  105. INST_RETURN(1, 0x19)
  106. if (INST_REG(0) == REG_IX && INST_REG(1) == REG_DE)
  107. INST_RETURN(2, INST_IX_PREFIX, 0x19)
  108. if (INST_REG(0) == REG_IY && INST_REG(1) == REG_DE)
  109. INST_RETURN(2, INST_IY_PREFIX, 0x19)
  110. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_HL)
  111. INST_RETURN(1, 0x29)
  112. if (INST_REG(0) == REG_IX && INST_REG(1) == REG_IX)
  113. INST_RETURN(2, INST_IX_PREFIX, 0x29)
  114. if (INST_REG(0) == REG_IY && INST_REG(1) == REG_IY)
  115. INST_RETURN(2, INST_IY_PREFIX, 0x29)
  116. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_SP)
  117. INST_RETURN(1, 0x39)
  118. if (INST_REG(0) == REG_IX && INST_REG(1) == REG_SP)
  119. INST_RETURN(2, INST_IX_PREFIX, 0x39)
  120. if (INST_REG(0) == REG_IY && INST_REG(1) == REG_SP)
  121. INST_RETURN(2, INST_IY_PREFIX, 0x39)
  122. INST_ERROR(ARG_VALUE)
  123. }
  124. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_IMMEDIATE) {
  125. if (INST_REG(0) == REG_A && INST_IMM(1).mask & IMM_U8)
  126. INST_RETURN(2, 0xC6, INST_IMM(1).uval)
  127. INST_ERROR(ARG_VALUE)
  128. }
  129. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT &&
  130. (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {
  131. if (INST_REG(0) == REG_A)
  132. INST_RETURN(1, 0x86)
  133. INST_ERROR(ARG_VALUE)
  134. }
  135. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDEXED) {
  136. if (INST_REG(0) == REG_A)
  137. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x86, INST_INDEX(1).offset)
  138. INST_ERROR(ARG_VALUE)
  139. }
  140. INST_ERROR(ARG_TYPE)
  141. }
  142. INST_FUNC(and)
  143. {
  144. INST_TAKES_ARGS(
  145. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  146. AT_NONE,
  147. AT_NONE
  148. )
  149. if (INST_TYPE(0) == AT_REGISTER) {
  150. if (INST_REG(0) == REG_A)
  151. INST_RETURN(1, 0xA7)
  152. if (INST_REG(0) == REG_B)
  153. INST_RETURN(1, 0xA0)
  154. if (INST_REG(0) == REG_C)
  155. INST_RETURN(1, 0xA1)
  156. if (INST_REG(0) == REG_D)
  157. INST_RETURN(1, 0xA2)
  158. if (INST_REG(0) == REG_E)
  159. INST_RETURN(1, 0xA3)
  160. if (INST_REG(0) == REG_H)
  161. INST_RETURN(1, 0xA4)
  162. if (INST_REG(0) == REG_IXH)
  163. INST_RETURN(2, INST_IX_PREFIX, 0xA4)
  164. if (INST_REG(0) == REG_IYH)
  165. INST_RETURN(2, INST_IY_PREFIX, 0xA4)
  166. if (INST_REG(0) == REG_L)
  167. INST_RETURN(1, 0xA5)
  168. if (INST_REG(0) == REG_IXL)
  169. INST_RETURN(2, INST_IX_PREFIX, 0xA5)
  170. if (INST_REG(0) == REG_IYL)
  171. INST_RETURN(2, INST_IY_PREFIX, 0xA5)
  172. INST_ERROR(ARG_VALUE)
  173. }
  174. if (INST_TYPE(0) == AT_IMMEDIATE) {
  175. if (INST_IMM(0).mask & IMM_U8)
  176. INST_RETURN(2, 0xE6, INST_IMM(0).uval)
  177. INST_ERROR(ARG_VALUE)
  178. }
  179. if (INST_TYPE(0) == AT_INDIRECT &&
  180. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  181. INST_RETURN(1, 0xA6)
  182. }
  183. if (INST_TYPE(0) == AT_INDEXED) {
  184. INST_RETURN(3, INST_INDEX_PREFIX(0), 0xA6, INST_INDEX(0).offset)
  185. }
  186. INST_ERROR(ARG_TYPE)
  187. }
  188. INST_FUNC(bit)
  189. {
  190. INST_TAKES_ARGS(
  191. AT_IMMEDIATE,
  192. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  193. AT_NONE
  194. )
  195. if (INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_REGISTER) {
  196. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_A)
  197. INST_RETURN(2, 0xCB, 0x47 + 8 * INST_IMM(0).uval)
  198. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_B)
  199. INST_RETURN(2, 0xCB, 0x40 + 8 * INST_IMM(0).uval)
  200. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_C)
  201. INST_RETURN(2, 0xCB, 0x41 + 8 * INST_IMM(0).uval)
  202. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_D)
  203. INST_RETURN(2, 0xCB, 0x42 + 8 * INST_IMM(0).uval)
  204. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_E)
  205. INST_RETURN(2, 0xCB, 0x43 + 8 * INST_IMM(0).uval)
  206. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_H)
  207. INST_RETURN(2, 0xCB, 0x44 + 8 * INST_IMM(0).uval)
  208. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_L)
  209. INST_RETURN(2, 0xCB, 0x45 + 8 * INST_IMM(0).uval)
  210. INST_ERROR(ARG_VALUE)
  211. }
  212. if (INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDIRECT &&
  213. (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {
  214. if (INST_IMM(0).mask & IMM_BIT)
  215. INST_RETURN(2, 0xCB, 0x46 + 8 * INST_IMM(0).uval)
  216. INST_ERROR(ARG_VALUE)
  217. }
  218. if (INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED) {
  219. if (INST_IMM(0).mask & IMM_BIT)
  220. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x46 + 8 * INST_IMM(0).uval)
  221. INST_ERROR(ARG_VALUE)
  222. }
  223. INST_ERROR(ARG_TYPE)
  224. }
  225. INST_FUNC(call)
  226. {
  227. INST_TAKES_ARGS(
  228. AT_CONDITION|AT_IMMEDIATE,
  229. AT_IMMEDIATE|AT_OPTIONAL,
  230. AT_NONE
  231. )
  232. if (INST_NARGS == 1 && INST_TYPE(0) == AT_IMMEDIATE) {
  233. if (INST_IMM(0).mask & IMM_U16)
  234. INST_RETURN(3, 0xCD, INST_IMM_U16_B1(INST_IMM(0)), INST_IMM_U16_B2(INST_IMM(0)))
  235. INST_ERROR(ARG_VALUE)
  236. }
  237. if (INST_NARGS == 2 && INST_TYPE(0) == AT_CONDITION && INST_TYPE(1) == AT_IMMEDIATE) {
  238. if (INST_COND(0) == COND_NZ && INST_IMM(1).mask & IMM_U16)
  239. INST_RETURN(3, 0xC4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  240. if (INST_COND(0) == COND_Z && INST_IMM(1).mask & IMM_U16)
  241. INST_RETURN(3, 0xCC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  242. if (INST_COND(0) == COND_NC && INST_IMM(1).mask & IMM_U16)
  243. INST_RETURN(3, 0xD4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  244. if (INST_COND(0) == COND_C && INST_IMM(1).mask & IMM_U16)
  245. INST_RETURN(3, 0xDC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  246. if (INST_COND(0) == COND_PO && INST_IMM(1).mask & IMM_U16)
  247. INST_RETURN(3, 0xE4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  248. if (INST_COND(0) == COND_PE && INST_IMM(1).mask & IMM_U16)
  249. INST_RETURN(3, 0xEC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  250. if (INST_COND(0) == COND_P && INST_IMM(1).mask & IMM_U16)
  251. INST_RETURN(3, 0xF4, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  252. if (INST_COND(0) == COND_M && INST_IMM(1).mask & IMM_U16)
  253. INST_RETURN(3, 0xFC, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  254. INST_ERROR(ARG_VALUE)
  255. }
  256. INST_ERROR(ARG_TYPE)
  257. }
  258. INST_FUNC(ccf)
  259. {
  260. INST_TAKES_NO_ARGS
  261. INST_RETURN(1, 0x3F)
  262. }
  263. INST_FUNC(cp)
  264. {
  265. INST_TAKES_ARGS(
  266. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  267. AT_NONE,
  268. AT_NONE
  269. )
  270. if (INST_TYPE(0) == AT_REGISTER) {
  271. if (INST_REG(0) == REG_A)
  272. INST_RETURN(1, 0xBF)
  273. if (INST_REG(0) == REG_B)
  274. INST_RETURN(1, 0xB8)
  275. if (INST_REG(0) == REG_C)
  276. INST_RETURN(1, 0xB9)
  277. if (INST_REG(0) == REG_D)
  278. INST_RETURN(1, 0xBA)
  279. if (INST_REG(0) == REG_E)
  280. INST_RETURN(1, 0xBB)
  281. if (INST_REG(0) == REG_H)
  282. INST_RETURN(1, 0xBC)
  283. if (INST_REG(0) == REG_IXH)
  284. INST_RETURN(2, INST_IX_PREFIX, 0xBC)
  285. if (INST_REG(0) == REG_IYH)
  286. INST_RETURN(2, INST_IY_PREFIX, 0xBC)
  287. if (INST_REG(0) == REG_L)
  288. INST_RETURN(1, 0xBD)
  289. if (INST_REG(0) == REG_IXL)
  290. INST_RETURN(2, INST_IX_PREFIX, 0xBD)
  291. if (INST_REG(0) == REG_IYL)
  292. INST_RETURN(2, INST_IY_PREFIX, 0xBD)
  293. INST_ERROR(ARG_VALUE)
  294. }
  295. if (INST_TYPE(0) == AT_INDIRECT &&
  296. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  297. INST_RETURN(1, 0xBE)
  298. }
  299. if (INST_TYPE(0) == AT_INDEXED) {
  300. INST_RETURN(3, INST_INDEX_PREFIX(0), 0xBE, INST_INDEX(0).offset)
  301. }
  302. if (INST_TYPE(0) == AT_IMMEDIATE) {
  303. if (INST_IMM(0).mask & IMM_U8)
  304. INST_RETURN(2, 0xFE, INST_IMM(0).uval)
  305. INST_ERROR(ARG_VALUE)
  306. }
  307. INST_ERROR(ARG_TYPE)
  308. }
  309. INST_FUNC(cpd)
  310. {
  311. INST_TAKES_NO_ARGS
  312. INST_RETURN(2, 0xED, 0xA9)
  313. }
  314. INST_FUNC(cpdr)
  315. {
  316. INST_TAKES_NO_ARGS
  317. INST_RETURN(2, 0xED, 0xB9)
  318. }
  319. INST_FUNC(cpi)
  320. {
  321. INST_TAKES_NO_ARGS
  322. INST_RETURN(2, 0xED, 0xA1)
  323. }
  324. INST_FUNC(cpir)
  325. {
  326. INST_TAKES_NO_ARGS
  327. INST_RETURN(2, 0xED, 0xB1)
  328. }
  329. INST_FUNC(cpl)
  330. {
  331. INST_TAKES_NO_ARGS
  332. INST_RETURN(1, 0x2F)
  333. }
  334. INST_FUNC(daa)
  335. {
  336. INST_TAKES_NO_ARGS
  337. INST_RETURN(1, 0x27)
  338. }
  339. INST_FUNC(dec)
  340. {
  341. INST_TAKES_ARGS(
  342. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  343. AT_NONE,
  344. AT_NONE
  345. )
  346. if (INST_TYPE(0) == AT_REGISTER) {
  347. if (INST_REG(0) == REG_A)
  348. INST_RETURN(1, 0x3D)
  349. if (INST_REG(0) == REG_B)
  350. INST_RETURN(1, 0x05)
  351. if (INST_REG(0) == REG_C)
  352. INST_RETURN(1, 0x0D)
  353. if (INST_REG(0) == REG_D)
  354. INST_RETURN(1, 0x15)
  355. if (INST_REG(0) == REG_E)
  356. INST_RETURN(1, 0x1D)
  357. if (INST_REG(0) == REG_H)
  358. INST_RETURN(1, 0x25)
  359. if (INST_REG(0) == REG_IXH)
  360. INST_RETURN(2, INST_IX_PREFIX, 0x25)
  361. if (INST_REG(0) == REG_IYH)
  362. INST_RETURN(2, INST_IY_PREFIX, 0x25)
  363. if (INST_REG(0) == REG_L)
  364. INST_RETURN(1, 0x2D)
  365. if (INST_REG(0) == REG_IXL)
  366. INST_RETURN(2, INST_IX_PREFIX, 0x2D)
  367. if (INST_REG(0) == REG_IYL)
  368. INST_RETURN(2, INST_IY_PREFIX, 0x2D)
  369. if (INST_REG(0) == REG_BC)
  370. INST_RETURN(1, 0x0B)
  371. if (INST_REG(0) == REG_DE)
  372. INST_RETURN(1, 0x1B)
  373. if (INST_REG(0) == REG_HL)
  374. INST_RETURN(1, 0x2B)
  375. if (INST_REG(0) == REG_IX)
  376. INST_RETURN(2, INST_IX_PREFIX, 0x2B)
  377. if (INST_REG(0) == REG_IY)
  378. INST_RETURN(2, INST_IY_PREFIX, 0x2B)
  379. if (INST_REG(0) == REG_SP)
  380. INST_RETURN(1, 0x3B)
  381. INST_ERROR(ARG_VALUE)
  382. }
  383. if (INST_TYPE(0) == AT_INDIRECT &&
  384. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  385. INST_RETURN(1, 0x35)
  386. }
  387. if (INST_TYPE(0) == AT_INDEXED) {
  388. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x35, INST_INDEX(0).offset)
  389. }
  390. INST_ERROR(ARG_TYPE)
  391. }
  392. INST_FUNC(di)
  393. {
  394. INST_TAKES_NO_ARGS
  395. INST_RETURN(1, 0xF3)
  396. }
  397. INST_FUNC(djnz)
  398. {
  399. INST_TAKES_ARGS(
  400. AT_IMMEDIATE,
  401. AT_NONE,
  402. AT_NONE
  403. )
  404. if (INST_TYPE(0) == AT_IMMEDIATE) {
  405. if (INST_IMM(0).mask & IMM_REL)
  406. INST_RETURN(2, 0x10, INST_IMM(0).sval - 2)
  407. INST_ERROR(ARG_VALUE)
  408. }
  409. INST_ERROR(ARG_TYPE)
  410. }
  411. INST_FUNC(ei)
  412. {
  413. INST_TAKES_NO_ARGS
  414. INST_RETURN(1, 0xFB)
  415. }
  416. INST_FUNC(ex)
  417. {
  418. INST_TAKES_ARGS(
  419. AT_INDIRECT|AT_REGISTER,
  420. AT_REGISTER,
  421. AT_NONE
  422. )
  423. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {
  424. if (INST_REG(0) == REG_AF && INST_REG(1) == REG_AF_)
  425. INST_RETURN(1, 0x08)
  426. if (INST_REG(0) == REG_DE && INST_REG(1) == REG_HL)
  427. INST_RETURN(1, 0xEB)
  428. INST_ERROR(ARG_VALUE)
  429. }
  430. if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_REGISTER) {
  431. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_SP) && INST_REG(1) == REG_HL)
  432. INST_RETURN(1, 0xE3)
  433. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_SP) && INST_REG(1) == REG_IX)
  434. INST_RETURN(2, INST_IX_PREFIX, 0xE3)
  435. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_SP) && INST_REG(1) == REG_IY)
  436. INST_RETURN(2, INST_IY_PREFIX, 0xE3)
  437. INST_ERROR(ARG_VALUE)
  438. }
  439. INST_ERROR(ARG_TYPE)
  440. }
  441. INST_FUNC(exx)
  442. {
  443. INST_TAKES_NO_ARGS
  444. INST_RETURN(1, 0xD9)
  445. }
  446. INST_FUNC(halt)
  447. {
  448. INST_TAKES_NO_ARGS
  449. INST_RETURN(1, 0x76)
  450. }
  451. INST_FUNC(im)
  452. {
  453. INST_TAKES_ARGS(
  454. AT_IMMEDIATE,
  455. AT_NONE,
  456. AT_NONE
  457. )
  458. if (INST_TYPE(0) == AT_IMMEDIATE) {
  459. if ((INST_IMM(0).mask & IMM_IM && INST_IMM(0).uval == 0))
  460. INST_RETURN(2, 0xED, 0x46)
  461. if ((INST_IMM(0).mask & IMM_IM && INST_IMM(0).uval == 1))
  462. INST_RETURN(2, 0xED, 0x56)
  463. if ((INST_IMM(0).mask & IMM_IM && INST_IMM(0).uval == 2))
  464. INST_RETURN(2, 0xED, 0x5E)
  465. INST_ERROR(ARG_VALUE)
  466. }
  467. INST_ERROR(ARG_TYPE)
  468. }
  469. INST_FUNC(in)
  470. {
  471. INST_TAKES_ARGS(
  472. AT_PORT|AT_REGISTER,
  473. AT_OPTIONAL|AT_PORT,
  474. AT_NONE
  475. )
  476. if (INST_NARGS == 2 && INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_PORT) {
  477. if (INST_REG(0) == REG_A && INST_PORT(1).type == AT_IMMEDIATE)
  478. INST_RETURN(2, 0xDB, INST_PORT(1).port.imm.uval)
  479. if (INST_REG(0) == REG_A && INST_PORT(1).type == AT_REGISTER)
  480. INST_RETURN(2, 0xED, 0x78)
  481. if (INST_REG(0) == REG_B && INST_PORT(1).type == AT_REGISTER)
  482. INST_RETURN(2, 0xED, 0x40)
  483. if (INST_REG(0) == REG_C && INST_PORT(1).type == AT_REGISTER)
  484. INST_RETURN(2, 0xED, 0x48)
  485. if (INST_REG(0) == REG_D && INST_PORT(1).type == AT_REGISTER)
  486. INST_RETURN(2, 0xED, 0x50)
  487. if (INST_REG(0) == REG_E && INST_PORT(1).type == AT_REGISTER)
  488. INST_RETURN(2, 0xED, 0x58)
  489. if (INST_REG(0) == REG_H && INST_PORT(1).type == AT_REGISTER)
  490. INST_RETURN(2, 0xED, 0x60)
  491. if (INST_REG(0) == REG_L && INST_PORT(1).type == AT_REGISTER)
  492. INST_RETURN(2, 0xED, 0x68)
  493. INST_ERROR(ARG_VALUE)
  494. }
  495. if (INST_NARGS == 1 && INST_TYPE(0) == AT_PORT) {
  496. if (INST_PORT(0).type == AT_REGISTER)
  497. INST_RETURN(2, 0xED, 0x70)
  498. INST_ERROR(ARG_VALUE)
  499. }
  500. INST_ERROR(ARG_TYPE)
  501. }
  502. INST_FUNC(inc)
  503. {
  504. INST_TAKES_ARGS(
  505. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  506. AT_NONE,
  507. AT_NONE
  508. )
  509. if (INST_TYPE(0) == AT_REGISTER) {
  510. if (INST_REG(0) == REG_A)
  511. INST_RETURN(1, 0x3C)
  512. if (INST_REG(0) == REG_B)
  513. INST_RETURN(1, 0x04)
  514. if (INST_REG(0) == REG_C)
  515. INST_RETURN(1, 0x0C)
  516. if (INST_REG(0) == REG_D)
  517. INST_RETURN(1, 0x14)
  518. if (INST_REG(0) == REG_E)
  519. INST_RETURN(1, 0x1C)
  520. if (INST_REG(0) == REG_H)
  521. INST_RETURN(1, 0x24)
  522. if (INST_REG(0) == REG_IXH)
  523. INST_RETURN(2, INST_IX_PREFIX, 0x24)
  524. if (INST_REG(0) == REG_IYH)
  525. INST_RETURN(2, INST_IY_PREFIX, 0x24)
  526. if (INST_REG(0) == REG_L)
  527. INST_RETURN(1, 0x2C)
  528. if (INST_REG(0) == REG_IXL)
  529. INST_RETURN(2, INST_IX_PREFIX, 0x2C)
  530. if (INST_REG(0) == REG_IYL)
  531. INST_RETURN(2, INST_IY_PREFIX, 0x2C)
  532. if (INST_REG(0) == REG_BC)
  533. INST_RETURN(1, 0x03)
  534. if (INST_REG(0) == REG_DE)
  535. INST_RETURN(1, 0x13)
  536. if (INST_REG(0) == REG_HL)
  537. INST_RETURN(1, 0x23)
  538. if (INST_REG(0) == REG_IX)
  539. INST_RETURN(2, INST_IX_PREFIX, 0x23)
  540. if (INST_REG(0) == REG_IY)
  541. INST_RETURN(2, INST_IY_PREFIX, 0x23)
  542. if (INST_REG(0) == REG_SP)
  543. INST_RETURN(1, 0x33)
  544. INST_ERROR(ARG_VALUE)
  545. }
  546. if (INST_TYPE(0) == AT_INDIRECT &&
  547. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  548. INST_RETURN(1, 0x34)
  549. }
  550. if (INST_TYPE(0) == AT_INDEXED) {
  551. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x34, INST_INDEX(0).offset)
  552. }
  553. INST_ERROR(ARG_TYPE)
  554. }
  555. INST_FUNC(ind)
  556. {
  557. INST_TAKES_NO_ARGS
  558. INST_RETURN(2, 0xED, 0xAA)
  559. }
  560. INST_FUNC(indr)
  561. {
  562. INST_TAKES_NO_ARGS
  563. INST_RETURN(2, 0xED, 0xBA)
  564. }
  565. INST_FUNC(ini)
  566. {
  567. INST_TAKES_NO_ARGS
  568. INST_RETURN(2, 0xED, 0xA2)
  569. }
  570. INST_FUNC(inir)
  571. {
  572. INST_TAKES_NO_ARGS
  573. INST_RETURN(2, 0xED, 0xB2)
  574. }
  575. INST_FUNC(jp)
  576. {
  577. INST_TAKES_ARGS(
  578. AT_CONDITION|AT_IMMEDIATE|AT_INDIRECT,
  579. AT_IMMEDIATE|AT_OPTIONAL,
  580. AT_NONE
  581. )
  582. if (INST_NARGS == 1 && INST_TYPE(0) == AT_IMMEDIATE) {
  583. if (INST_IMM(0).mask & IMM_U16)
  584. INST_RETURN(3, 0xC3, INST_IMM_U16_B1(INST_IMM(0)), INST_IMM_U16_B2(INST_IMM(0)))
  585. INST_ERROR(ARG_VALUE)
  586. }
  587. if (INST_NARGS == 2 && INST_TYPE(0) == AT_CONDITION && INST_TYPE(1) == AT_IMMEDIATE) {
  588. if (INST_COND(0) == COND_NZ && INST_IMM(1).mask & IMM_U16)
  589. INST_RETURN(3, 0xC2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  590. if (INST_COND(0) == COND_Z && INST_IMM(1).mask & IMM_U16)
  591. INST_RETURN(3, 0xCA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  592. if (INST_COND(0) == COND_NC && INST_IMM(1).mask & IMM_U16)
  593. INST_RETURN(3, 0xD2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  594. if (INST_COND(0) == COND_C && INST_IMM(1).mask & IMM_U16)
  595. INST_RETURN(3, 0xDA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  596. if (INST_COND(0) == COND_PO && INST_IMM(1).mask & IMM_U16)
  597. INST_RETURN(3, 0xE2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  598. if (INST_COND(0) == COND_PE && INST_IMM(1).mask & IMM_U16)
  599. INST_RETURN(3, 0xEA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  600. if (INST_COND(0) == COND_P && INST_IMM(1).mask & IMM_U16)
  601. INST_RETURN(3, 0xF2, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  602. if (INST_COND(0) == COND_M && INST_IMM(1).mask & IMM_U16)
  603. INST_RETURN(3, 0xFA, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  604. INST_ERROR(ARG_VALUE)
  605. }
  606. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT) {
  607. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL))
  608. INST_RETURN(1, 0xE9)
  609. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_IX))
  610. INST_RETURN(2, INST_IX_PREFIX, 0xE9)
  611. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_IY))
  612. INST_RETURN(2, INST_IY_PREFIX, 0xE9)
  613. INST_ERROR(ARG_VALUE)
  614. }
  615. INST_ERROR(ARG_TYPE)
  616. }
  617. INST_FUNC(jr)
  618. {
  619. INST_TAKES_ARGS(
  620. AT_CONDITION|AT_IMMEDIATE,
  621. AT_IMMEDIATE|AT_OPTIONAL,
  622. AT_NONE
  623. )
  624. if (INST_NARGS == 1 && INST_TYPE(0) == AT_IMMEDIATE) {
  625. if (INST_IMM(0).mask & IMM_REL)
  626. INST_RETURN(2, 0x18, INST_IMM(0).sval - 2)
  627. INST_ERROR(ARG_VALUE)
  628. }
  629. if (INST_NARGS == 2 && INST_TYPE(0) == AT_CONDITION && INST_TYPE(1) == AT_IMMEDIATE) {
  630. if (INST_COND(0) == COND_NZ && INST_IMM(1).mask & IMM_REL)
  631. INST_RETURN(2, 0x20, INST_IMM(1).sval - 2)
  632. if (INST_COND(0) == COND_Z && INST_IMM(1).mask & IMM_REL)
  633. INST_RETURN(2, 0x28, INST_IMM(1).sval - 2)
  634. if (INST_COND(0) == COND_NC && INST_IMM(1).mask & IMM_REL)
  635. INST_RETURN(2, 0x30, INST_IMM(1).sval - 2)
  636. if (INST_COND(0) == COND_C && INST_IMM(1).mask & IMM_REL)
  637. INST_RETURN(2, 0x38, INST_IMM(1).sval - 2)
  638. INST_ERROR(ARG_VALUE)
  639. }
  640. INST_ERROR(ARG_TYPE)
  641. }
  642. INST_FUNC(ld)
  643. {
  644. INST_TAKES_ARGS(
  645. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  646. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  647. AT_NONE
  648. )
  649. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {
  650. if (INST_REG(0) == REG_A && INST_REG(1) == REG_A)
  651. INST_RETURN(1, 0x7F)
  652. if (INST_REG(0) == REG_A && INST_REG(1) == REG_B)
  653. INST_RETURN(1, 0x78)
  654. if (INST_REG(0) == REG_A && INST_REG(1) == REG_C)
  655. INST_RETURN(1, 0x79)
  656. if (INST_REG(0) == REG_A && INST_REG(1) == REG_D)
  657. INST_RETURN(1, 0x7A)
  658. if (INST_REG(0) == REG_A && INST_REG(1) == REG_E)
  659. INST_RETURN(1, 0x7B)
  660. if (INST_REG(0) == REG_A && INST_REG(1) == REG_H)
  661. INST_RETURN(1, 0x7C)
  662. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXH)
  663. INST_RETURN(2, INST_IX_PREFIX, 0x7C)
  664. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYH)
  665. INST_RETURN(2, INST_IY_PREFIX, 0x7C)
  666. if (INST_REG(0) == REG_A && INST_REG(1) == REG_L)
  667. INST_RETURN(1, 0x7D)
  668. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXL)
  669. INST_RETURN(2, INST_IX_PREFIX, 0x7D)
  670. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYL)
  671. INST_RETURN(2, INST_IY_PREFIX, 0x7D)
  672. if (INST_REG(0) == REG_B && INST_REG(1) == REG_A)
  673. INST_RETURN(1, 0x47)
  674. if (INST_REG(0) == REG_B && INST_REG(1) == REG_B)
  675. INST_RETURN(1, 0x40)
  676. if (INST_REG(0) == REG_B && INST_REG(1) == REG_C)
  677. INST_RETURN(1, 0x41)
  678. if (INST_REG(0) == REG_B && INST_REG(1) == REG_D)
  679. INST_RETURN(1, 0x42)
  680. if (INST_REG(0) == REG_B && INST_REG(1) == REG_E)
  681. INST_RETURN(1, 0x43)
  682. if (INST_REG(0) == REG_B && INST_REG(1) == REG_H)
  683. INST_RETURN(1, 0x44)
  684. if (INST_REG(0) == REG_B && INST_REG(1) == REG_IXH)
  685. INST_RETURN(2, INST_IX_PREFIX, 0x44)
  686. if (INST_REG(0) == REG_B && INST_REG(1) == REG_IYH)
  687. INST_RETURN(2, INST_IY_PREFIX, 0x44)
  688. if (INST_REG(0) == REG_B && INST_REG(1) == REG_L)
  689. INST_RETURN(1, 0x45)
  690. if (INST_REG(0) == REG_B && INST_REG(1) == REG_IXL)
  691. INST_RETURN(2, INST_IX_PREFIX, 0x45)
  692. if (INST_REG(0) == REG_B && INST_REG(1) == REG_IYL)
  693. INST_RETURN(2, INST_IY_PREFIX, 0x45)
  694. if (INST_REG(0) == REG_C && INST_REG(1) == REG_A)
  695. INST_RETURN(1, 0x4F)
  696. if (INST_REG(0) == REG_C && INST_REG(1) == REG_B)
  697. INST_RETURN(1, 0x48)
  698. if (INST_REG(0) == REG_C && INST_REG(1) == REG_C)
  699. INST_RETURN(1, 0x49)
  700. if (INST_REG(0) == REG_C && INST_REG(1) == REG_D)
  701. INST_RETURN(1, 0x4A)
  702. if (INST_REG(0) == REG_C && INST_REG(1) == REG_E)
  703. INST_RETURN(1, 0x4B)
  704. if (INST_REG(0) == REG_C && INST_REG(1) == REG_H)
  705. INST_RETURN(1, 0x4C)
  706. if (INST_REG(0) == REG_C && INST_REG(1) == REG_IXH)
  707. INST_RETURN(2, INST_IX_PREFIX, 0x4C)
  708. if (INST_REG(0) == REG_C && INST_REG(1) == REG_IYH)
  709. INST_RETURN(2, INST_IY_PREFIX, 0x4C)
  710. if (INST_REG(0) == REG_C && INST_REG(1) == REG_L)
  711. INST_RETURN(1, 0x4D)
  712. if (INST_REG(0) == REG_C && INST_REG(1) == REG_IXL)
  713. INST_RETURN(2, INST_IX_PREFIX, 0x4D)
  714. if (INST_REG(0) == REG_C && INST_REG(1) == REG_IYL)
  715. INST_RETURN(2, INST_IY_PREFIX, 0x4D)
  716. if (INST_REG(0) == REG_D && INST_REG(1) == REG_A)
  717. INST_RETURN(1, 0x57)
  718. if (INST_REG(0) == REG_D && INST_REG(1) == REG_B)
  719. INST_RETURN(1, 0x50)
  720. if (INST_REG(0) == REG_D && INST_REG(1) == REG_C)
  721. INST_RETURN(1, 0x51)
  722. if (INST_REG(0) == REG_D && INST_REG(1) == REG_D)
  723. INST_RETURN(1, 0x52)
  724. if (INST_REG(0) == REG_D && INST_REG(1) == REG_E)
  725. INST_RETURN(1, 0x53)
  726. if (INST_REG(0) == REG_D && INST_REG(1) == REG_H)
  727. INST_RETURN(1, 0x54)
  728. if (INST_REG(0) == REG_D && INST_REG(1) == REG_IXH)
  729. INST_RETURN(2, INST_IX_PREFIX, 0x54)
  730. if (INST_REG(0) == REG_D && INST_REG(1) == REG_IYH)
  731. INST_RETURN(2, INST_IY_PREFIX, 0x54)
  732. if (INST_REG(0) == REG_D && INST_REG(1) == REG_L)
  733. INST_RETURN(1, 0x55)
  734. if (INST_REG(0) == REG_D && INST_REG(1) == REG_IXL)
  735. INST_RETURN(2, INST_IX_PREFIX, 0x55)
  736. if (INST_REG(0) == REG_D && INST_REG(1) == REG_IYL)
  737. INST_RETURN(2, INST_IY_PREFIX, 0x55)
  738. if (INST_REG(0) == REG_E && INST_REG(1) == REG_A)
  739. INST_RETURN(1, 0x5F)
  740. if (INST_REG(0) == REG_E && INST_REG(1) == REG_B)
  741. INST_RETURN(1, 0x58)
  742. if (INST_REG(0) == REG_E && INST_REG(1) == REG_C)
  743. INST_RETURN(1, 0x59)
  744. if (INST_REG(0) == REG_E && INST_REG(1) == REG_D)
  745. INST_RETURN(1, 0x5A)
  746. if (INST_REG(0) == REG_E && INST_REG(1) == REG_E)
  747. INST_RETURN(1, 0x5B)
  748. if (INST_REG(0) == REG_E && INST_REG(1) == REG_H)
  749. INST_RETURN(1, 0x5C)
  750. if (INST_REG(0) == REG_E && INST_REG(1) == REG_IXH)
  751. INST_RETURN(2, INST_IX_PREFIX, 0x5C)
  752. if (INST_REG(0) == REG_E && INST_REG(1) == REG_IYH)
  753. INST_RETURN(2, INST_IY_PREFIX, 0x5C)
  754. if (INST_REG(0) == REG_E && INST_REG(1) == REG_L)
  755. INST_RETURN(1, 0x5D)
  756. if (INST_REG(0) == REG_E && INST_REG(1) == REG_IXL)
  757. INST_RETURN(2, INST_IX_PREFIX, 0x5D)
  758. if (INST_REG(0) == REG_E && INST_REG(1) == REG_IYL)
  759. INST_RETURN(2, INST_IY_PREFIX, 0x5D)
  760. if (INST_REG(0) == REG_H && INST_REG(1) == REG_A)
  761. INST_RETURN(1, 0x67)
  762. if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_A)
  763. INST_RETURN(2, INST_IX_PREFIX, 0x67)
  764. if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_A)
  765. INST_RETURN(2, INST_IY_PREFIX, 0x67)
  766. if (INST_REG(0) == REG_H && INST_REG(1) == REG_B)
  767. INST_RETURN(1, 0x60)
  768. if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_B)
  769. INST_RETURN(2, INST_IX_PREFIX, 0x60)
  770. if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_B)
  771. INST_RETURN(2, INST_IY_PREFIX, 0x60)
  772. if (INST_REG(0) == REG_H && INST_REG(1) == REG_C)
  773. INST_RETURN(1, 0x61)
  774. if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_C)
  775. INST_RETURN(2, INST_IX_PREFIX, 0x61)
  776. if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_C)
  777. INST_RETURN(2, INST_IY_PREFIX, 0x61)
  778. if (INST_REG(0) == REG_H && INST_REG(1) == REG_D)
  779. INST_RETURN(1, 0x62)
  780. if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_D)
  781. INST_RETURN(2, INST_IX_PREFIX, 0x62)
  782. if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_D)
  783. INST_RETURN(2, INST_IY_PREFIX, 0x62)
  784. if (INST_REG(0) == REG_H && INST_REG(1) == REG_E)
  785. INST_RETURN(1, 0x63)
  786. if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_E)
  787. INST_RETURN(2, INST_IX_PREFIX, 0x63)
  788. if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_E)
  789. INST_RETURN(2, INST_IY_PREFIX, 0x63)
  790. if (INST_REG(0) == REG_H && INST_REG(1) == REG_H)
  791. INST_RETURN(1, 0x64)
  792. if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_IXH)
  793. INST_RETURN(2, INST_IX_PREFIX, 0x64)
  794. if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_IYH)
  795. INST_RETURN(2, INST_IY_PREFIX, 0x64)
  796. if (INST_REG(0) == REG_H && INST_REG(1) == REG_L)
  797. INST_RETURN(1, 0x65)
  798. if (INST_REG(0) == REG_IXH && INST_REG(1) == REG_IXL)
  799. INST_RETURN(2, INST_IX_PREFIX, 0x65)
  800. if (INST_REG(0) == REG_IYH && INST_REG(1) == REG_IYL)
  801. INST_RETURN(2, INST_IY_PREFIX, 0x65)
  802. if (INST_REG(0) == REG_L && INST_REG(1) == REG_A)
  803. INST_RETURN(1, 0x6F)
  804. if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_A)
  805. INST_RETURN(2, INST_IX_PREFIX, 0x6F)
  806. if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_A)
  807. INST_RETURN(2, INST_IY_PREFIX, 0x6F)
  808. if (INST_REG(0) == REG_L && INST_REG(1) == REG_B)
  809. INST_RETURN(1, 0x68)
  810. if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_B)
  811. INST_RETURN(2, INST_IX_PREFIX, 0x68)
  812. if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_B)
  813. INST_RETURN(2, INST_IY_PREFIX, 0x68)
  814. if (INST_REG(0) == REG_L && INST_REG(1) == REG_C)
  815. INST_RETURN(1, 0x69)
  816. if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_C)
  817. INST_RETURN(2, INST_IX_PREFIX, 0x69)
  818. if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_C)
  819. INST_RETURN(2, INST_IY_PREFIX, 0x69)
  820. if (INST_REG(0) == REG_L && INST_REG(1) == REG_D)
  821. INST_RETURN(1, 0x6A)
  822. if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_D)
  823. INST_RETURN(2, INST_IX_PREFIX, 0x6A)
  824. if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_D)
  825. INST_RETURN(2, INST_IY_PREFIX, 0x6A)
  826. if (INST_REG(0) == REG_L && INST_REG(1) == REG_E)
  827. INST_RETURN(1, 0x6B)
  828. if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_E)
  829. INST_RETURN(2, INST_IX_PREFIX, 0x6B)
  830. if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_E)
  831. INST_RETURN(2, INST_IY_PREFIX, 0x6B)
  832. if (INST_REG(0) == REG_L && INST_REG(1) == REG_H)
  833. INST_RETURN(1, 0x6C)
  834. if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_IXH)
  835. INST_RETURN(2, INST_IX_PREFIX, 0x6C)
  836. if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_IYH)
  837. INST_RETURN(2, INST_IY_PREFIX, 0x6C)
  838. if (INST_REG(0) == REG_L && INST_REG(1) == REG_L)
  839. INST_RETURN(1, 0x6D)
  840. if (INST_REG(0) == REG_IXL && INST_REG(1) == REG_IXL)
  841. INST_RETURN(2, INST_IX_PREFIX, 0x6D)
  842. if (INST_REG(0) == REG_IYL && INST_REG(1) == REG_IYL)
  843. INST_RETURN(2, INST_IY_PREFIX, 0x6D)
  844. if (INST_REG(0) == REG_A && INST_REG(1) == REG_I)
  845. INST_RETURN(2, 0xED, 0x57)
  846. if (INST_REG(0) == REG_I && INST_REG(1) == REG_A)
  847. INST_RETURN(2, 0xED, 0x47)
  848. if (INST_REG(0) == REG_A && INST_REG(1) == REG_R)
  849. INST_RETURN(2, 0xED, 0x5F)
  850. if (INST_REG(0) == REG_R && INST_REG(1) == REG_A)
  851. INST_RETURN(2, 0xED, 0x4F)
  852. if (INST_REG(0) == REG_SP && INST_REG(1) == REG_HL)
  853. INST_RETURN(1, 0xF9)
  854. if (INST_REG(0) == REG_SP && INST_REG(1) == REG_IX)
  855. INST_RETURN(2, INST_IX_PREFIX, 0xF9)
  856. if (INST_REG(0) == REG_SP && INST_REG(1) == REG_IY)
  857. INST_RETURN(2, INST_IY_PREFIX, 0xF9)
  858. INST_ERROR(ARG_VALUE)
  859. }
  860. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_IMMEDIATE) {
  861. if (INST_REG(0) == REG_A && INST_IMM(1).mask & IMM_U8)
  862. INST_RETURN(2, 0x3E, INST_IMM(1).uval)
  863. if (INST_REG(0) == REG_B && INST_IMM(1).mask & IMM_U8)
  864. INST_RETURN(2, 0x06, INST_IMM(1).uval)
  865. if (INST_REG(0) == REG_C && INST_IMM(1).mask & IMM_U8)
  866. INST_RETURN(2, 0x0E, INST_IMM(1).uval)
  867. if (INST_REG(0) == REG_D && INST_IMM(1).mask & IMM_U8)
  868. INST_RETURN(2, 0x16, INST_IMM(1).uval)
  869. if (INST_REG(0) == REG_E && INST_IMM(1).mask & IMM_U8)
  870. INST_RETURN(2, 0x1E, INST_IMM(1).uval)
  871. if (INST_REG(0) == REG_H && INST_IMM(1).mask & IMM_U8)
  872. INST_RETURN(2, 0x26, INST_IMM(1).uval)
  873. if (INST_REG(0) == REG_IXH && INST_IMM(1).mask & IMM_U8)
  874. INST_RETURN(3, INST_IX_PREFIX, 0x26, INST_IMM(1).uval)
  875. if (INST_REG(0) == REG_IYH && INST_IMM(1).mask & IMM_U8)
  876. INST_RETURN(3, INST_IY_PREFIX, 0x26, INST_IMM(1).uval)
  877. if (INST_REG(0) == REG_L && INST_IMM(1).mask & IMM_U8)
  878. INST_RETURN(2, 0x2E, INST_IMM(1).uval)
  879. if (INST_REG(0) == REG_IXL && INST_IMM(1).mask & IMM_U8)
  880. INST_RETURN(3, INST_IX_PREFIX, 0x2E, INST_IMM(1).uval)
  881. if (INST_REG(0) == REG_IYL && INST_IMM(1).mask & IMM_U8)
  882. INST_RETURN(3, INST_IY_PREFIX, 0x2E, INST_IMM(1).uval)
  883. if (INST_REG(0) == REG_BC && INST_IMM(1).mask & IMM_U16)
  884. INST_RETURN(3, 0x01, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  885. if (INST_REG(0) == REG_DE && INST_IMM(1).mask & IMM_U16)
  886. INST_RETURN(3, 0x11, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  887. if (INST_REG(0) == REG_HL && INST_IMM(1).mask & IMM_U16)
  888. INST_RETURN(3, 0x21, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  889. if (INST_REG(0) == REG_IX && INST_IMM(1).mask & IMM_U16)
  890. INST_RETURN(4, INST_IX_PREFIX, 0x21, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  891. if (INST_REG(0) == REG_IY && INST_IMM(1).mask & IMM_U16)
  892. INST_RETURN(4, INST_IY_PREFIX, 0x21, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  893. if (INST_REG(0) == REG_SP && INST_IMM(1).mask & IMM_U16)
  894. INST_RETURN(3, 0x31, INST_IMM_U16_B1(INST_IMM(1)), INST_IMM_U16_B2(INST_IMM(1)))
  895. INST_ERROR(ARG_VALUE)
  896. }
  897. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT &&
  898. (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {
  899. if (INST_REG(0) == REG_A)
  900. INST_RETURN(1, 0x7E)
  901. if (INST_REG(0) == REG_B)
  902. INST_RETURN(1, 0x46)
  903. if (INST_REG(0) == REG_C)
  904. INST_RETURN(1, 0x4E)
  905. if (INST_REG(0) == REG_D)
  906. INST_RETURN(1, 0x56)
  907. if (INST_REG(0) == REG_E)
  908. INST_RETURN(1, 0x5E)
  909. if (INST_REG(0) == REG_H)
  910. INST_RETURN(1, 0x66)
  911. if (INST_REG(0) == REG_L)
  912. INST_RETURN(1, 0x6E)
  913. INST_ERROR(ARG_VALUE)
  914. }
  915. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDEXED) {
  916. if (INST_REG(0) == REG_A)
  917. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x7E, INST_INDEX(1).offset)
  918. if (INST_REG(0) == REG_B)
  919. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x46, INST_INDEX(1).offset)
  920. if (INST_REG(0) == REG_C)
  921. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x4E, INST_INDEX(1).offset)
  922. if (INST_REG(0) == REG_D)
  923. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x56, INST_INDEX(1).offset)
  924. if (INST_REG(0) == REG_E)
  925. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x5E, INST_INDEX(1).offset)
  926. if (INST_REG(0) == REG_H)
  927. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x66, INST_INDEX(1).offset)
  928. if (INST_REG(0) == REG_L)
  929. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x6E, INST_INDEX(1).offset)
  930. INST_ERROR(ARG_VALUE)
  931. }
  932. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT) {
  933. if (INST_REG(0) == REG_A && (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_BC))
  934. INST_RETURN(1, 0x0A)
  935. if (INST_REG(0) == REG_A && (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_DE))
  936. INST_RETURN(1, 0x1A)
  937. if (INST_REG(0) == REG_HL && INST_INDIRECT(1).type == AT_IMMEDIATE)
  938. INST_RETURN(3, 0x2A, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))
  939. if (INST_REG(0) == REG_IX && INST_INDIRECT(1).type == AT_IMMEDIATE)
  940. 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))
  941. if (INST_REG(0) == REG_IY && INST_INDIRECT(1).type == AT_IMMEDIATE)
  942. 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))
  943. if (INST_REG(0) == REG_A && INST_INDIRECT(1).type == AT_IMMEDIATE)
  944. INST_RETURN(3, 0x3A, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))
  945. if (INST_REG(0) == REG_BC && INST_INDIRECT(1).type == AT_IMMEDIATE)
  946. INST_RETURN(4, 0xED, 0x4B, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))
  947. if (INST_REG(0) == REG_DE && INST_INDIRECT(1).type == AT_IMMEDIATE)
  948. INST_RETURN(4, 0xED, 0x5B, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))
  949. if (INST_REG(0) == REG_SP && INST_INDIRECT(1).type == AT_IMMEDIATE)
  950. INST_RETURN(4, 0xED, 0x7B, INST_IMM_U16_B1(INST_INDIRECT(1).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(1).addr.imm))
  951. INST_ERROR(ARG_VALUE)
  952. }
  953. if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_REGISTER &&
  954. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  955. if (INST_REG(1) == REG_A)
  956. INST_RETURN(1, 0x77)
  957. if (INST_REG(1) == REG_B)
  958. INST_RETURN(1, 0x70)
  959. if (INST_REG(1) == REG_C)
  960. INST_RETURN(1, 0x71)
  961. if (INST_REG(1) == REG_D)
  962. INST_RETURN(1, 0x72)
  963. if (INST_REG(1) == REG_E)
  964. INST_RETURN(1, 0x73)
  965. if (INST_REG(1) == REG_H)
  966. INST_RETURN(1, 0x74)
  967. if (INST_REG(1) == REG_L)
  968. INST_RETURN(1, 0x75)
  969. INST_ERROR(ARG_VALUE)
  970. }
  971. if (INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  972. if (INST_REG(1) == REG_A)
  973. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x77, INST_INDEX(0).offset)
  974. if (INST_REG(1) == REG_B)
  975. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x70, INST_INDEX(0).offset)
  976. if (INST_REG(1) == REG_C)
  977. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x71, INST_INDEX(0).offset)
  978. if (INST_REG(1) == REG_D)
  979. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x72, INST_INDEX(0).offset)
  980. if (INST_REG(1) == REG_E)
  981. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x73, INST_INDEX(0).offset)
  982. if (INST_REG(1) == REG_H)
  983. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x74, INST_INDEX(0).offset)
  984. if (INST_REG(1) == REG_L)
  985. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x75, INST_INDEX(0).offset)
  986. INST_ERROR(ARG_VALUE)
  987. }
  988. if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_IMMEDIATE &&
  989. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  990. if (INST_IMM(1).mask & IMM_U8)
  991. INST_RETURN(2, 0x36, INST_IMM(1).uval)
  992. INST_ERROR(ARG_VALUE)
  993. }
  994. if (INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_IMMEDIATE) {
  995. if (INST_IMM(1).mask & IMM_U8)
  996. INST_RETURN(4, INST_INDEX_PREFIX(0), 0x36, INST_INDEX(0).offset, INST_IMM(1).uval)
  997. INST_ERROR(ARG_VALUE)
  998. }
  999. if (INST_TYPE(0) == AT_INDIRECT && INST_TYPE(1) == AT_REGISTER) {
  1000. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_BC) && INST_REG(1) == REG_A)
  1001. INST_RETURN(1, 0x02)
  1002. if ((INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_DE) && INST_REG(1) == REG_A)
  1003. INST_RETURN(1, 0x12)
  1004. if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_HL)
  1005. INST_RETURN(3, 0x22, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))
  1006. if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_IX)
  1007. 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))
  1008. if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_IY)
  1009. 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))
  1010. if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_A)
  1011. INST_RETURN(3, 0x32, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))
  1012. if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_BC)
  1013. INST_RETURN(4, 0xED, 0x43, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))
  1014. if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_DE)
  1015. INST_RETURN(4, 0xED, 0x53, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))
  1016. if (INST_INDIRECT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_SP)
  1017. INST_RETURN(4, 0xED, 0x73, INST_IMM_U16_B1(INST_INDIRECT(0).addr.imm), INST_IMM_U16_B2(INST_INDIRECT(0).addr.imm))
  1018. INST_ERROR(ARG_VALUE)
  1019. }
  1020. INST_ERROR(ARG_TYPE)
  1021. }
  1022. INST_FUNC(ldd)
  1023. {
  1024. INST_TAKES_NO_ARGS
  1025. INST_RETURN(2, 0xED, 0xA8)
  1026. }
  1027. INST_FUNC(lddr)
  1028. {
  1029. INST_TAKES_NO_ARGS
  1030. INST_RETURN(2, 0xED, 0xB8)
  1031. }
  1032. INST_FUNC(ldi)
  1033. {
  1034. INST_TAKES_NO_ARGS
  1035. INST_RETURN(2, 0xED, 0xA0)
  1036. }
  1037. INST_FUNC(ldir)
  1038. {
  1039. INST_TAKES_NO_ARGS
  1040. INST_RETURN(2, 0xED, 0xB0)
  1041. }
  1042. INST_FUNC(neg)
  1043. {
  1044. INST_TAKES_NO_ARGS
  1045. INST_RETURN(2, 0xED, 0x44)
  1046. }
  1047. INST_FUNC(nop)
  1048. {
  1049. INST_TAKES_NO_ARGS
  1050. INST_RETURN(1, 0x00)
  1051. }
  1052. INST_FUNC(or)
  1053. {
  1054. INST_TAKES_ARGS(
  1055. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1056. AT_NONE,
  1057. AT_NONE
  1058. )
  1059. if (INST_TYPE(0) == AT_REGISTER) {
  1060. if (INST_REG(0) == REG_A)
  1061. INST_RETURN(1, 0xB7)
  1062. if (INST_REG(0) == REG_B)
  1063. INST_RETURN(1, 0xB0)
  1064. if (INST_REG(0) == REG_C)
  1065. INST_RETURN(1, 0xB1)
  1066. if (INST_REG(0) == REG_D)
  1067. INST_RETURN(1, 0xB2)
  1068. if (INST_REG(0) == REG_E)
  1069. INST_RETURN(1, 0xB3)
  1070. if (INST_REG(0) == REG_H)
  1071. INST_RETURN(1, 0xB4)
  1072. if (INST_REG(0) == REG_IXH)
  1073. INST_RETURN(2, INST_IX_PREFIX, 0xB4)
  1074. if (INST_REG(0) == REG_IYH)
  1075. INST_RETURN(2, INST_IY_PREFIX, 0xB4)
  1076. if (INST_REG(0) == REG_L)
  1077. INST_RETURN(1, 0xB5)
  1078. if (INST_REG(0) == REG_IXL)
  1079. INST_RETURN(2, INST_IX_PREFIX, 0xB5)
  1080. if (INST_REG(0) == REG_IYL)
  1081. INST_RETURN(2, INST_IY_PREFIX, 0xB5)
  1082. INST_ERROR(ARG_VALUE)
  1083. }
  1084. if (INST_TYPE(0) == AT_IMMEDIATE) {
  1085. if (INST_IMM(0).mask & IMM_U8)
  1086. INST_RETURN(2, 0xF6, INST_IMM(0).uval)
  1087. INST_ERROR(ARG_VALUE)
  1088. }
  1089. if (INST_TYPE(0) == AT_INDIRECT &&
  1090. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1091. INST_RETURN(1, 0xB6)
  1092. }
  1093. if (INST_TYPE(0) == AT_INDEXED) {
  1094. INST_RETURN(3, INST_INDEX_PREFIX(0), 0xB6, INST_INDEX(0).offset)
  1095. }
  1096. INST_ERROR(ARG_TYPE)
  1097. }
  1098. INST_FUNC(otdr)
  1099. {
  1100. INST_TAKES_NO_ARGS
  1101. INST_RETURN(2, 0xED, 0xBB)
  1102. }
  1103. INST_FUNC(otir)
  1104. {
  1105. INST_TAKES_NO_ARGS
  1106. INST_RETURN(2, 0xED, 0xB3)
  1107. }
  1108. INST_FUNC(out)
  1109. {
  1110. INST_TAKES_ARGS(
  1111. AT_PORT,
  1112. AT_IMMEDIATE|AT_REGISTER,
  1113. AT_NONE
  1114. )
  1115. if (INST_TYPE(0) == AT_PORT && INST_TYPE(1) == AT_REGISTER) {
  1116. if (INST_PORT(0).type == AT_IMMEDIATE && INST_REG(1) == REG_A)
  1117. INST_RETURN(2, 0xD3, INST_PORT(0).port.imm.uval)
  1118. if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_A)
  1119. INST_RETURN(2, 0xED, 0x79)
  1120. if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_B)
  1121. INST_RETURN(2, 0xED, 0x41)
  1122. if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_C)
  1123. INST_RETURN(2, 0xED, 0x49)
  1124. if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_D)
  1125. INST_RETURN(2, 0xED, 0x51)
  1126. if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_E)
  1127. INST_RETURN(2, 0xED, 0x59)
  1128. if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_H)
  1129. INST_RETURN(2, 0xED, 0x61)
  1130. if (INST_PORT(0).type == AT_REGISTER && INST_REG(1) == REG_L)
  1131. INST_RETURN(2, 0xED, 0x69)
  1132. INST_ERROR(ARG_VALUE)
  1133. }
  1134. if (INST_TYPE(0) == AT_PORT && INST_TYPE(1) == AT_IMMEDIATE) {
  1135. if (INST_PORT(0).type == AT_REGISTER && (INST_IMM(1).mask & IMM_U8 && INST_IMM(1).uval == 0))
  1136. INST_RETURN(2, 0xED, 0x71)
  1137. INST_ERROR(ARG_VALUE)
  1138. }
  1139. INST_ERROR(ARG_TYPE)
  1140. }
  1141. INST_FUNC(outd)
  1142. {
  1143. INST_TAKES_NO_ARGS
  1144. INST_RETURN(2, 0xED, 0xAB)
  1145. }
  1146. INST_FUNC(outi)
  1147. {
  1148. INST_TAKES_NO_ARGS
  1149. INST_RETURN(2, 0xED, 0xA3)
  1150. }
  1151. INST_FUNC(pop)
  1152. {
  1153. INST_TAKES_ARGS(
  1154. AT_REGISTER,
  1155. AT_NONE,
  1156. AT_NONE
  1157. )
  1158. if (INST_TYPE(0) == AT_REGISTER) {
  1159. if (INST_REG(0) == REG_BC)
  1160. INST_RETURN(1, 0xC1)
  1161. if (INST_REG(0) == REG_DE)
  1162. INST_RETURN(1, 0xD1)
  1163. if (INST_REG(0) == REG_HL)
  1164. INST_RETURN(1, 0xE1)
  1165. if (INST_REG(0) == REG_IX)
  1166. INST_RETURN(2, INST_IX_PREFIX, 0xE1)
  1167. if (INST_REG(0) == REG_IY)
  1168. INST_RETURN(2, INST_IY_PREFIX, 0xE1)
  1169. if (INST_REG(0) == REG_AF)
  1170. INST_RETURN(1, 0xF1)
  1171. INST_ERROR(ARG_VALUE)
  1172. }
  1173. INST_ERROR(ARG_TYPE)
  1174. }
  1175. INST_FUNC(push)
  1176. {
  1177. INST_TAKES_ARGS(
  1178. AT_REGISTER,
  1179. AT_NONE,
  1180. AT_NONE
  1181. )
  1182. if (INST_TYPE(0) == AT_REGISTER) {
  1183. if (INST_REG(0) == REG_BC)
  1184. INST_RETURN(1, 0xC5)
  1185. if (INST_REG(0) == REG_DE)
  1186. INST_RETURN(1, 0xD5)
  1187. if (INST_REG(0) == REG_HL)
  1188. INST_RETURN(1, 0xE5)
  1189. if (INST_REG(0) == REG_IX)
  1190. INST_RETURN(2, INST_IX_PREFIX, 0xE5)
  1191. if (INST_REG(0) == REG_IY)
  1192. INST_RETURN(2, INST_IY_PREFIX, 0xE5)
  1193. if (INST_REG(0) == REG_AF)
  1194. INST_RETURN(1, 0xF5)
  1195. INST_ERROR(ARG_VALUE)
  1196. }
  1197. INST_ERROR(ARG_TYPE)
  1198. }
  1199. INST_FUNC(res)
  1200. {
  1201. INST_TAKES_ARGS(
  1202. AT_IMMEDIATE,
  1203. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1204. AT_OPTIONAL|AT_REGISTER
  1205. )
  1206. if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_REGISTER) {
  1207. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_A)
  1208. INST_RETURN(2, 0xCB, 0x87 + 8 * INST_IMM(0).uval)
  1209. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_B)
  1210. INST_RETURN(2, 0xCB, 0x80 + 8 * INST_IMM(0).uval)
  1211. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_C)
  1212. INST_RETURN(2, 0xCB, 0x81 + 8 * INST_IMM(0).uval)
  1213. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_D)
  1214. INST_RETURN(2, 0xCB, 0x82 + 8 * INST_IMM(0).uval)
  1215. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_E)
  1216. INST_RETURN(2, 0xCB, 0x83 + 8 * INST_IMM(0).uval)
  1217. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_H)
  1218. INST_RETURN(2, 0xCB, 0x84 + 8 * INST_IMM(0).uval)
  1219. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_L)
  1220. INST_RETURN(2, 0xCB, 0x85 + 8 * INST_IMM(0).uval)
  1221. INST_ERROR(ARG_VALUE)
  1222. }
  1223. if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDIRECT &&
  1224. (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {
  1225. if (INST_IMM(0).mask & IMM_BIT)
  1226. INST_RETURN(2, 0xCB, 0x86 + 8 * INST_IMM(0).uval)
  1227. INST_ERROR(ARG_VALUE)
  1228. }
  1229. if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED) {
  1230. if (INST_IMM(0).mask & IMM_BIT)
  1231. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x86 + 8 * INST_IMM(0).uval)
  1232. INST_ERROR(ARG_VALUE)
  1233. }
  1234. if (INST_NARGS == 3 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED && INST_TYPE(2) == AT_REGISTER) {
  1235. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_A)
  1236. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x87 + 8 * INST_IMM(0).uval)
  1237. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_B)
  1238. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x80 + 8 * INST_IMM(0).uval)
  1239. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_C)
  1240. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x81 + 8 * INST_IMM(0).uval)
  1241. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_D)
  1242. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x82 + 8 * INST_IMM(0).uval)
  1243. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_E)
  1244. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x83 + 8 * INST_IMM(0).uval)
  1245. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_H)
  1246. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x84 + 8 * INST_IMM(0).uval)
  1247. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_L)
  1248. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0x85 + 8 * INST_IMM(0).uval)
  1249. INST_ERROR(ARG_VALUE)
  1250. }
  1251. INST_ERROR(ARG_TYPE)
  1252. }
  1253. INST_FUNC(ret)
  1254. {
  1255. INST_TAKES_ARGS(
  1256. AT_CONDITION|AT_OPTIONAL,
  1257. AT_NONE,
  1258. AT_NONE
  1259. )
  1260. if (INST_NARGS == 0) {
  1261. INST_RETURN(1, 0xC9)
  1262. }
  1263. if (INST_NARGS == 1 && INST_TYPE(0) == AT_CONDITION) {
  1264. if (INST_COND(0) == COND_NZ)
  1265. INST_RETURN(1, 0xC0)
  1266. if (INST_COND(0) == COND_Z)
  1267. INST_RETURN(1, 0xC8)
  1268. if (INST_COND(0) == COND_NC)
  1269. INST_RETURN(1, 0xD0)
  1270. if (INST_COND(0) == COND_C)
  1271. INST_RETURN(1, 0xD8)
  1272. if (INST_COND(0) == COND_PO)
  1273. INST_RETURN(1, 0xE0)
  1274. if (INST_COND(0) == COND_PE)
  1275. INST_RETURN(1, 0xE8)
  1276. if (INST_COND(0) == COND_P)
  1277. INST_RETURN(1, 0xF0)
  1278. if (INST_COND(0) == COND_M)
  1279. INST_RETURN(1, 0xF8)
  1280. INST_ERROR(ARG_VALUE)
  1281. }
  1282. INST_ERROR(ARG_TYPE)
  1283. }
  1284. INST_FUNC(reti)
  1285. {
  1286. INST_TAKES_NO_ARGS
  1287. INST_RETURN(2, 0xED, 0x4D)
  1288. }
  1289. INST_FUNC(retn)
  1290. {
  1291. INST_TAKES_NO_ARGS
  1292. INST_RETURN(2, 0xED, 0x45)
  1293. }
  1294. INST_FUNC(rl)
  1295. {
  1296. INST_TAKES_ARGS(
  1297. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1298. AT_OPTIONAL|AT_REGISTER,
  1299. AT_NONE
  1300. )
  1301. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1302. if (INST_REG(0) == REG_A)
  1303. INST_RETURN(2, 0xCB, 0x17)
  1304. if (INST_REG(0) == REG_B)
  1305. INST_RETURN(2, 0xCB, 0x10)
  1306. if (INST_REG(0) == REG_C)
  1307. INST_RETURN(2, 0xCB, 0x11)
  1308. if (INST_REG(0) == REG_D)
  1309. INST_RETURN(2, 0xCB, 0x12)
  1310. if (INST_REG(0) == REG_E)
  1311. INST_RETURN(2, 0xCB, 0x13)
  1312. if (INST_REG(0) == REG_H)
  1313. INST_RETURN(2, 0xCB, 0x14)
  1314. if (INST_REG(0) == REG_L)
  1315. INST_RETURN(2, 0xCB, 0x15)
  1316. INST_ERROR(ARG_VALUE)
  1317. }
  1318. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1319. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1320. INST_RETURN(2, 0xCB, 0x16)
  1321. }
  1322. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1323. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x16)
  1324. }
  1325. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1326. if (INST_REG(1) == REG_A)
  1327. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x17)
  1328. if (INST_REG(1) == REG_B)
  1329. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x10)
  1330. if (INST_REG(1) == REG_C)
  1331. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x11)
  1332. if (INST_REG(1) == REG_D)
  1333. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x12)
  1334. if (INST_REG(1) == REG_E)
  1335. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x13)
  1336. if (INST_REG(1) == REG_H)
  1337. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x14)
  1338. if (INST_REG(1) == REG_L)
  1339. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x15)
  1340. INST_ERROR(ARG_VALUE)
  1341. }
  1342. INST_ERROR(ARG_TYPE)
  1343. }
  1344. INST_FUNC(rla)
  1345. {
  1346. INST_TAKES_NO_ARGS
  1347. INST_RETURN(1, 0x17)
  1348. }
  1349. INST_FUNC(rlc)
  1350. {
  1351. INST_TAKES_ARGS(
  1352. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1353. AT_OPTIONAL|AT_REGISTER,
  1354. AT_NONE
  1355. )
  1356. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1357. if (INST_REG(0) == REG_A)
  1358. INST_RETURN(2, 0xCB, 0x07)
  1359. if (INST_REG(0) == REG_B)
  1360. INST_RETURN(2, 0xCB, 0x00)
  1361. if (INST_REG(0) == REG_C)
  1362. INST_RETURN(2, 0xCB, 0x01)
  1363. if (INST_REG(0) == REG_D)
  1364. INST_RETURN(2, 0xCB, 0x02)
  1365. if (INST_REG(0) == REG_E)
  1366. INST_RETURN(2, 0xCB, 0x03)
  1367. if (INST_REG(0) == REG_H)
  1368. INST_RETURN(2, 0xCB, 0x04)
  1369. if (INST_REG(0) == REG_L)
  1370. INST_RETURN(2, 0xCB, 0x05)
  1371. INST_ERROR(ARG_VALUE)
  1372. }
  1373. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1374. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1375. INST_RETURN(2, 0xCB, 0x06)
  1376. }
  1377. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1378. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x06)
  1379. }
  1380. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1381. if (INST_REG(1) == REG_A)
  1382. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x07)
  1383. if (INST_REG(1) == REG_B)
  1384. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x00)
  1385. if (INST_REG(1) == REG_C)
  1386. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x01)
  1387. if (INST_REG(1) == REG_D)
  1388. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x02)
  1389. if (INST_REG(1) == REG_E)
  1390. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x03)
  1391. if (INST_REG(1) == REG_H)
  1392. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x04)
  1393. if (INST_REG(1) == REG_L)
  1394. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x05)
  1395. INST_ERROR(ARG_VALUE)
  1396. }
  1397. INST_ERROR(ARG_TYPE)
  1398. }
  1399. INST_FUNC(rlca)
  1400. {
  1401. INST_TAKES_NO_ARGS
  1402. INST_RETURN(1, 0x07)
  1403. }
  1404. INST_FUNC(rld)
  1405. {
  1406. INST_TAKES_NO_ARGS
  1407. INST_RETURN(2, 0xED, 0x6F)
  1408. }
  1409. INST_FUNC(rr)
  1410. {
  1411. INST_TAKES_ARGS(
  1412. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1413. AT_OPTIONAL|AT_REGISTER,
  1414. AT_NONE
  1415. )
  1416. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1417. if (INST_REG(0) == REG_A)
  1418. INST_RETURN(2, 0xCB, 0x1F)
  1419. if (INST_REG(0) == REG_B)
  1420. INST_RETURN(2, 0xCB, 0x18)
  1421. if (INST_REG(0) == REG_C)
  1422. INST_RETURN(2, 0xCB, 0x19)
  1423. if (INST_REG(0) == REG_D)
  1424. INST_RETURN(2, 0xCB, 0x1A)
  1425. if (INST_REG(0) == REG_E)
  1426. INST_RETURN(2, 0xCB, 0x1B)
  1427. if (INST_REG(0) == REG_H)
  1428. INST_RETURN(2, 0xCB, 0x1C)
  1429. if (INST_REG(0) == REG_L)
  1430. INST_RETURN(2, 0xCB, 0x1D)
  1431. INST_ERROR(ARG_VALUE)
  1432. }
  1433. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1434. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1435. INST_RETURN(2, 0xCB, 0x1E)
  1436. }
  1437. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1438. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1E)
  1439. }
  1440. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1441. if (INST_REG(1) == REG_A)
  1442. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1F)
  1443. if (INST_REG(1) == REG_B)
  1444. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x18)
  1445. if (INST_REG(1) == REG_C)
  1446. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x19)
  1447. if (INST_REG(1) == REG_D)
  1448. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1A)
  1449. if (INST_REG(1) == REG_E)
  1450. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1B)
  1451. if (INST_REG(1) == REG_H)
  1452. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1C)
  1453. if (INST_REG(1) == REG_L)
  1454. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x1D)
  1455. INST_ERROR(ARG_VALUE)
  1456. }
  1457. INST_ERROR(ARG_TYPE)
  1458. }
  1459. INST_FUNC(rra)
  1460. {
  1461. INST_TAKES_NO_ARGS
  1462. INST_RETURN(1, 0x1F)
  1463. }
  1464. INST_FUNC(rrc)
  1465. {
  1466. INST_TAKES_ARGS(
  1467. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1468. AT_OPTIONAL|AT_REGISTER,
  1469. AT_NONE
  1470. )
  1471. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1472. if (INST_REG(0) == REG_A)
  1473. INST_RETURN(2, 0xCB, 0x0F)
  1474. if (INST_REG(0) == REG_B)
  1475. INST_RETURN(2, 0xCB, 0x08)
  1476. if (INST_REG(0) == REG_C)
  1477. INST_RETURN(2, 0xCB, 0x09)
  1478. if (INST_REG(0) == REG_D)
  1479. INST_RETURN(2, 0xCB, 0x0A)
  1480. if (INST_REG(0) == REG_E)
  1481. INST_RETURN(2, 0xCB, 0x0B)
  1482. if (INST_REG(0) == REG_H)
  1483. INST_RETURN(2, 0xCB, 0x0C)
  1484. if (INST_REG(0) == REG_L)
  1485. INST_RETURN(2, 0xCB, 0x0D)
  1486. INST_ERROR(ARG_VALUE)
  1487. }
  1488. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1489. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1490. INST_RETURN(2, 0xCB, 0x0E)
  1491. }
  1492. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1493. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0E)
  1494. }
  1495. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1496. if (INST_REG(1) == REG_A)
  1497. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0F)
  1498. if (INST_REG(1) == REG_B)
  1499. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x08)
  1500. if (INST_REG(1) == REG_C)
  1501. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x09)
  1502. if (INST_REG(1) == REG_D)
  1503. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0A)
  1504. if (INST_REG(1) == REG_E)
  1505. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0B)
  1506. if (INST_REG(1) == REG_H)
  1507. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0C)
  1508. if (INST_REG(1) == REG_L)
  1509. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x0D)
  1510. INST_ERROR(ARG_VALUE)
  1511. }
  1512. INST_ERROR(ARG_TYPE)
  1513. }
  1514. INST_FUNC(rrca)
  1515. {
  1516. INST_TAKES_NO_ARGS
  1517. INST_RETURN(1, 0x0F)
  1518. }
  1519. INST_FUNC(rrd)
  1520. {
  1521. INST_TAKES_NO_ARGS
  1522. INST_RETURN(2, 0xED, 0x67)
  1523. }
  1524. INST_FUNC(rst)
  1525. {
  1526. INST_TAKES_ARGS(
  1527. AT_IMMEDIATE,
  1528. AT_NONE,
  1529. AT_NONE
  1530. )
  1531. if (INST_TYPE(0) == AT_IMMEDIATE) {
  1532. if (INST_IMM(0).mask & IMM_RST)
  1533. INST_RETURN(1, 0xC7 + INST_IMM(0).uval)
  1534. INST_ERROR(ARG_VALUE)
  1535. }
  1536. INST_ERROR(ARG_TYPE)
  1537. }
  1538. INST_FUNC(sbc)
  1539. {
  1540. INST_TAKES_ARGS(
  1541. AT_REGISTER,
  1542. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1543. AT_NONE
  1544. )
  1545. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_REGISTER) {
  1546. if (INST_REG(0) == REG_A && INST_REG(1) == REG_A)
  1547. INST_RETURN(1, 0x9F)
  1548. if (INST_REG(0) == REG_A && INST_REG(1) == REG_B)
  1549. INST_RETURN(1, 0x98)
  1550. if (INST_REG(0) == REG_A && INST_REG(1) == REG_C)
  1551. INST_RETURN(1, 0x99)
  1552. if (INST_REG(0) == REG_A && INST_REG(1) == REG_D)
  1553. INST_RETURN(1, 0x9A)
  1554. if (INST_REG(0) == REG_A && INST_REG(1) == REG_E)
  1555. INST_RETURN(1, 0x9B)
  1556. if (INST_REG(0) == REG_A && INST_REG(1) == REG_H)
  1557. INST_RETURN(1, 0x9C)
  1558. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXH)
  1559. INST_RETURN(2, INST_IX_PREFIX, 0x9C)
  1560. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYH)
  1561. INST_RETURN(2, INST_IY_PREFIX, 0x9C)
  1562. if (INST_REG(0) == REG_A && INST_REG(1) == REG_L)
  1563. INST_RETURN(1, 0x9D)
  1564. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IXL)
  1565. INST_RETURN(2, INST_IX_PREFIX, 0x9D)
  1566. if (INST_REG(0) == REG_A && INST_REG(1) == REG_IYL)
  1567. INST_RETURN(2, INST_IY_PREFIX, 0x9D)
  1568. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_BC)
  1569. INST_RETURN(2, 0xED, 0x42)
  1570. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_DE)
  1571. INST_RETURN(2, 0xED, 0x52)
  1572. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_HL)
  1573. INST_RETURN(2, 0xED, 0x62)
  1574. if (INST_REG(0) == REG_HL && INST_REG(1) == REG_SP)
  1575. INST_RETURN(2, 0xED, 0x72)
  1576. INST_ERROR(ARG_VALUE)
  1577. }
  1578. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_IMMEDIATE) {
  1579. if (INST_REG(0) == REG_A && INST_IMM(1).mask & IMM_U8)
  1580. INST_RETURN(2, 0xDE, INST_IMM(1).uval)
  1581. INST_ERROR(ARG_VALUE)
  1582. }
  1583. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDIRECT &&
  1584. (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {
  1585. if (INST_REG(0) == REG_A)
  1586. INST_RETURN(1, 0x9E)
  1587. INST_ERROR(ARG_VALUE)
  1588. }
  1589. if (INST_TYPE(0) == AT_REGISTER && INST_TYPE(1) == AT_INDEXED) {
  1590. if (INST_REG(0) == REG_A)
  1591. INST_RETURN(3, INST_INDEX_PREFIX(1), 0x9E, INST_INDEX(1).offset)
  1592. INST_ERROR(ARG_VALUE)
  1593. }
  1594. INST_ERROR(ARG_TYPE)
  1595. }
  1596. INST_FUNC(scf)
  1597. {
  1598. INST_TAKES_NO_ARGS
  1599. INST_RETURN(1, 0x37)
  1600. }
  1601. INST_FUNC(set)
  1602. {
  1603. INST_TAKES_ARGS(
  1604. AT_IMMEDIATE,
  1605. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1606. AT_OPTIONAL|AT_REGISTER
  1607. )
  1608. if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_REGISTER) {
  1609. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_A)
  1610. INST_RETURN(2, 0xCB, 0xC7 + 8 * INST_IMM(0).uval)
  1611. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_B)
  1612. INST_RETURN(2, 0xCB, 0xC0 + 8 * INST_IMM(0).uval)
  1613. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_C)
  1614. INST_RETURN(2, 0xCB, 0xC1 + 8 * INST_IMM(0).uval)
  1615. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_D)
  1616. INST_RETURN(2, 0xCB, 0xC2 + 8 * INST_IMM(0).uval)
  1617. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_E)
  1618. INST_RETURN(2, 0xCB, 0xC3 + 8 * INST_IMM(0).uval)
  1619. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_H)
  1620. INST_RETURN(2, 0xCB, 0xC4 + 8 * INST_IMM(0).uval)
  1621. if (INST_IMM(0).mask & IMM_BIT && INST_REG(1) == REG_L)
  1622. INST_RETURN(2, 0xCB, 0xC5 + 8 * INST_IMM(0).uval)
  1623. INST_ERROR(ARG_VALUE)
  1624. }
  1625. if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDIRECT &&
  1626. (INST_INDIRECT(1).type == AT_REGISTER && INST_INDIRECT(1).addr.reg == REG_HL)) {
  1627. if (INST_IMM(0).mask & IMM_BIT)
  1628. INST_RETURN(2, 0xCB, 0xC6 + 8 * INST_IMM(0).uval)
  1629. INST_ERROR(ARG_VALUE)
  1630. }
  1631. if (INST_NARGS == 2 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED) {
  1632. if (INST_IMM(0).mask & IMM_BIT)
  1633. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC6 + 8 * INST_IMM(0).uval)
  1634. INST_ERROR(ARG_VALUE)
  1635. }
  1636. if (INST_NARGS == 3 && INST_TYPE(0) == AT_IMMEDIATE && INST_TYPE(1) == AT_INDEXED && INST_TYPE(2) == AT_REGISTER) {
  1637. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_A)
  1638. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC7 + 8 * INST_IMM(0).uval)
  1639. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_B)
  1640. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC0 + 8 * INST_IMM(0).uval)
  1641. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_C)
  1642. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC1 + 8 * INST_IMM(0).uval)
  1643. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_D)
  1644. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC2 + 8 * INST_IMM(0).uval)
  1645. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_E)
  1646. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC3 + 8 * INST_IMM(0).uval)
  1647. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_H)
  1648. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC4 + 8 * INST_IMM(0).uval)
  1649. if (INST_IMM(0).mask & IMM_BIT && INST_REG(2) == REG_L)
  1650. INST_RETURN(4, INST_INDEX_PREFIX(1), 0xCB, INST_INDEX(1).offset, 0xC5 + 8 * INST_IMM(0).uval)
  1651. INST_ERROR(ARG_VALUE)
  1652. }
  1653. INST_ERROR(ARG_TYPE)
  1654. }
  1655. INST_FUNC(sl1)
  1656. {
  1657. INST_TAKES_ARGS(
  1658. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1659. AT_OPTIONAL|AT_REGISTER,
  1660. AT_NONE
  1661. )
  1662. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1663. if (INST_REG(0) == REG_A)
  1664. INST_RETURN(2, 0xCB, 0x37)
  1665. if (INST_REG(0) == REG_B)
  1666. INST_RETURN(2, 0xCB, 0x30)
  1667. if (INST_REG(0) == REG_C)
  1668. INST_RETURN(2, 0xCB, 0x31)
  1669. if (INST_REG(0) == REG_D)
  1670. INST_RETURN(2, 0xCB, 0x32)
  1671. if (INST_REG(0) == REG_E)
  1672. INST_RETURN(2, 0xCB, 0x33)
  1673. if (INST_REG(0) == REG_H)
  1674. INST_RETURN(2, 0xCB, 0x34)
  1675. if (INST_REG(0) == REG_L)
  1676. INST_RETURN(2, 0xCB, 0x35)
  1677. INST_ERROR(ARG_VALUE)
  1678. }
  1679. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1680. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1681. INST_RETURN(2, 0xCB, 0x36)
  1682. }
  1683. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1684. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x36)
  1685. }
  1686. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1687. if (INST_REG(1) == REG_A)
  1688. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x37)
  1689. if (INST_REG(1) == REG_B)
  1690. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x30)
  1691. if (INST_REG(1) == REG_C)
  1692. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x31)
  1693. if (INST_REG(1) == REG_D)
  1694. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x32)
  1695. if (INST_REG(1) == REG_E)
  1696. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x33)
  1697. if (INST_REG(1) == REG_H)
  1698. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x34)
  1699. if (INST_REG(1) == REG_L)
  1700. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x35)
  1701. INST_ERROR(ARG_VALUE)
  1702. }
  1703. INST_ERROR(ARG_TYPE)
  1704. }
  1705. INST_FUNC(sla)
  1706. {
  1707. INST_TAKES_ARGS(
  1708. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1709. AT_OPTIONAL|AT_REGISTER,
  1710. AT_NONE
  1711. )
  1712. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1713. if (INST_REG(0) == REG_A)
  1714. INST_RETURN(2, 0xCB, 0x27)
  1715. if (INST_REG(0) == REG_B)
  1716. INST_RETURN(2, 0xCB, 0x20)
  1717. if (INST_REG(0) == REG_C)
  1718. INST_RETURN(2, 0xCB, 0x21)
  1719. if (INST_REG(0) == REG_D)
  1720. INST_RETURN(2, 0xCB, 0x22)
  1721. if (INST_REG(0) == REG_E)
  1722. INST_RETURN(2, 0xCB, 0x23)
  1723. if (INST_REG(0) == REG_H)
  1724. INST_RETURN(2, 0xCB, 0x24)
  1725. if (INST_REG(0) == REG_L)
  1726. INST_RETURN(2, 0xCB, 0x25)
  1727. INST_ERROR(ARG_VALUE)
  1728. }
  1729. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1730. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1731. INST_RETURN(2, 0xCB, 0x26)
  1732. }
  1733. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1734. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x26)
  1735. }
  1736. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1737. if (INST_REG(1) == REG_A)
  1738. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x27)
  1739. if (INST_REG(1) == REG_B)
  1740. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x20)
  1741. if (INST_REG(1) == REG_C)
  1742. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x21)
  1743. if (INST_REG(1) == REG_D)
  1744. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x22)
  1745. if (INST_REG(1) == REG_E)
  1746. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x23)
  1747. if (INST_REG(1) == REG_H)
  1748. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x24)
  1749. if (INST_REG(1) == REG_L)
  1750. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x25)
  1751. INST_ERROR(ARG_VALUE)
  1752. }
  1753. INST_ERROR(ARG_TYPE)
  1754. }
  1755. INST_FUNC(sll)
  1756. {
  1757. INST_TAKES_ARGS(
  1758. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1759. AT_OPTIONAL|AT_REGISTER,
  1760. AT_NONE
  1761. )
  1762. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1763. if (INST_REG(0) == REG_A)
  1764. INST_RETURN(2, 0xCB, 0x37)
  1765. if (INST_REG(0) == REG_B)
  1766. INST_RETURN(2, 0xCB, 0x30)
  1767. if (INST_REG(0) == REG_C)
  1768. INST_RETURN(2, 0xCB, 0x31)
  1769. if (INST_REG(0) == REG_D)
  1770. INST_RETURN(2, 0xCB, 0x32)
  1771. if (INST_REG(0) == REG_E)
  1772. INST_RETURN(2, 0xCB, 0x33)
  1773. if (INST_REG(0) == REG_H)
  1774. INST_RETURN(2, 0xCB, 0x34)
  1775. if (INST_REG(0) == REG_L)
  1776. INST_RETURN(2, 0xCB, 0x35)
  1777. INST_ERROR(ARG_VALUE)
  1778. }
  1779. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT) {
  1780. INST_RETURN(2, 0xCB, 0x36)
  1781. }
  1782. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1783. if (INST_REG(1) == REG_A)
  1784. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x37)
  1785. if (INST_REG(1) == REG_B)
  1786. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x30)
  1787. if (INST_REG(1) == REG_C)
  1788. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x31)
  1789. if (INST_REG(1) == REG_D)
  1790. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x32)
  1791. if (INST_REG(1) == REG_E)
  1792. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x33)
  1793. if (INST_REG(1) == REG_H)
  1794. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x34)
  1795. if (INST_REG(1) == REG_L)
  1796. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x35)
  1797. INST_ERROR(ARG_VALUE)
  1798. }
  1799. INST_ERROR(ARG_TYPE)
  1800. }
  1801. INST_FUNC(sls)
  1802. {
  1803. INST_TAKES_ARGS(
  1804. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1805. AT_OPTIONAL|AT_REGISTER,
  1806. AT_NONE
  1807. )
  1808. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1809. if (INST_REG(0) == REG_A)
  1810. INST_RETURN(2, 0xCB, 0x37)
  1811. if (INST_REG(0) == REG_B)
  1812. INST_RETURN(2, 0xCB, 0x30)
  1813. if (INST_REG(0) == REG_C)
  1814. INST_RETURN(2, 0xCB, 0x31)
  1815. if (INST_REG(0) == REG_D)
  1816. INST_RETURN(2, 0xCB, 0x32)
  1817. if (INST_REG(0) == REG_E)
  1818. INST_RETURN(2, 0xCB, 0x33)
  1819. if (INST_REG(0) == REG_H)
  1820. INST_RETURN(2, 0xCB, 0x34)
  1821. if (INST_REG(0) == REG_L)
  1822. INST_RETURN(2, 0xCB, 0x35)
  1823. INST_ERROR(ARG_VALUE)
  1824. }
  1825. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT) {
  1826. INST_RETURN(2, 0xCB, 0x36)
  1827. }
  1828. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1829. if (INST_REG(1) == REG_A)
  1830. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x37)
  1831. if (INST_REG(1) == REG_B)
  1832. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x30)
  1833. if (INST_REG(1) == REG_C)
  1834. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x31)
  1835. if (INST_REG(1) == REG_D)
  1836. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x32)
  1837. if (INST_REG(1) == REG_E)
  1838. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x33)
  1839. if (INST_REG(1) == REG_H)
  1840. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x34)
  1841. if (INST_REG(1) == REG_L)
  1842. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x35)
  1843. INST_ERROR(ARG_VALUE)
  1844. }
  1845. INST_ERROR(ARG_TYPE)
  1846. }
  1847. INST_FUNC(sra)
  1848. {
  1849. INST_TAKES_ARGS(
  1850. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1851. AT_OPTIONAL|AT_REGISTER,
  1852. AT_NONE
  1853. )
  1854. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1855. if (INST_REG(0) == REG_A)
  1856. INST_RETURN(2, 0xCB, 0x2F)
  1857. if (INST_REG(0) == REG_B)
  1858. INST_RETURN(2, 0xCB, 0x28)
  1859. if (INST_REG(0) == REG_C)
  1860. INST_RETURN(2, 0xCB, 0x29)
  1861. if (INST_REG(0) == REG_D)
  1862. INST_RETURN(2, 0xCB, 0x2A)
  1863. if (INST_REG(0) == REG_E)
  1864. INST_RETURN(2, 0xCB, 0x2B)
  1865. if (INST_REG(0) == REG_H)
  1866. INST_RETURN(2, 0xCB, 0x2C)
  1867. if (INST_REG(0) == REG_L)
  1868. INST_RETURN(2, 0xCB, 0x2D)
  1869. INST_ERROR(ARG_VALUE)
  1870. }
  1871. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1872. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1873. INST_RETURN(2, 0xCB, 0x2E)
  1874. }
  1875. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1876. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2E)
  1877. }
  1878. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1879. if (INST_REG(1) == REG_A)
  1880. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2F)
  1881. if (INST_REG(1) == REG_B)
  1882. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x28)
  1883. if (INST_REG(1) == REG_C)
  1884. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x29)
  1885. if (INST_REG(1) == REG_D)
  1886. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2A)
  1887. if (INST_REG(1) == REG_E)
  1888. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2B)
  1889. if (INST_REG(1) == REG_H)
  1890. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2C)
  1891. if (INST_REG(1) == REG_L)
  1892. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x2D)
  1893. INST_ERROR(ARG_VALUE)
  1894. }
  1895. INST_ERROR(ARG_TYPE)
  1896. }
  1897. INST_FUNC(srl)
  1898. {
  1899. INST_TAKES_ARGS(
  1900. AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1901. AT_OPTIONAL|AT_REGISTER,
  1902. AT_NONE
  1903. )
  1904. if (INST_NARGS == 1 && INST_TYPE(0) == AT_REGISTER) {
  1905. if (INST_REG(0) == REG_A)
  1906. INST_RETURN(2, 0xCB, 0x3F)
  1907. if (INST_REG(0) == REG_B)
  1908. INST_RETURN(2, 0xCB, 0x38)
  1909. if (INST_REG(0) == REG_C)
  1910. INST_RETURN(2, 0xCB, 0x39)
  1911. if (INST_REG(0) == REG_D)
  1912. INST_RETURN(2, 0xCB, 0x3A)
  1913. if (INST_REG(0) == REG_E)
  1914. INST_RETURN(2, 0xCB, 0x3B)
  1915. if (INST_REG(0) == REG_H)
  1916. INST_RETURN(2, 0xCB, 0x3C)
  1917. if (INST_REG(0) == REG_L)
  1918. INST_RETURN(2, 0xCB, 0x3D)
  1919. INST_ERROR(ARG_VALUE)
  1920. }
  1921. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDIRECT &&
  1922. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1923. INST_RETURN(2, 0xCB, 0x3E)
  1924. }
  1925. if (INST_NARGS == 1 && INST_TYPE(0) == AT_INDEXED) {
  1926. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3E)
  1927. }
  1928. if (INST_NARGS == 2 && INST_TYPE(0) == AT_INDEXED && INST_TYPE(1) == AT_REGISTER) {
  1929. if (INST_REG(1) == REG_A)
  1930. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3F)
  1931. if (INST_REG(1) == REG_B)
  1932. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x38)
  1933. if (INST_REG(1) == REG_C)
  1934. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x39)
  1935. if (INST_REG(1) == REG_D)
  1936. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3A)
  1937. if (INST_REG(1) == REG_E)
  1938. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3B)
  1939. if (INST_REG(1) == REG_H)
  1940. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3C)
  1941. if (INST_REG(1) == REG_L)
  1942. INST_RETURN(4, INST_INDEX_PREFIX(0), 0xCB, INST_INDEX(0).offset, 0x3D)
  1943. INST_ERROR(ARG_VALUE)
  1944. }
  1945. INST_ERROR(ARG_TYPE)
  1946. }
  1947. INST_FUNC(sub)
  1948. {
  1949. INST_TAKES_ARGS(
  1950. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1951. AT_NONE,
  1952. AT_NONE
  1953. )
  1954. if (INST_TYPE(0) == AT_REGISTER) {
  1955. if (INST_REG(0) == REG_A)
  1956. INST_RETURN(1, 0x97)
  1957. if (INST_REG(0) == REG_B)
  1958. INST_RETURN(1, 0x90)
  1959. if (INST_REG(0) == REG_C)
  1960. INST_RETURN(1, 0x91)
  1961. if (INST_REG(0) == REG_D)
  1962. INST_RETURN(1, 0x92)
  1963. if (INST_REG(0) == REG_E)
  1964. INST_RETURN(1, 0x93)
  1965. if (INST_REG(0) == REG_H)
  1966. INST_RETURN(1, 0x94)
  1967. if (INST_REG(0) == REG_IXH)
  1968. INST_RETURN(2, INST_IX_PREFIX, 0x94)
  1969. if (INST_REG(0) == REG_IYH)
  1970. INST_RETURN(2, INST_IY_PREFIX, 0x94)
  1971. if (INST_REG(0) == REG_L)
  1972. INST_RETURN(1, 0x95)
  1973. if (INST_REG(0) == REG_IXL)
  1974. INST_RETURN(2, INST_IX_PREFIX, 0x95)
  1975. if (INST_REG(0) == REG_IYL)
  1976. INST_RETURN(2, INST_IY_PREFIX, 0x95)
  1977. INST_ERROR(ARG_VALUE)
  1978. }
  1979. if (INST_TYPE(0) == AT_IMMEDIATE) {
  1980. if (INST_IMM(0).mask & IMM_U8)
  1981. INST_RETURN(2, 0xD6, INST_IMM(0).uval)
  1982. INST_ERROR(ARG_VALUE)
  1983. }
  1984. if (INST_TYPE(0) == AT_INDIRECT &&
  1985. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  1986. INST_RETURN(1, 0x96)
  1987. }
  1988. if (INST_TYPE(0) == AT_INDEXED) {
  1989. INST_RETURN(3, INST_INDEX_PREFIX(0), 0x96, INST_INDEX(0).offset)
  1990. }
  1991. INST_ERROR(ARG_TYPE)
  1992. }
  1993. INST_FUNC(xor)
  1994. {
  1995. INST_TAKES_ARGS(
  1996. AT_IMMEDIATE|AT_INDEXED|AT_INDIRECT|AT_REGISTER,
  1997. AT_NONE,
  1998. AT_NONE
  1999. )
  2000. if (INST_TYPE(0) == AT_REGISTER) {
  2001. if (INST_REG(0) == REG_A)
  2002. INST_RETURN(1, 0xAF)
  2003. if (INST_REG(0) == REG_B)
  2004. INST_RETURN(1, 0xA8)
  2005. if (INST_REG(0) == REG_C)
  2006. INST_RETURN(1, 0xA9)
  2007. if (INST_REG(0) == REG_D)
  2008. INST_RETURN(1, 0xAA)
  2009. if (INST_REG(0) == REG_E)
  2010. INST_RETURN(1, 0xAB)
  2011. if (INST_REG(0) == REG_H)
  2012. INST_RETURN(1, 0xAC)
  2013. if (INST_REG(0) == REG_IXH)
  2014. INST_RETURN(2, INST_IX_PREFIX, 0xAC)
  2015. if (INST_REG(0) == REG_IYH)
  2016. INST_RETURN(2, INST_IY_PREFIX, 0xAC)
  2017. if (INST_REG(0) == REG_L)
  2018. INST_RETURN(1, 0xAD)
  2019. if (INST_REG(0) == REG_IXL)
  2020. INST_RETURN(2, INST_IX_PREFIX, 0xAD)
  2021. if (INST_REG(0) == REG_IYL)
  2022. INST_RETURN(2, INST_IY_PREFIX, 0xAD)
  2023. INST_ERROR(ARG_VALUE)
  2024. }
  2025. if (INST_TYPE(0) == AT_IMMEDIATE) {
  2026. if (INST_IMM(0).mask & IMM_U8)
  2027. INST_RETURN(2, 0xEE, INST_IMM(0).uval)
  2028. INST_ERROR(ARG_VALUE)
  2029. }
  2030. if (INST_TYPE(0) == AT_INDIRECT &&
  2031. (INST_INDIRECT(0).type == AT_REGISTER && INST_INDIRECT(0).addr.reg == REG_HL)) {
  2032. INST_RETURN(1, 0xAE)
  2033. }
  2034. if (INST_TYPE(0) == AT_INDEXED) {
  2035. INST_RETURN(3, INST_INDEX_PREFIX(0), 0xAE, INST_INDEX(0).offset)
  2036. }
  2037. INST_ERROR(ARG_TYPE)
  2038. }
  2039. /* @AUTOGEN_INST_BLOCK_END */
  2040. /*
  2041. Return the relevant ASMInstParser function for the given encoded mnemonic.
  2042. */
  2043. static ASMInstParser lookup_parser(uint32_t key)
  2044. {
  2045. /* @AUTOGEN_LOOKUP_BLOCK_START */
  2046. HANDLE(adc)
  2047. HANDLE(add)
  2048. HANDLE(and)
  2049. HANDLE(bit)
  2050. HANDLE(call)
  2051. HANDLE(ccf)
  2052. HANDLE(cp)
  2053. HANDLE(cpd)
  2054. HANDLE(cpdr)
  2055. HANDLE(cpi)
  2056. HANDLE(cpir)
  2057. HANDLE(cpl)
  2058. HANDLE(daa)
  2059. HANDLE(dec)
  2060. HANDLE(di)
  2061. HANDLE(djnz)
  2062. HANDLE(ei)
  2063. HANDLE(ex)
  2064. HANDLE(exx)
  2065. HANDLE(halt)
  2066. HANDLE(im)
  2067. HANDLE(in)
  2068. HANDLE(inc)
  2069. HANDLE(ind)
  2070. HANDLE(indr)
  2071. HANDLE(ini)
  2072. HANDLE(inir)
  2073. HANDLE(jp)
  2074. HANDLE(jr)
  2075. HANDLE(ld)
  2076. HANDLE(ldd)
  2077. HANDLE(lddr)
  2078. HANDLE(ldi)
  2079. HANDLE(ldir)
  2080. HANDLE(neg)
  2081. HANDLE(nop)
  2082. HANDLE(or)
  2083. HANDLE(otdr)
  2084. HANDLE(otir)
  2085. HANDLE(out)
  2086. HANDLE(outd)
  2087. HANDLE(outi)
  2088. HANDLE(pop)
  2089. HANDLE(push)
  2090. HANDLE(res)
  2091. HANDLE(ret)
  2092. HANDLE(reti)
  2093. HANDLE(retn)
  2094. HANDLE(rl)
  2095. HANDLE(rla)
  2096. HANDLE(rlc)
  2097. HANDLE(rlca)
  2098. HANDLE(rld)
  2099. HANDLE(rr)
  2100. HANDLE(rra)
  2101. HANDLE(rrc)
  2102. HANDLE(rrca)
  2103. HANDLE(rrd)
  2104. HANDLE(rst)
  2105. HANDLE(sbc)
  2106. HANDLE(scf)
  2107. HANDLE(set)
  2108. HANDLE(sl1)
  2109. HANDLE(sla)
  2110. HANDLE(sll)
  2111. HANDLE(sls)
  2112. HANDLE(sra)
  2113. HANDLE(srl)
  2114. HANDLE(sub)
  2115. HANDLE(xor)
  2116. /* @AUTOGEN_LOOKUP_BLOCK_END */
  2117. return NULL;
  2118. }