Subversion Repositories Kolibri OS

Rev

Rev 31 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.  
  2. ; flat assembler core
  3. ; Copyright (c) 1999-2006, Tomasz Grysztar.
  4. ; All rights reserved.
  5.  
  6. simple_instruction_except64:
  7.         cmp     [code_type],64
  8.         je      illegal_instruction
  9. simple_instruction:
  10.         stos    byte [edi]
  11.         jmp     instruction_assembled
  12. simple_instruction_only64:
  13.         cmp     [code_type],64
  14.         jne     illegal_instruction
  15.         jmp     simple_instruction
  16. simple_instruction_16bit_except64:
  17.         cmp     [code_type],64
  18.         je      illegal_instruction
  19. simple_instruction_16bit:
  20.         cmp     [code_type],16
  21.         jne     size_prefix
  22.         stos    byte [edi]
  23.         jmp     instruction_assembled
  24.       size_prefix:
  25.         mov     ah,al
  26.         mov     al,66h
  27.         stos    word [edi]
  28.         jmp     instruction_assembled
  29. simple_instruction_32bit_except64:
  30.         cmp     [code_type],64
  31.         je      illegal_instruction
  32. simple_instruction_32bit:
  33.         cmp     [code_type],16
  34.         je      size_prefix
  35.         stos    byte [edi]
  36.         jmp     instruction_assembled
  37. simple_instruction_64bit:
  38.         cmp     [code_type],64
  39.         jne     illegal_instruction
  40.         mov     ah,al
  41.         mov     al,48h
  42.         stos    word [edi]
  43.         jmp     instruction_assembled
  44. simple_extended_instruction:
  45.         mov     ah,al
  46.         mov     al,0Fh
  47.         stos    word [edi]
  48.         jmp     instruction_assembled
  49. prefix_instruction:
  50.         stos    byte [edi]
  51.         or      [prefixed_instruction],-1
  52.         jmp     continue_line
  53. segment_prefix:
  54.         mov     ah,al
  55.         shr     ah,4
  56.         cmp     ah,6
  57.         jne     illegal_instruction
  58.         and     al,1111b
  59.         mov     [segment_register],al
  60.         call    store_segment_prefix
  61.         or      [prefixed_instruction],-1
  62.         jmp     continue_line
  63. int_instruction:
  64.         lods    byte [esi]
  65.         call    get_size_operator
  66.         cmp     ah,1
  67.         ja      invalid_operand_size
  68.         cmp     al,'('
  69.         jne     invalid_operand
  70.         call    get_byte_value
  71.         mov     ah,al
  72.         mov     al,0CDh
  73.         stos    word [edi]
  74.         jmp     instruction_assembled
  75. iret_instruction:
  76.         cmp     [code_type],64
  77.         jne     simple_instruction
  78.         call    operand_64bit
  79.         jmp     simple_instruction
  80. aa_instruction:
  81.         cmp     [code_type],64
  82.         je      illegal_instruction
  83.         push    eax
  84.         mov     bl,10
  85.         cmp     byte [esi],'('
  86.         jne     aa_store
  87.         inc     esi
  88.         xor     al,al
  89.         xchg    al,[operand_size]
  90.         cmp     al,1
  91.         ja      invalid_operand_size
  92.         call    get_byte_value
  93.         mov     bl,al
  94.       aa_store:
  95.         cmp     [operand_size],0
  96.         jne     invalid_operand
  97.         pop     eax
  98.         mov     ah,bl
  99.         stos    word [edi]
  100.         jmp     instruction_assembled
  101.  
  102. basic_instruction:
  103.         mov     [base_code],al
  104.         lods    byte [esi]
  105.         call    get_size_operator
  106.         cmp     al,10h
  107.         je      basic_reg
  108.         cmp     al,'['
  109.         jne     invalid_operand
  110.       basic_mem:
  111.         call    get_address
  112.         push    edx bx cx
  113.         lods    byte [esi]
  114.         cmp     al,','
  115.         jne     invalid_operand
  116.         lods    byte [esi]
  117.         call    get_size_operator
  118.         cmp     al,'('
  119.         je      basic_mem_imm
  120.         cmp     al,10h
  121.         jne     invalid_operand
  122.       basic_mem_reg:
  123.         lods    byte [esi]
  124.         call    convert_register
  125.         mov     [postbyte_register],al
  126.         pop     cx bx edx
  127.         mov     al,ah
  128.         cmp     al,1
  129.         je      basic_mem_reg_8bit
  130.         call    operand_autodetect
  131.         inc     [base_code]
  132.       basic_mem_reg_8bit:
  133.         call    store_instruction
  134.         jmp     instruction_assembled
  135.       basic_mem_imm:
  136.         mov     al,[operand_size]
  137.         cmp     al,1
  138.         je      basic_mem_imm_8bit
  139.         cmp     al,2
  140.         je      basic_mem_imm_16bit
  141.         cmp     al,4
  142.         je      basic_mem_imm_32bit
  143.         cmp     al,8
  144.         je      basic_mem_imm_64bit
  145.         or      al,al
  146.         jnz     invalid_operand_size
  147.         cmp     [error_line],0
  148.         jne     basic_mem_imm_8bit
  149.         mov     eax,[current_line]
  150.         mov     [error_line],eax
  151.         mov     [error],operand_size_not_specified
  152.       basic_mem_imm_8bit:
  153.         call    get_byte_value
  154.         mov     byte [value],al
  155.         mov     al,[base_code]
  156.         shr     al,3
  157.         mov     [postbyte_register],al
  158.         pop     cx bx edx
  159.         mov     [base_code],80h
  160.         call    store_instruction_with_imm8
  161.         jmp     instruction_assembled
  162.       basic_mem_imm_16bit:
  163.         call    operand_16bit
  164.         call    get_word_value
  165.         mov     word [value],ax
  166.         mov     al,[base_code]
  167.         shr     al,3
  168.         mov     [postbyte_register],al
  169.         pop     cx bx edx
  170.         cmp     [value_type],0
  171.         jne     basic_mem_imm_16bit_store
  172.         cmp     [size_declared],0
  173.         jne     basic_mem_imm_16bit_store
  174.         cmp     word [value],80h
  175.         jb      basic_mem_simm_8bit
  176.         cmp     word [value],-80h
  177.         jae     basic_mem_simm_8bit
  178.       basic_mem_imm_16bit_store:
  179.         mov     [base_code],81h
  180.         call    store_instruction_with_imm16
  181.         jmp     instruction_assembled
  182.       basic_mem_simm_8bit:
  183.         mov     [base_code],83h
  184.         call    store_instruction_with_imm8
  185.         jmp     instruction_assembled
  186.       basic_mem_imm_32bit:
  187.         call    operand_32bit
  188.         call    get_dword_value
  189.       basic_mem_imm_32bit_ok:
  190.         mov     dword [value],eax
  191.         mov     al,[base_code]
  192.         shr     al,3
  193.         mov     [postbyte_register],al
  194.         pop     cx bx edx
  195.         cmp     [value_type],0
  196.         jne     basic_mem_imm_32bit_store
  197.         cmp     [size_declared],0
  198.         jne     basic_mem_imm_32bit_store
  199.         cmp     dword [value],80h
  200.         jb      basic_mem_simm_8bit
  201.         cmp     dword [value],-80h
  202.         jae     basic_mem_simm_8bit
  203.       basic_mem_imm_32bit_store:
  204.         mov     [base_code],81h
  205.         call    store_instruction_with_imm32
  206.         jmp     instruction_assembled
  207.       basic_mem_imm_64bit:
  208.         cmp     [size_declared],0
  209.         jne     long_immediate_not_encodable
  210.         call    operand_64bit
  211.         call    get_simm32
  212.         cmp     [value_type],4
  213.         jae     long_immediate_not_encodable
  214.         jmp     basic_mem_imm_32bit_ok
  215.       get_simm32:
  216.         call    get_qword_value
  217.         mov     ecx,edx
  218.         cdq
  219.         cmp     ecx,edx
  220.         jne     value_out_of_range
  221.         ret
  222.       basic_reg:
  223.         lods    byte [esi]
  224.         call    convert_register
  225.         mov     [postbyte_register],al
  226.         lods    byte [esi]
  227.         cmp     al,','
  228.         jne     invalid_operand
  229.         lods    byte [esi]
  230.         call    get_size_operator
  231.         cmp     al,10h
  232.         je      basic_reg_reg
  233.         cmp     al,'('
  234.         je      basic_reg_imm
  235.         cmp     al,'['
  236.         jne     invalid_operand
  237.       basic_reg_mem:
  238.         call    get_address
  239.         mov     al,[operand_size]
  240.         cmp     al,1
  241.         je      basic_reg_mem_8bit
  242.         call    operand_autodetect
  243.         add     [base_code],3
  244.         call    store_instruction
  245.         jmp     instruction_assembled
  246.       basic_reg_mem_8bit:
  247.         add     [base_code],2
  248.         call    store_instruction
  249.         jmp     instruction_assembled
  250.       basic_reg_reg:
  251.         lods    byte [esi]
  252.         call    convert_register
  253.         mov     bl,[postbyte_register]
  254.         mov     [postbyte_register],al
  255.         mov     al,ah
  256.         cmp     al,1
  257.         je      basic_reg_reg_8bit
  258.         call    operand_autodetect
  259.         inc     [base_code]
  260.       basic_reg_reg_8bit:
  261.         call    store_nomem_instruction
  262.         jmp     instruction_assembled
  263.       basic_reg_imm:
  264.         mov     al,[operand_size]
  265.         cmp     al,1
  266.         je      basic_reg_imm_8bit
  267.         cmp     al,2
  268.         je      basic_reg_imm_16bit
  269.         cmp     al,4
  270.         je      basic_reg_imm_32bit
  271.         cmp     al,8
  272.         je      basic_reg_imm_64bit
  273.         or      al,al
  274.         jnz     invalid_operand_size
  275.         cmp     [error_line],0
  276.         jne     basic_reg_imm_32bit
  277.         mov     eax,[current_line]
  278.         mov     [error_line],eax
  279.         mov     [error],operand_size_not_specified
  280.         jmp     basic_reg_imm_32bit
  281.       basic_reg_imm_8bit:
  282.         call    get_byte_value
  283.         mov     dl,al
  284.         mov     bl,[base_code]
  285.         shr     bl,3
  286.         xchg    bl,[postbyte_register]
  287.         or      bl,bl
  288.         jz      basic_al_imm
  289.         mov     [base_code],80h
  290.         call    store_nomem_instruction
  291.         mov     al,dl
  292.         stos    byte [edi]
  293.         jmp     instruction_assembled
  294.       basic_al_imm:
  295.         mov     al,[base_code]
  296.         add     al,4
  297.         stos    byte [edi]
  298.         mov     al,dl
  299.         stos    byte [edi]
  300.         jmp     instruction_assembled
  301.       basic_reg_imm_16bit:
  302.         call    operand_16bit
  303.         call    get_word_value
  304.         mov     dx,ax
  305.         mov     bl,[base_code]
  306.         shr     bl,3
  307.         xchg    bl,[postbyte_register]
  308.         cmp     [value_type],0
  309.         jne     basic_reg_imm_16bit_store
  310.         cmp     [size_declared],0
  311.         jne     basic_reg_imm_16bit_store
  312.         cmp     dx,80h
  313.         jb      basic_reg_simm_8bit
  314.         cmp     dx,-80h
  315.         jae     basic_reg_simm_8bit
  316.       basic_reg_imm_16bit_store:
  317.         or      bl,bl
  318.         jz      basic_ax_imm
  319.         mov     [base_code],81h
  320.         call    store_nomem_instruction
  321.         mov     ax,dx
  322.         call    mark_relocation
  323.         stos    word [edi]
  324.         jmp     instruction_assembled
  325.       basic_reg_simm_8bit:
  326.         mov     [base_code],83h
  327.         call    store_nomem_instruction
  328.         mov     al,dl
  329.         stos    byte [edi]
  330.         jmp     instruction_assembled
  331.       basic_ax_imm:
  332.         add     [base_code],5
  333.         call    store_instruction_code
  334.         mov     ax,dx
  335.         call    mark_relocation
  336.         stos    word [edi]
  337.         jmp     instruction_assembled
  338.       basic_reg_imm_32bit:
  339.         call    operand_32bit
  340.         call    get_dword_value
  341.       basic_reg_imm_32bit_ok:
  342.         mov     edx,eax
  343.         mov     bl,[base_code]
  344.         shr     bl,3
  345.         xchg    bl,[postbyte_register]
  346.         cmp     [value_type],0
  347.         jne     basic_reg_imm_32bit_store
  348.         cmp     [size_declared],0
  349.         jne     basic_reg_imm_32bit_store
  350.         cmp     edx,80h
  351.         jb      basic_reg_simm_8bit
  352.         cmp     edx,-80h
  353.         jae     basic_reg_simm_8bit
  354.       basic_reg_imm_32bit_store:
  355.         or      bl,bl
  356.         jz      basic_eax_imm
  357.         mov     [base_code],81h
  358.         call    store_nomem_instruction
  359.         mov     eax,edx
  360.         call    mark_relocation
  361.         stos    dword [edi]
  362.         jmp     instruction_assembled
  363.       basic_eax_imm:
  364.         add     [base_code],5
  365.         call    store_instruction_code
  366.         mov     eax,edx
  367.         call    mark_relocation
  368.         stos    dword [edi]
  369.         jmp     instruction_assembled
  370.       basic_reg_imm_64bit:
  371.         cmp     [size_declared],0
  372.         jne     long_immediate_not_encodable
  373.         call    operand_64bit
  374.         call    get_simm32
  375.         cmp     [value_type],4
  376.         jae     long_immediate_not_encodable
  377.         jmp     basic_reg_imm_32bit_ok
  378. single_operand_instruction:
  379.         mov     [base_code],0F6h
  380.         mov     [postbyte_register],al
  381.         lods    byte [esi]
  382.         call    get_size_operator
  383.         cmp     al,10h
  384.         je      single_reg
  385.         cmp     al,'['
  386.         jne     invalid_operand
  387.       single_mem:
  388.         call    get_address
  389.         mov     al,[operand_size]
  390.         cmp     al,1
  391.         je      single_mem_8bit
  392.         jb      single_mem_nosize
  393.         call    operand_autodetect
  394.         inc     [base_code]
  395.         call    store_instruction
  396.         jmp     instruction_assembled
  397.       single_mem_nosize:
  398.         cmp     [error_line],0
  399.         jne     single_mem_8bit
  400.         mov     eax,[current_line]
  401.         mov     [error_line],eax
  402.         mov     [error],operand_size_not_specified
  403.       single_mem_8bit:
  404.         call    store_instruction
  405.         jmp     instruction_assembled
  406.       single_reg:
  407.         lods    byte [esi]
  408.         call    convert_register
  409.         mov     bl,al
  410.         mov     al,ah
  411.         cmp     al,1
  412.         je      single_reg_8bit
  413.         call    operand_autodetect
  414.         inc     [base_code]
  415.       single_reg_8bit:
  416.         call    store_nomem_instruction
  417.         jmp     instruction_assembled
  418. mov_instruction:
  419.         mov     [base_code],88h
  420.         lods    byte [esi]
  421.         call    get_size_operator
  422.         cmp     al,10h
  423.         je      mov_reg
  424.         cmp     al,'['
  425.         jne     invalid_operand
  426.       mov_mem:
  427.         call    get_address
  428.         push    edx bx cx
  429.         lods    byte [esi]
  430.         cmp     al,','
  431.         jne     invalid_operand
  432.         lods    byte [esi]
  433.         call    get_size_operator
  434.         cmp     al,'('
  435.         je      mov_mem_imm
  436.         cmp     al,10h
  437.         jne     invalid_operand
  438.       mov_mem_reg:
  439.         lods    byte [esi]
  440.         cmp     al,60h
  441.         jb      mov_mem_general_reg
  442.         cmp     al,70h
  443.         jb      mov_mem_sreg
  444.       mov_mem_general_reg:
  445.         call    convert_register
  446.         mov     [postbyte_register],al
  447.         pop     cx bx edx
  448.         cmp     ah,1
  449.         je      mov_mem_reg_8bit
  450.         mov     al,ah
  451.         call    operand_autodetect
  452.         mov     al,[postbyte_register]
  453.         or      al,bl
  454.         or      al,bh
  455.         jz      mov_mem_ax
  456.         inc     [base_code]
  457.         call    store_instruction
  458.         jmp     instruction_assembled
  459.       mov_mem_reg_8bit:
  460.         or      al,bl
  461.         or      al,bh
  462.         jz      mov_mem_al
  463.         call    store_instruction
  464.         jmp     instruction_assembled
  465.       mov_mem_al:
  466.         test    ch,22h
  467.         jnz     mov_mem_address16_al
  468.         test    ch,44h
  469.         jnz     mov_mem_address32_al
  470.         test    ch,88h
  471.         jnz     mov_mem_address64_al
  472.         or      ch,ch
  473.         jnz     invalid_address_size
  474.         cmp     [code_type],64
  475.         je      mov_mem_address64_al
  476.         cmp     [code_type],32
  477.         je      mov_mem_address32_al
  478.         cmp     edx,10000h
  479.         jb      mov_mem_address16_al
  480.       mov_mem_address32_al:
  481.         call    store_segment_prefix_if_necessary
  482.         call    address_32bit_prefix
  483.         mov     [base_code],0A2h
  484.       store_mov_address32:
  485.         call    store_instruction_code
  486.         push    instruction_assembled
  487.         jmp     store_address_32bit_value
  488.       mov_mem_address16_al:
  489.         call    store_segment_prefix_if_necessary
  490.         call    address_16bit_prefix
  491.         mov     [base_code],0A2h
  492.       store_mov_address16:
  493.         cmp     [code_type],64
  494.         je      invalid_address
  495.         call    store_instruction_code
  496.         mov     eax,edx
  497.         stos    word [edi]
  498.         cmp     edx,10000h
  499.         jge     value_out_of_range
  500.         jmp     instruction_assembled
  501.       mov_mem_address64_al:
  502.         call    store_segment_prefix_if_necessary
  503.         mov     [base_code],0A2h
  504.       store_mov_address64:
  505.         call    store_instruction_code
  506.         push    instruction_assembled
  507.         jmp     store_address_64bit_value
  508.       mov_mem_ax:
  509.         test    ch,22h
  510.         jnz     mov_mem_address16_ax
  511.         test    ch,44h
  512.         jnz     mov_mem_address32_ax
  513.         test    ch,88h
  514.         jnz     mov_mem_address64_ax
  515.         or      ch,ch
  516.         jnz     invalid_address_size
  517.         cmp     [code_type],64
  518.         je      mov_mem_address64_ax
  519.         cmp     [code_type],32
  520.         je      mov_mem_address32_ax
  521.         cmp     edx,10000h
  522.         jb      mov_mem_address16_ax
  523.       mov_mem_address32_ax:
  524.         call    store_segment_prefix_if_necessary
  525.         call    address_32bit_prefix
  526.         mov     [base_code],0A3h
  527.         jmp     store_mov_address32
  528.       mov_mem_address16_ax:
  529.         call    store_segment_prefix_if_necessary
  530.         call    address_16bit_prefix
  531.         mov     [base_code],0A3h
  532.         jmp     store_mov_address16
  533.       mov_mem_address64_ax:
  534.         call    store_segment_prefix_if_necessary
  535.         mov     [base_code],0A3h
  536.         jmp     store_mov_address64
  537.       mov_mem_sreg:
  538.         sub     al,61h
  539.         mov     [postbyte_register],al
  540.         pop     cx bx edx
  541.         mov     ah,[operand_size]
  542.         or      ah,ah
  543.         jz      mov_mem_sreg_store
  544.         cmp     ah,2
  545.         jne     invalid_operand_size
  546.       mov_mem_sreg_store:
  547.         mov     [base_code],8Ch
  548.         call    store_instruction
  549.         jmp     instruction_assembled
  550.       mov_mem_imm:
  551.         mov     al,[operand_size]
  552.         cmp     al,1
  553.         je      mov_mem_imm_8bit
  554.         cmp     al,2
  555.         je      mov_mem_imm_16bit
  556.         cmp     al,4
  557.         je      mov_mem_imm_32bit
  558.         cmp     al,8
  559.         je      mov_mem_imm_64bit
  560.         or      al,al
  561.         jnz     invalid_operand_size
  562.         cmp     [error_line],0
  563.         jne     mov_mem_imm_32bit
  564.         mov     eax,[current_line]
  565.         mov     [error_line],eax
  566.         mov     [error],operand_size_not_specified
  567.         jmp     mov_mem_imm_32bit
  568.       mov_mem_imm_8bit:
  569.         call    get_byte_value
  570.         mov     byte [value],al
  571.         mov     [postbyte_register],0
  572.         mov     [base_code],0C6h
  573.         pop     cx bx edx
  574.         call    store_instruction_with_imm8
  575.         jmp     instruction_assembled
  576.       mov_mem_imm_16bit:
  577.         call    operand_16bit
  578.         call    get_word_value
  579.         mov     word [value],ax
  580.         mov     [postbyte_register],0
  581.         mov     [base_code],0C7h
  582.         pop     cx bx edx
  583.         call    store_instruction_with_imm16
  584.         jmp     instruction_assembled
  585.       mov_mem_imm_32bit:
  586.         call    operand_32bit
  587.         call    get_dword_value
  588.       mov_mem_imm_32bit_store:
  589.         mov     dword [value],eax
  590.         mov     [postbyte_register],0
  591.         mov     [base_code],0C7h
  592.         pop     cx bx edx
  593.         call    store_instruction_with_imm32
  594.         jmp     instruction_assembled
  595.       mov_mem_imm_64bit:
  596.         cmp     [size_declared],0
  597.         jne     long_immediate_not_encodable
  598.         call    operand_64bit
  599.         call    get_simm32
  600.         cmp     [value_type],4
  601.         jae     long_immediate_not_encodable
  602.         jmp     mov_mem_imm_32bit_store
  603.       mov_reg:
  604.         lods    byte [esi]
  605.         mov     ah,al
  606.         sub     ah,10h
  607.         and     ah,al
  608.         test    ah,0F0h
  609.         jnz     mov_sreg
  610.         call    convert_register
  611.         mov     [postbyte_register],al
  612.         lods    byte [esi]
  613.         cmp     al,','
  614.         jne     invalid_operand
  615.         lods    byte [esi]
  616.         call    get_size_operator
  617.         cmp     al,'['
  618.         je      mov_reg_mem
  619.         cmp     al,'('
  620.         je      mov_reg_imm
  621.         cmp     al,10h
  622.         jne     invalid_operand
  623.       mov_reg_reg:
  624.         lods    byte [esi]
  625.         mov     ah,al
  626.         sub     ah,10h
  627.         and     ah,al
  628.         test    ah,0F0h
  629.         jnz     mov_reg_sreg
  630.         call    convert_register
  631.         mov     bl,[postbyte_register]
  632.         mov     [postbyte_register],al
  633.         mov     al,ah
  634.         cmp     al,1
  635.         je      mov_reg_reg_8bit
  636.         call    operand_autodetect
  637.         inc     [base_code]
  638.       mov_reg_reg_8bit:
  639.         call    store_nomem_instruction
  640.         jmp     instruction_assembled
  641.       mov_reg_sreg:
  642.         mov     bl,[postbyte_register]
  643.         mov     ah,al
  644.         and     al,1111b
  645.         mov     [postbyte_register],al
  646.         shr     ah,4
  647.         cmp     ah,5
  648.         je      mov_reg_creg
  649.         cmp     ah,7
  650.         je      mov_reg_dreg
  651.         ja      mov_reg_treg
  652.         dec     [postbyte_register]
  653.         cmp     [operand_size],8
  654.         je      mov_reg_sreg64
  655.         cmp     [operand_size],4
  656.         je      mov_reg_sreg32
  657.         cmp     [operand_size],2
  658.         jne     invalid_operand_size
  659.         call    operand_16bit
  660.         jmp     mov_reg_sreg_store
  661.       mov_reg_sreg64:
  662.         call    operand_64bit
  663.         jmp     mov_reg_sreg_store
  664.       mov_reg_sreg32:
  665.         call    operand_32bit
  666.       mov_reg_sreg_store:
  667.         mov     [base_code],8Ch
  668.         call    store_nomem_instruction
  669.         jmp     instruction_assembled
  670.       mov_reg_treg:
  671.         cmp     ah,9
  672.         jne     invalid_operand
  673.         mov     [extended_code],24h
  674.         jmp     mov_reg_xrx
  675.       mov_reg_dreg:
  676.         mov     [extended_code],21h
  677.         jmp     mov_reg_xrx
  678.       mov_reg_creg:
  679.         mov     [extended_code],20h
  680.       mov_reg_xrx:
  681.         mov     [base_code],0Fh
  682.         cmp     [code_type],64
  683.         je      mov_reg_xrx_64bit
  684.         cmp     [operand_size],4
  685.         jne     invalid_operand_size
  686.         cmp     [postbyte_register],8
  687.         jne     mov_reg_xrx_store
  688.         cmp     [extended_code],20h
  689.         jne     mov_reg_xrx_store
  690.         mov     al,0F0h
  691.         stos    byte [edi]
  692.         mov     [postbyte_register],0
  693.       mov_reg_xrx_store:
  694.         call    store_nomem_instruction
  695.         jmp     instruction_assembled
  696.       mov_reg_xrx_64bit:
  697.         cmp     [operand_size],8
  698.         jne     invalid_operand_size
  699.         call    store_nomem_instruction
  700.         jmp     instruction_assembled
  701.       mov_reg_mem:
  702.         call    get_address
  703.         mov     al,[operand_size]
  704.         cmp     al,1
  705.         je      mov_reg_mem_8bit
  706.         call    operand_autodetect
  707.         mov     al,[postbyte_register]
  708.         or      al,bl
  709.         or      al,bh
  710.         jz      mov_ax_mem
  711.         add     [base_code],3
  712.         call    store_instruction
  713.         jmp     instruction_assembled
  714.       mov_reg_mem_8bit:
  715.         mov     al,[postbyte_register]
  716.         or      al,bl
  717.         or      al,bh
  718.         jz      mov_al_mem
  719.         add     [base_code],2
  720.         call    store_instruction
  721.         jmp     instruction_assembled
  722.       mov_al_mem:
  723.         test    ch,22h
  724.         jnz     mov_al_mem_address16
  725.         test    ch,44h
  726.         jnz     mov_al_mem_address32
  727.         test    ch,88h
  728.         jnz     mov_al_mem_address64
  729.         or      ch,ch
  730.         jnz     invalid_address_size
  731.         cmp     [code_type],64
  732.         je      mov_al_mem_address64
  733.         cmp     [code_type],32
  734.         je      mov_al_mem_address32
  735.         cmp     edx,10000h
  736.         jb      mov_al_mem_address16
  737.       mov_al_mem_address32:
  738.         call    store_segment_prefix_if_necessary
  739.         call    address_32bit_prefix
  740.         mov     [base_code],0A0h
  741.         jmp     store_mov_address32
  742.       mov_al_mem_address16:
  743.         call    store_segment_prefix_if_necessary
  744.         call    address_16bit_prefix
  745.         mov     [base_code],0A0h
  746.         jmp     store_mov_address16
  747.       mov_al_mem_address64:
  748.         call    store_segment_prefix_if_necessary
  749.         mov     [base_code],0A0h
  750.         jmp     store_mov_address64
  751.       mov_ax_mem:
  752.         test    ch,22h
  753.         jnz     mov_ax_mem_address16
  754.         test    ch,44h
  755.         jnz     mov_ax_mem_address32
  756.         test    ch,88h
  757.         jnz     mov_ax_mem_address64
  758.         or      ch,ch
  759.         jnz     invalid_address_size
  760.         cmp     [code_type],64
  761.         je      mov_ax_mem_address64
  762.         cmp     [code_type],32
  763.         je      mov_ax_mem_address32
  764.         cmp     edx,10000h
  765.         jb      mov_ax_mem_address16
  766.       mov_ax_mem_address32:
  767.         call    store_segment_prefix_if_necessary
  768.         call    address_32bit_prefix
  769.         mov     [base_code],0A1h
  770.         jmp     store_mov_address32
  771.       mov_ax_mem_address16:
  772.         call    store_segment_prefix_if_necessary
  773.         call    address_16bit_prefix
  774.         mov     [base_code],0A1h
  775.         jmp     store_mov_address16
  776.       mov_ax_mem_address64:
  777.         call    store_segment_prefix_if_necessary
  778.         mov     [base_code],0A1h
  779.         jmp     store_mov_address64
  780.       mov_reg_imm:
  781.         mov     al,[operand_size]
  782.         cmp     al,1
  783.         je      mov_reg_imm_8bit
  784.         cmp     al,2
  785.         je      mov_reg_imm_16bit
  786.         cmp     al,4
  787.         je      mov_reg_imm_32bit
  788.         cmp     al,8
  789.         je      mov_reg_imm_64bit
  790.         or      al,al
  791.         jnz     invalid_operand_size
  792.         cmp     [error_line],0
  793.         jne     mov_reg_imm_32bit
  794.         mov     eax,[current_line]
  795.         mov     [error_line],eax
  796.         mov     [error],operand_size_not_specified
  797.         jmp     mov_reg_imm_32bit
  798.       mov_reg_imm_8bit:
  799.         call    get_byte_value
  800.         mov     dl,al
  801.         mov     al,0B0h
  802.         call    store_mov_reg_imm_code
  803.         mov     al,dl
  804.         stos    byte [edi]
  805.         jmp     instruction_assembled
  806.       mov_reg_imm_16bit:
  807.         call    get_word_value
  808.         mov     dx,ax
  809.         call    operand_16bit
  810.         mov     al,0B8h
  811.         call    store_mov_reg_imm_code
  812.         mov     ax,dx
  813.         call    mark_relocation
  814.         stos    word [edi]
  815.         jmp     instruction_assembled
  816.       mov_reg_imm_32bit:
  817.         call    operand_32bit
  818.         call    get_dword_value
  819.         mov     edx,eax
  820.         mov     al,0B8h
  821.         call    store_mov_reg_imm_code
  822.         mov     eax,edx
  823.         call    mark_relocation
  824.         stos    dword [edi]
  825.         jmp     instruction_assembled
  826.       mov_reg_imm_64bit:
  827.         call    operand_64bit
  828.         call    get_qword_value
  829.         mov     ecx,edx
  830.         cmp     [size_declared],0
  831.         jne     mov_reg_imm_64bit_store
  832.         cmp     [value_type],4
  833.         jae     mov_reg_imm_64bit_store
  834.         cdq
  835.         cmp     ecx,edx
  836.         je      mov_reg_64bit_imm_32bit
  837.       mov_reg_imm_64bit_store:
  838.         push    eax ecx
  839.         mov     al,0B8h
  840.         call    store_mov_reg_imm_code
  841.         pop     edx eax
  842.         call    mark_relocation
  843.         stos    dword [edi]
  844.         mov     eax,edx
  845.         stos    dword [edi]
  846.         jmp     instruction_assembled
  847.       store_mov_reg_imm_code:
  848.         mov     ah,[postbyte_register]
  849.         test    ah,1000b
  850.         jz      mov_reg_imm_prefix_ok
  851.         or      [rex_prefix],41h
  852.       mov_reg_imm_prefix_ok:
  853.         and     ah,111b
  854.         add     al,ah
  855.         mov     [base_code],al
  856.         call    store_instruction_code
  857.         ret
  858.       mov_reg_64bit_imm_32bit:
  859.         mov     edx,eax
  860.         mov     bl,[postbyte_register]
  861.         mov     [postbyte_register],0
  862.         mov     [base_code],0C7h
  863.         call    store_nomem_instruction
  864.         mov     eax,edx
  865.         call    mark_relocation
  866.         stos    dword [edi]
  867.         jmp     instruction_assembled
  868.       mov_sreg:
  869.         mov     ah,al
  870.         and     al,1111b
  871.         mov     [postbyte_register],al
  872.         shr     ah,4
  873.         cmp     ah,5
  874.         je      mov_creg
  875.         cmp     ah,7
  876.         je      mov_dreg
  877.         ja      mov_treg
  878.         cmp     al,2
  879.         je      illegal_instruction
  880.         dec     [postbyte_register]
  881.         lods    byte [esi]
  882.         cmp     al,','
  883.         jne     invalid_operand
  884.         lods    byte [esi]
  885.         call    get_size_operator
  886.         cmp     al,'['
  887.         je      mov_sreg_mem
  888.         cmp     al,10h
  889.         jne     invalid_operand
  890.       mov_sreg_reg:
  891.         lods    byte [esi]
  892.         call    convert_register
  893.         or      ah,ah
  894.         jz      mov_sreg_reg_size_ok
  895.         cmp     ah,2
  896.         jne     invalid_operand_size
  897.         mov     bl,al
  898.       mov_sreg_reg_size_ok:
  899.         mov     [base_code],8Eh
  900.         call    store_nomem_instruction
  901.         jmp     instruction_assembled
  902.       mov_sreg_mem:
  903.         call    get_address
  904.         mov     al,[operand_size]
  905.         or      al,al
  906.         jz      mov_sreg_mem_size_ok
  907.         cmp     al,2
  908.         jne     invalid_operand_size
  909.       mov_sreg_mem_size_ok:
  910.         mov     [base_code],8Eh
  911.         call    store_instruction
  912.         jmp     instruction_assembled
  913.       mov_treg:
  914.         cmp     ah,9
  915.         jne     invalid_operand
  916.         mov     [extended_code],26h
  917.         jmp     mov_xrx
  918.       mov_dreg:
  919.         mov     [extended_code],23h
  920.         jmp     mov_xrx
  921.       mov_creg:
  922.         mov     [extended_code],22h
  923.       mov_xrx:
  924.         mov     [base_code],0Fh
  925.         lods    byte [esi]
  926.         cmp     al,','
  927.         jne     invalid_operand
  928.         lods    byte [esi]
  929.         cmp     al,10h
  930.         jne     invalid_operand
  931.         lods    byte [esi]
  932.         call    convert_register
  933.         mov     bl,al
  934.         cmp     [code_type],64
  935.         je      mov_xrx_64bit
  936.         cmp     ah,4
  937.         jne     invalid_operand_size
  938.         cmp     [postbyte_register],8
  939.         jne     mov_xrx_store
  940.         cmp     [extended_code],22h
  941.         jne     mov_xrx_store
  942.         mov     al,0F0h
  943.         stos    byte [edi]
  944.         mov     [postbyte_register],0
  945.       mov_xrx_store:
  946.         call    store_nomem_instruction
  947.         jmp     instruction_assembled
  948.       mov_xrx_64bit:
  949.         cmp     ah,8
  950.         jne     invalid_operand_size
  951.         call    store_nomem_instruction
  952.         jmp     instruction_assembled
  953. cmov_instruction:
  954.         mov     [base_code],0Fh
  955.         mov     [extended_code],al
  956.         lods    byte [esi]
  957.         call    get_size_operator
  958.         cmp     al,10h
  959.         jne     invalid_operand
  960.         lods    byte [esi]
  961.         call    convert_register
  962.         mov     [postbyte_register],al
  963.         lods    byte [esi]
  964.         cmp     al,','
  965.         jne     invalid_operand
  966.         lods    byte [esi]
  967.         call    get_size_operator
  968.         cmp     al,'['
  969.         je      cmov_reg_mem
  970.         cmp     al,10h
  971.         jne     invalid_operand
  972.       cmov_reg_reg:
  973.         lods    byte [esi]
  974.         call    convert_register
  975.         mov     bl,al
  976.         mov     al,ah
  977.         call    operand_autodetect
  978.         call    store_nomem_instruction
  979.         jmp     instruction_assembled
  980.       cmov_reg_mem:
  981.         call    get_address
  982.         mov     al,[operand_size]
  983.         call    operand_autodetect
  984.         call    store_instruction
  985.         jmp     instruction_assembled
  986. test_instruction:
  987.         mov     [base_code],84h
  988.         lods    byte [esi]
  989.         call    get_size_operator
  990.         cmp     al,10h
  991.         je      test_reg
  992.         cmp     al,'['
  993.         jne     invalid_operand
  994.       test_mem:
  995.         call    get_address
  996.         push    edx bx cx
  997.         lods    byte [esi]
  998.         cmp     al,','
  999.         jne     invalid_operand
  1000.         lods    byte [esi]
  1001.         call    get_size_operator
  1002.         cmp     al,'('
  1003.         je      test_mem_imm
  1004.         cmp     al,10h
  1005.         jne     invalid_operand
  1006.       test_mem_reg:
  1007.         lods    byte [esi]
  1008.         call    convert_register
  1009.         mov     [postbyte_register],al
  1010.         pop     cx bx edx
  1011.         mov     al,ah
  1012.         cmp     al,1
  1013.         je      test_mem_reg_8bit
  1014.         call    operand_autodetect
  1015.         inc     [base_code]
  1016.       test_mem_reg_8bit:
  1017.         call    store_instruction
  1018.         jmp     instruction_assembled
  1019.       test_mem_imm:
  1020.         mov     al,[operand_size]
  1021.         cmp     al,1
  1022.         je      test_mem_imm_8bit
  1023.         cmp     al,2
  1024.         je      test_mem_imm_16bit
  1025.         cmp     al,4
  1026.         je      test_mem_imm_32bit
  1027.         cmp     al,8
  1028.         je      test_mem_imm_64bit
  1029.         or      al,al
  1030.         jnz     invalid_operand_size
  1031.         cmp     [error_line],0
  1032.         jne     test_mem_imm_32bit
  1033.         mov     eax,[current_line]
  1034.         mov     [error_line],eax
  1035.         mov     [error],operand_size_not_specified
  1036.         jmp     test_mem_imm_32bit
  1037.       test_mem_imm_8bit:
  1038.         call    get_byte_value
  1039.         mov     byte [value],al
  1040.         mov     [postbyte_register],0
  1041.         mov     [base_code],0F6h
  1042.         pop     cx bx edx
  1043.         call    store_instruction_with_imm8
  1044.         jmp     instruction_assembled
  1045.       test_mem_imm_16bit:
  1046.         call    operand_16bit
  1047.         call    get_word_value
  1048.         mov     word [value],ax
  1049.         mov     [postbyte_register],0
  1050.         mov     [base_code],0F7h
  1051.         pop     cx bx edx
  1052.         call    store_instruction_with_imm16
  1053.         jmp     instruction_assembled
  1054.       test_mem_imm_32bit:
  1055.         call    operand_32bit
  1056.         call    get_dword_value
  1057.       test_mem_imm_32bit_store:
  1058.         mov     dword [value],eax
  1059.         mov     [postbyte_register],0
  1060.         mov     [base_code],0F7h
  1061.         pop     cx bx edx
  1062.         call    store_instruction_with_imm32
  1063.         jmp     instruction_assembled
  1064.       test_mem_imm_64bit:
  1065.         cmp     [size_declared],0
  1066.         jne     long_immediate_not_encodable
  1067.         call    operand_64bit
  1068.         call    get_simm32
  1069.         cmp     [value_type],4
  1070.         jae     long_immediate_not_encodable
  1071.         jmp     test_mem_imm_32bit_store
  1072.       test_reg:
  1073.         lods    byte [esi]
  1074.         call    convert_register
  1075.         mov     [postbyte_register],al
  1076.         lods    byte [esi]
  1077.         cmp     al,','
  1078.         jne     invalid_operand
  1079.         lods    byte [esi]
  1080.         call    get_size_operator
  1081.         cmp     al,'['
  1082.         je      test_reg_mem
  1083.         cmp     al,'('
  1084.         je      test_reg_imm
  1085.         cmp     al,10h
  1086.         jne     invalid_operand
  1087.       test_reg_reg:
  1088.         lods    byte [esi]
  1089.         call    convert_register
  1090.         mov     bl,[postbyte_register]
  1091.         mov     [postbyte_register],al
  1092.         mov     al,ah
  1093.         cmp     al,1
  1094.         je      test_reg_reg_8bit
  1095.         call    operand_autodetect
  1096.         inc     [base_code]
  1097.       test_reg_reg_8bit:
  1098.         call    store_nomem_instruction
  1099.         jmp     instruction_assembled
  1100.       test_reg_imm:
  1101.         mov     al,[operand_size]
  1102.         cmp     al,1
  1103.         je      test_reg_imm_8bit
  1104.         cmp     al,2
  1105.         je      test_reg_imm_16bit
  1106.         cmp     al,4
  1107.         je      test_reg_imm_32bit
  1108.         cmp     al,8
  1109.         je      test_reg_imm_64bit
  1110.         jmp     invalid_operand_size
  1111.       test_reg_imm_8bit:
  1112.         call    get_byte_value
  1113.         mov     dl,al
  1114.         mov     bl,[postbyte_register]
  1115.         mov     [postbyte_register],0
  1116.         mov     [base_code],0F6h
  1117.         or      bl,bl
  1118.         jz      test_al_imm
  1119.         call    store_nomem_instruction
  1120.         mov     al,dl
  1121.         stos    byte [edi]
  1122.         jmp     instruction_assembled
  1123.       test_al_imm:
  1124.         mov     [base_code],0A8h
  1125.         call    store_instruction_code
  1126.         mov     al,dl
  1127.         stos    byte [edi]
  1128.         jmp     instruction_assembled
  1129.       test_reg_imm_16bit:
  1130.         call    operand_16bit
  1131.         call    get_word_value
  1132.         mov     dx,ax
  1133.         mov     bl,[postbyte_register]
  1134.         mov     [postbyte_register],0
  1135.         mov     [base_code],0F7h
  1136.         or      bl,bl
  1137.         jz      test_ax_imm
  1138.         call    store_nomem_instruction
  1139.         mov     ax,dx
  1140.         call    mark_relocation
  1141.         stos    word [edi]
  1142.         jmp     instruction_assembled
  1143.       test_ax_imm:
  1144.         mov     [base_code],0A9h
  1145.         call    store_instruction_code
  1146.         mov     ax,dx
  1147.         stos    word [edi]
  1148.         jmp     instruction_assembled
  1149.       test_reg_imm_32bit:
  1150.         call    operand_32bit
  1151.         call    get_dword_value
  1152.       test_reg_imm_32bit_store:
  1153.         mov     edx,eax
  1154.         mov     bl,[postbyte_register]
  1155.         mov     [postbyte_register],0
  1156.         mov     [base_code],0F7h
  1157.         or      bl,bl
  1158.         jz      test_eax_imm
  1159.         call    store_nomem_instruction
  1160.         mov     eax,edx
  1161.         call    mark_relocation
  1162.         stos    dword [edi]
  1163.         jmp     instruction_assembled
  1164.       test_eax_imm:
  1165.         mov     [base_code],0A9h
  1166.         call    store_instruction_code
  1167.         mov     eax,edx
  1168.         stos    dword [edi]
  1169.         jmp     instruction_assembled
  1170.       test_reg_imm_64bit:
  1171.         cmp     [size_declared],0
  1172.         jne     long_immediate_not_encodable
  1173.         call    operand_64bit
  1174.         call    get_simm32
  1175.         cmp     [value_type],4
  1176.         jae     long_immediate_not_encodable
  1177.         jmp     test_reg_imm_32bit_store
  1178.       test_reg_mem:
  1179.         call    get_address
  1180.         mov     al,[operand_size]
  1181.         cmp     al,1
  1182.         je      test_reg_mem_8bit
  1183.         call    operand_autodetect
  1184.         inc     [base_code]
  1185.       test_reg_mem_8bit:
  1186.         call    store_instruction
  1187.         jmp     instruction_assembled
  1188. xchg_instruction:
  1189.         mov     [base_code],86h
  1190.         lods    byte [esi]
  1191.         call    get_size_operator
  1192.         cmp     al,10h
  1193.         je      xchg_reg
  1194.         cmp     al,'['
  1195.         jne     invalid_operand
  1196.       xchg_mem:
  1197.         call    get_address
  1198.         push    edx bx cx
  1199.         lods    byte [esi]
  1200.         cmp     al,','
  1201.         jne     invalid_operand
  1202.         lods    byte [esi]
  1203.         call    get_size_operator
  1204.         cmp     al,10h
  1205.         je      test_mem_reg
  1206.         jmp     invalid_operand
  1207.       xchg_reg:
  1208.         lods    byte [esi]
  1209.         call    convert_register
  1210.         mov     [postbyte_register],al
  1211.         lods    byte [esi]
  1212.         cmp     al,','
  1213.         jne     invalid_operand
  1214.         lods    byte [esi]
  1215.         call    get_size_operator
  1216.         cmp     al,'['
  1217.         je      test_reg_mem
  1218.         cmp     al,10h
  1219.         jne     invalid_operand
  1220.       xchg_reg_reg:
  1221.         lods    byte [esi]
  1222.         call    convert_register
  1223.         mov     bl,al
  1224.         mov     al,ah
  1225.         cmp     al,1
  1226.         je      xchg_reg_reg_8bit
  1227.         call    operand_autodetect
  1228.         cmp     [postbyte_register],0
  1229.         je      xchg_ax_reg
  1230.         or      bl,bl
  1231.         jnz     xchg_reg_reg_store
  1232.         mov     bl,[postbyte_register]
  1233.       xchg_ax_reg:
  1234.         cmp     [code_type],64
  1235.         jne     xchg_ax_reg_ok
  1236.         cmp     ah,4
  1237.         jne     xchg_ax_reg_ok
  1238.         or      bl,bl
  1239.         jz      xchg_reg_reg_store
  1240.       xchg_ax_reg_ok:
  1241.         test    bl,1000b
  1242.         jz      xchg_ax_reg_store
  1243.         or      [rex_prefix],41h
  1244.         and     bl,111b
  1245.       xchg_ax_reg_store:
  1246.         add     bl,90h
  1247.         mov     [base_code],bl
  1248.         call    store_instruction_code
  1249.         jmp     instruction_assembled
  1250.       xchg_reg_reg_store:
  1251.         inc     [base_code]
  1252.       xchg_reg_reg_8bit:
  1253.         call    store_nomem_instruction
  1254.         jmp     instruction_assembled
  1255. push_instruction:
  1256.         mov     [push_size],al
  1257.       push_next:
  1258.         lods    byte [esi]
  1259.         call    get_size_operator
  1260.         cmp     al,10h
  1261.         je      push_reg
  1262.         cmp     al,'('
  1263.         je      push_imm
  1264.         cmp     al,'['
  1265.         jne     invalid_operand
  1266.       push_mem:
  1267.         call    get_address
  1268.         mov     al,[operand_size]
  1269.         mov     ah,[push_size]
  1270.         cmp     al,2
  1271.         je      push_mem_16bit
  1272.         cmp     al,4
  1273.         je      push_mem_32bit
  1274.         cmp     al,8
  1275.         je      push_mem_64bit
  1276.         or      al,al
  1277.         jnz     invalid_operand_size
  1278.         cmp     ah,2
  1279.         je      push_mem_16bit
  1280.         cmp     ah,4
  1281.         je      push_mem_32bit
  1282.         cmp     ah,8
  1283.         je      push_mem_64bit
  1284.         cmp     [error_line],0
  1285.         jne     push_mem_store
  1286.         mov     eax,[current_line]
  1287.         mov     [error_line],eax
  1288.         mov     [error],operand_size_not_specified
  1289.         jmp     push_mem_store
  1290.       push_mem_16bit:
  1291.         test    ah,not 2
  1292.         jnz     invalid_operand_size
  1293.         call    operand_16bit
  1294.         jmp     push_mem_store
  1295.       push_mem_32bit:
  1296.         test    ah,not 4
  1297.         jnz     invalid_operand_size
  1298.         cmp     [code_type],64
  1299.         je      illegal_instruction
  1300.         call    operand_32bit
  1301.         jmp     push_mem_store
  1302.       push_mem_64bit:
  1303.         test    ah,not 8
  1304.         jnz     invalid_operand_size
  1305.         cmp     [code_type],64
  1306.         jne     illegal_instruction
  1307.       push_mem_store:
  1308.         mov     [base_code],0FFh
  1309.         mov     [postbyte_register],110b
  1310.         call    store_instruction
  1311.         jmp     push_done
  1312.       push_reg:
  1313.         lods    byte [esi]
  1314.         mov     ah,al
  1315.         sub     ah,10h
  1316.         and     ah,al
  1317.         test    ah,0F0h
  1318.         jnz     push_sreg
  1319.         call    convert_register
  1320.         test    al,1000b
  1321.         jz      push_reg_ok
  1322.         or      [rex_prefix],41h
  1323.         and     al,111b
  1324.       push_reg_ok:
  1325.         add     al,50h
  1326.         mov     [base_code],al
  1327.         mov     al,ah
  1328.         mov     ah,[push_size]
  1329.         cmp     al,2
  1330.         je      push_reg_16bit
  1331.         cmp     al,4
  1332.         je      push_reg_32bit
  1333.         cmp     al,8
  1334.         jne     invalid_operand_size
  1335.       push_reg_64bit:
  1336.         test    ah,not 8
  1337.         jnz     invalid_operand_size
  1338.         cmp     [code_type],64
  1339.         jne     illegal_instruction
  1340.         jmp     push_reg_store
  1341.       push_reg_32bit:
  1342.         test    ah,not 4
  1343.         jnz     invalid_operand_size
  1344.         cmp     [code_type],64
  1345.         je      illegal_instruction
  1346.         call    operand_32bit
  1347.         jmp     push_reg_store
  1348.       push_reg_16bit:
  1349.         test    ah,not 2
  1350.         jnz     invalid_operand_size
  1351.         call    operand_16bit
  1352.       push_reg_store:
  1353.         call    store_instruction_code
  1354.         jmp     push_done
  1355.       push_sreg:
  1356.         mov     bl,al
  1357.         mov     dl,[operand_size]
  1358.         mov     dh,[push_size]
  1359.         cmp     dl,2
  1360.         je      push_sreg16
  1361.         cmp     dl,4
  1362.         je      push_sreg32
  1363.         cmp     dl,8
  1364.         je      push_sreg64
  1365.         or      dl,dl
  1366.         jnz     invalid_operand_size
  1367.         cmp     dh,2
  1368.         je      push_sreg16
  1369.         cmp     dh,4
  1370.         je      push_sreg32
  1371.         cmp     dh,8
  1372.         je      push_sreg64
  1373.         jmp     push_sreg_store
  1374.       push_sreg16:
  1375.         test    dh,not 2
  1376.         jnz     invalid_operand_size
  1377.         call    operand_16bit
  1378.         jmp     push_sreg_store
  1379.       push_sreg32:
  1380.         test    dh,not 4
  1381.         jnz     invalid_operand_size
  1382.         cmp     [code_type],64
  1383.         je      illegal_instruction
  1384.         call    operand_32bit
  1385.         jmp     push_sreg_store
  1386.       push_sreg64:
  1387.         test    dh,not 8
  1388.         jnz     invalid_operand_size
  1389.         cmp     [code_type],64
  1390.         jne     illegal_instruction
  1391.       push_sreg_store:
  1392.         mov     al,bl
  1393.         cmp     al,70h
  1394.         jae     invalid_operand
  1395.         sub     al,61h
  1396.         cmp     al,4
  1397.         jae     push_sreg_386
  1398.         shl     al,3
  1399.         add     al,6
  1400.         mov     [base_code],al
  1401.         cmp     [code_type],64
  1402.         je      illegal_instruction
  1403.         jmp     push_reg_store
  1404.       push_sreg_386:
  1405.         sub     al,4
  1406.         shl     al,3
  1407.         add     al,0A0h
  1408.         mov     [extended_code],al
  1409.         mov     [base_code],0Fh
  1410.         jmp     push_reg_store
  1411.       push_imm:
  1412.         mov     al,[operand_size]
  1413.         mov     ah,[push_size]
  1414.         or      al,al
  1415.         je      push_imm_size_ok
  1416.         or      ah,ah
  1417.         je      push_imm_size_ok
  1418.         cmp     al,ah
  1419.         jne     invalid_operand_size
  1420.       push_imm_size_ok:
  1421.         cmp     al,2
  1422.         je      push_imm_16bit
  1423.         cmp     al,4
  1424.         je      push_imm_32bit
  1425.         cmp     al,8
  1426.         je      push_imm_64bit
  1427.         cmp     ah,2
  1428.         je      push_imm_optimized_16bit
  1429.         cmp     ah,4
  1430.         je      push_imm_optimized_32bit
  1431.         cmp     ah,8
  1432.         je      push_imm_optimized_64bit
  1433.         or      al,al
  1434.         jnz     invalid_operand_size
  1435.         cmp     [code_type],16
  1436.         je      push_imm_optimized_16bit
  1437.         cmp     [code_type],32
  1438.         je      push_imm_optimized_32bit
  1439.       push_imm_optimized_64bit:
  1440.         cmp     [code_type],64
  1441.         jne     illegal_instruction
  1442.         call    get_simm32
  1443.         mov     edx,eax
  1444.         cmp     [value_type],0
  1445.         jne     push_imm_32bit_store
  1446.         cmp     eax,-80h
  1447.         jl      push_imm_32bit_store
  1448.         cmp     eax,80h
  1449.         jge     push_imm_32bit_store
  1450.         jmp     push_imm_8bit
  1451.       push_imm_optimized_32bit:
  1452.         cmp     [code_type],64
  1453.         je      illegal_instruction
  1454.         call    get_dword_value
  1455.         mov     edx,eax
  1456.         call    operand_32bit
  1457.         cmp     [value_type],0
  1458.         jne     push_imm_32bit_store
  1459.         cmp     eax,-80h
  1460.         jl      push_imm_32bit_store
  1461.         cmp     eax,80h
  1462.         jge     push_imm_32bit_store
  1463.         jmp     push_imm_8bit
  1464.       push_imm_optimized_16bit:
  1465.         call    get_word_value
  1466.         mov     dx,ax
  1467.         call    operand_16bit
  1468.         cmp     [value_type],0
  1469.         jne     push_imm_16bit_store
  1470.         cmp     ax,-80h
  1471.         jl      push_imm_16bit_store
  1472.         cmp     ax,80h
  1473.         jge     push_imm_16bit_store
  1474.       push_imm_8bit:
  1475.         mov     ah,al
  1476.         mov     [base_code],6Ah
  1477.         call    store_instruction_code
  1478.         mov     al,ah
  1479.         stos    byte [edi]
  1480.         jmp     push_done
  1481.       push_imm_16bit:
  1482.         call    get_word_value
  1483.         mov     dx,ax
  1484.         call    operand_16bit
  1485.       push_imm_16bit_store:
  1486.         mov     [base_code],68h
  1487.         call    store_instruction_code
  1488.         mov     ax,dx
  1489.         call    mark_relocation
  1490.         stos    word [edi]
  1491.         jmp     push_done
  1492.       push_imm_64bit:
  1493.         cmp     [code_type],64
  1494.         jne     illegal_instruction
  1495.         call    get_simm32
  1496.         mov     edx,eax
  1497.         jmp     push_imm_32bit_store
  1498.       push_imm_32bit:
  1499.         cmp     [code_type],64
  1500.         je      illegal_instruction
  1501.         call    get_dword_value
  1502.         mov     edx,eax
  1503.         call    operand_32bit
  1504.       push_imm_32bit_store:
  1505.         mov     [base_code],68h
  1506.         call    store_instruction_code
  1507.         mov     eax,edx
  1508.         call    mark_relocation
  1509.         stos    dword [edi]
  1510.       push_done:
  1511.         lods    byte [esi]
  1512.         dec     esi
  1513.         cmp     al,0Fh
  1514.         je      instruction_assembled
  1515.         or      al,al
  1516.         jz      instruction_assembled
  1517.         mov     [operand_size],0
  1518.         mov     [size_override],0
  1519.         mov     [operand_prefix],0
  1520.         mov     [rex_prefix],0
  1521.         jmp     push_next
  1522. pop_instruction:
  1523.         mov     [push_size],al
  1524.       pop_next:
  1525.         lods    byte [esi]
  1526.         call    get_size_operator
  1527.         cmp     al,10h
  1528.         je      pop_reg
  1529.         cmp     al,'['
  1530.         jne     invalid_operand
  1531.       pop_mem:
  1532.         call    get_address
  1533.         mov     al,[operand_size]
  1534.         mov     ah,[push_size]
  1535.         cmp     al,2
  1536.         je      pop_mem_16bit
  1537.         cmp     al,4
  1538.         je      pop_mem_32bit
  1539.         cmp     al,8
  1540.         je      pop_mem_64bit
  1541.         or      al,al
  1542.         jnz     invalid_operand_size
  1543.         cmp     ah,2
  1544.         je      pop_mem_16bit
  1545.         cmp     ah,4
  1546.         je      pop_mem_32bit
  1547.         cmp     ah,8
  1548.         je      pop_mem_64bit
  1549.         cmp     [error_line],0
  1550.         jne     pop_mem_store
  1551.         mov     eax,[current_line]
  1552.         mov     [error_line],eax
  1553.         mov     [error],operand_size_not_specified
  1554.         jmp     pop_mem_store
  1555.       pop_mem_16bit:
  1556.         test    ah,not 2
  1557.         jnz     invalid_operand_size
  1558.         call    operand_16bit
  1559.         jmp     pop_mem_store
  1560.       pop_mem_32bit:
  1561.         test    ah,not 4
  1562.         jnz     invalid_operand_size
  1563.         cmp     [code_type],64
  1564.         je      illegal_instruction
  1565.         call    operand_32bit
  1566.         jmp     pop_mem_store
  1567.       pop_mem_64bit:
  1568.         test    ah,not 8
  1569.         jnz     invalid_operand_size
  1570.         cmp     [code_type],64
  1571.         jne     illegal_instruction
  1572.       pop_mem_store:
  1573.         mov     [base_code],08Fh
  1574.         mov     [postbyte_register],0
  1575.         call    store_instruction
  1576.         jmp     pop_done
  1577.       pop_reg:
  1578.         lods    byte [esi]
  1579.         mov     ah,al
  1580.         sub     ah,10h
  1581.         and     ah,al
  1582.         test    ah,0F0h
  1583.         jnz     pop_sreg
  1584.         call    convert_register
  1585.         test    al,1000b
  1586.         jz      pop_reg_ok
  1587.         or      [rex_prefix],41h
  1588.         and     al,111b
  1589.       pop_reg_ok:
  1590.         add     al,58h
  1591.         mov     [base_code],al
  1592.         mov     al,ah
  1593.         mov     ah,[push_size]
  1594.         cmp     al,2
  1595.         je      pop_reg_16bit
  1596.         cmp     al,4
  1597.         je      pop_reg_32bit
  1598.         cmp     al,8
  1599.         je      pop_reg_64bit
  1600.         jmp     invalid_operand_size
  1601.       pop_reg_64bit:
  1602.         test    ah,not 8
  1603.         jnz     invalid_operand_size
  1604.         cmp     [code_type],64
  1605.         jne     illegal_instruction
  1606.         jmp     pop_reg_store
  1607.       pop_reg_32bit:
  1608.         test    ah,not 4
  1609.         jnz     invalid_operand_size
  1610.         cmp     [code_type],64
  1611.         je      illegal_instruction
  1612.         call    operand_32bit
  1613.         jmp     pop_reg_store
  1614.       pop_reg_16bit:
  1615.         test    ah,not 2
  1616.         jnz     invalid_operand_size
  1617.         call    operand_16bit
  1618.       pop_reg_store:
  1619.         call    store_instruction_code
  1620.       pop_done:
  1621.         lods    byte [esi]
  1622.         dec     esi
  1623.         cmp     al,0Fh
  1624.         je      instruction_assembled
  1625.         or      al,al
  1626.         jz      instruction_assembled
  1627.         mov     [operand_size],0
  1628.         mov     [size_override],0
  1629.         mov     [operand_prefix],0
  1630.         mov     [rex_prefix],0
  1631.         jmp     pop_next
  1632.       pop_sreg:
  1633.         mov     dl,[operand_size]
  1634.         mov     dh,[push_size]
  1635.         cmp     al,62h
  1636.         je      pop_cs
  1637.         mov     bl,al
  1638.         cmp     dl,2
  1639.         je      pop_sreg16
  1640.         cmp     dl,4
  1641.         je      pop_sreg32
  1642.         cmp     dl,8
  1643.         je      pop_sreg64
  1644.         or      dl,dl
  1645.         jnz     invalid_operand_size
  1646.         cmp     dh,2
  1647.         je      pop_sreg16
  1648.         cmp     dh,4
  1649.         je      pop_sreg32
  1650.         cmp     dh,8
  1651.         je      pop_sreg64
  1652.         jmp     pop_sreg_store
  1653.       pop_sreg16:
  1654.         test    dh,not 2
  1655.         jnz     invalid_operand_size
  1656.         call    operand_16bit
  1657.         jmp     pop_sreg_store
  1658.       pop_sreg32:
  1659.         test    dh,not 4
  1660.         jnz     invalid_operand_size
  1661.         cmp     [code_type],64
  1662.         je      illegal_instruction
  1663.         call    operand_32bit
  1664.         jmp     pop_sreg_store
  1665.       pop_sreg64:
  1666.         test    dh,not 8
  1667.         jnz     invalid_operand_size
  1668.         cmp     [code_type],64
  1669.         jne     illegal_instruction
  1670.       pop_sreg_store:
  1671.         mov     al,bl
  1672.         cmp     al,70h
  1673.         jae     invalid_operand
  1674.         sub     al,61h
  1675.         cmp     al,4
  1676.         jae     pop_sreg_386
  1677.         shl     al,3
  1678.         add     al,7
  1679.         mov     [base_code],al
  1680.         cmp     [code_type],64
  1681.         je      illegal_instruction
  1682.         jmp     pop_reg_store
  1683.       pop_cs:
  1684.         cmp     [code_type],16
  1685.         jne     illegal_instruction
  1686.         cmp     dl,2
  1687.         je      pop_cs_store
  1688.         or      dl,dl
  1689.         jnz     invalid_operand_size
  1690.         cmp     dh,2
  1691.         je      pop_cs_store
  1692.         or      dh,dh
  1693.         jnz     illegal_instruction
  1694.       pop_cs_store:
  1695.         test    dh,not 2
  1696.         jnz     invalid_operand_size
  1697.         mov     al,0Fh
  1698.         stos    byte [edi]
  1699.         jmp     pop_done
  1700.       pop_sreg_386:
  1701.         sub     al,4
  1702.         shl     al,3
  1703.         add     al,0A1h
  1704.         mov     [extended_code],al
  1705.         mov     [base_code],0Fh
  1706.         jmp     pop_reg_store
  1707. inc_instruction:
  1708.         mov     [base_code],al
  1709.         lods    byte [esi]
  1710.         call    get_size_operator
  1711.         cmp     al,10h
  1712.         je      inc_reg
  1713.         cmp     al,'['
  1714.         je      inc_mem
  1715.         jne     invalid_operand
  1716.       inc_mem:
  1717.         call    get_address
  1718.         mov     al,[operand_size]
  1719.         cmp     al,1
  1720.         je      inc_mem_8bit
  1721.         jb      inc_mem_nosize
  1722.         call    operand_autodetect
  1723.         mov     al,0FFh
  1724.         xchg    al,[base_code]
  1725.         mov     [postbyte_register],al
  1726.         call    store_instruction
  1727.         jmp     instruction_assembled
  1728.       inc_mem_nosize:
  1729.         cmp     [error_line],0
  1730.         jne     inc_mem_8bit
  1731.         mov     eax,[current_line]
  1732.         mov     [error_line],eax
  1733.         mov     [error],operand_size_not_specified
  1734.       inc_mem_8bit:
  1735.         mov     al,0FEh
  1736.         xchg    al,[base_code]
  1737.         mov     [postbyte_register],al
  1738.         call    store_instruction
  1739.         jmp     instruction_assembled
  1740.       inc_reg:
  1741.         lods    byte [esi]
  1742.         call    convert_register
  1743.         mov     bl,al
  1744.         mov     al,0FEh
  1745.         xchg    al,[base_code]
  1746.         mov     [postbyte_register],al
  1747.         mov     al,ah
  1748.         cmp     al,1
  1749.         je      inc_reg_8bit
  1750.         call    operand_autodetect
  1751.         cmp     [code_type],64
  1752.         je      inc_reg_long_form
  1753.         mov     al,[postbyte_register]
  1754.         shl     al,3
  1755.         add     al,bl
  1756.         add     al,40h
  1757.         mov     [base_code],al
  1758.         call    store_instruction_code
  1759.         jmp     instruction_assembled
  1760.       inc_reg_long_form:
  1761.         inc     [base_code]
  1762.       inc_reg_8bit:
  1763.         call    store_nomem_instruction
  1764.         jmp     instruction_assembled
  1765. set_instruction:
  1766.         mov     [base_code],0Fh
  1767.         mov     [extended_code],al
  1768.         lods    byte [esi]
  1769.         call    get_size_operator
  1770.         cmp     al,10h
  1771.         je      set_reg
  1772.         cmp     al,'['
  1773.         jne     invalid_operand
  1774.       set_mem:
  1775.         call    get_address
  1776.         cmp     [operand_size],1
  1777.         ja      invalid_operand_size
  1778.         mov     [postbyte_register],0
  1779.         call    store_instruction
  1780.         jmp     instruction_assembled
  1781.       set_reg:
  1782.         lods    byte [esi]
  1783.         call    convert_register
  1784.         cmp     ah,1
  1785.         jne     invalid_operand_size
  1786.         mov     bl,al
  1787.         mov     [postbyte_register],0
  1788.         call    store_nomem_instruction
  1789.         jmp     instruction_assembled
  1790. arpl_instruction:
  1791.         cmp     [code_type],64
  1792.         je      illegal_instruction
  1793.         mov     [base_code],63h
  1794.         lods    byte [esi]
  1795.         call    get_size_operator
  1796.         cmp     al,10h
  1797.         je      arpl_reg
  1798.         cmp     al,'['
  1799.         jne     invalid_operand
  1800.         call    get_address
  1801.         lods    byte [esi]
  1802.         cmp     al,','
  1803.         jne     invalid_operand
  1804.         lods    byte [esi]
  1805.         cmp     al,10h
  1806.         jne     invalid_operand
  1807.         lods    byte [esi]
  1808.         call    convert_register
  1809.         mov     [postbyte_register],al
  1810.         cmp     ah,2
  1811.         jne     invalid_operand_size
  1812.         call    store_instruction
  1813.         jmp     instruction_assembled
  1814.       arpl_reg:
  1815.         lods    byte [esi]
  1816.         call    convert_register
  1817.         cmp     ah,2
  1818.         jne     invalid_operand_size
  1819.         mov     bl,al
  1820.         lods    byte [esi]
  1821.         cmp     al,','
  1822.         jne     invalid_operand
  1823.         lods    byte [esi]
  1824.         cmp     al,10h
  1825.         jne     invalid_operand
  1826.         lods    byte [esi]
  1827.         call    convert_register
  1828.         cmp     ah,2
  1829.         jne     invalid_operand_size
  1830.         mov     [postbyte_register],al
  1831.         call    store_nomem_instruction
  1832.         jmp     instruction_assembled
  1833. bound_instruction:
  1834.         cmp     [code_type],64
  1835.         je      illegal_instruction
  1836.         lods    byte [esi]
  1837.         call    get_size_operator
  1838.         cmp     al,10h
  1839.         jne     invalid_operand
  1840.         lods    byte [esi]
  1841.         call    convert_register
  1842.         mov     [postbyte_register],al
  1843.         lods    byte [esi]
  1844.         cmp     al,','
  1845.         jne     invalid_operand
  1846.         lods    byte [esi]
  1847.         call    get_size_operator
  1848.         cmp     al,'['
  1849.         jne     invalid_operand
  1850.         call    get_address
  1851.         mov     al,[operand_size]
  1852.         cmp     al,2
  1853.         je      bound_16bit
  1854.         cmp     al,4
  1855.         je      bound_32bit
  1856.         jmp     invalid_operand_size
  1857.       bound_32bit:
  1858.         call    operand_32bit
  1859.         mov     [base_code],62h
  1860.         call    store_instruction
  1861.         jmp     instruction_assembled
  1862.       bound_16bit:
  1863.         call    operand_16bit
  1864.         mov     [base_code],62h
  1865.         call    store_instruction
  1866.         jmp     instruction_assembled
  1867. enter_instruction:
  1868.         lods    byte [esi]
  1869.         call    get_size_operator
  1870.         cmp     ah,2
  1871.         je      enter_imm16_size_ok
  1872.         or      ah,ah
  1873.         jnz     invalid_operand_size
  1874.       enter_imm16_size_ok:
  1875.         cmp     al,'('
  1876.         jne     invalid_operand
  1877.         call    get_word_value
  1878.         cmp     [next_pass_needed],0
  1879.         jne     enter_imm16_ok
  1880.         cmp     [value_type],0
  1881.         jne     invalid_use_of_symbol
  1882.       enter_imm16_ok:
  1883.         push    eax
  1884.         mov     [operand_size],0
  1885.         lods    byte [esi]
  1886.         cmp     al,','
  1887.         jne     invalid_operand
  1888.         lods    byte [esi]
  1889.         call    get_size_operator
  1890.         cmp     ah,1
  1891.         je      enter_imm8_size_ok
  1892.         or      ah,ah
  1893.         jnz     invalid_operand_size
  1894.       enter_imm8_size_ok:
  1895.         cmp     al,'('
  1896.         jne     invalid_operand
  1897.         call    get_byte_value
  1898.         mov     dl,al
  1899.         pop     ebx
  1900.         mov     al,0C8h
  1901.         stos    byte [edi]
  1902.         mov     ax,bx
  1903.         stos    word [edi]
  1904.         mov     al,dl
  1905.         stos    byte [edi]
  1906.         jmp     instruction_assembled
  1907. ret_instruction_only64:
  1908.         cmp     [code_type],64
  1909.         jne     illegal_instruction
  1910.         jmp     ret_instruction
  1911. ret_instruction_32bit_except64:
  1912.         cmp     [code_type],64
  1913.         je      illegal_instruction
  1914. ret_instruction_32bit:
  1915.         call    operand_32bit
  1916.         jmp     ret_instruction
  1917. ret_instruction_16bit:
  1918.         call    operand_16bit
  1919.         jmp     ret_instruction
  1920. retf_instruction:
  1921.         cmp     [code_type],64
  1922.         jne     ret_instruction
  1923. ret_instruction_64bit:
  1924.         call    operand_64bit
  1925. ret_instruction:
  1926.         mov     [base_code],al
  1927.         lods    byte [esi]
  1928.         dec     esi
  1929.         or      al,al
  1930.         jz      simple_ret
  1931.         cmp     al,0Fh
  1932.         je      simple_ret
  1933.         lods    byte [esi]
  1934.         call    get_size_operator
  1935.         or      ah,ah
  1936.         jz      ret_imm
  1937.         cmp     ah,2
  1938.         je      ret_imm
  1939.         jmp     invalid_operand_size
  1940.       ret_imm:
  1941.         cmp     al,'('
  1942.         jne     invalid_operand
  1943.         call    get_word_value
  1944.         cmp     [next_pass_needed],0
  1945.         jne     ret_imm_ok
  1946.         cmp     [value_type],0
  1947.         jne     invalid_use_of_symbol
  1948.       ret_imm_ok:
  1949.         cmp     [size_declared],0
  1950.         jne     ret_imm_store
  1951.         or      ax,ax
  1952.         jz      simple_ret
  1953.       ret_imm_store:
  1954.         mov     dx,ax
  1955.         call    store_instruction_code
  1956.         mov     ax,dx
  1957.         stos    word [edi]
  1958.         jmp     instruction_assembled
  1959.       simple_ret:
  1960.         inc     [base_code]
  1961.         call    store_instruction_code
  1962.         jmp     instruction_assembled
  1963. lea_instruction:
  1964.         mov     [base_code],8Dh
  1965.         lods    byte [esi]
  1966.         call    get_size_operator
  1967.         cmp     al,10h
  1968.         jne     invalid_operand
  1969.         lods    byte [esi]
  1970.         call    convert_register
  1971.         mov     [postbyte_register],al
  1972.         lods    byte [esi]
  1973.         cmp     al,','
  1974.         jne     invalid_operand
  1975.         xor     al,al
  1976.         xchg    al,[operand_size]
  1977.         push    eax
  1978.         lods    byte [esi]
  1979.         call    get_size_operator
  1980.         cmp     al,'['
  1981.         jne     invalid_operand
  1982.         mov     [size_override],-1
  1983.         call    get_address
  1984.         pop     eax
  1985.         mov     [operand_size],al
  1986.         call    operand_autodetect
  1987.         call    store_instruction
  1988.         jmp     instruction_assembled
  1989. ls_instruction:
  1990.         or      al,al
  1991.         jz      les_instruction
  1992.         cmp     al,3
  1993.         jz      lds_instruction
  1994.         add     al,0B0h
  1995.         mov     [extended_code],al
  1996.         mov     [base_code],0Fh
  1997.         jmp     ls_code_ok
  1998.       les_instruction:
  1999.         mov     [base_code],0C4h
  2000.         jmp     ls_short_code
  2001.       lds_instruction:
  2002.         mov     [base_code],0C5h
  2003.       ls_short_code:
  2004.         cmp     [code_type],64
  2005.         je      illegal_instruction
  2006.       ls_code_ok:
  2007.         lods    byte [esi]
  2008.         call    get_size_operator
  2009.         cmp     al,10h
  2010.         jne     invalid_operand
  2011.         lods    byte [esi]
  2012.         call    convert_register
  2013.         mov     [postbyte_register],al
  2014.         lods    byte [esi]
  2015.         cmp     al,','
  2016.         jne     invalid_operand
  2017.         add     [operand_size],2
  2018.         lods    byte [esi]
  2019.         call    get_size_operator
  2020.         cmp     al,'['
  2021.         jne     invalid_operand
  2022.         call    get_address
  2023.         mov     al,[operand_size]
  2024.         cmp     al,4
  2025.         je      ls_16bit
  2026.         cmp     al,6
  2027.         je      ls_32bit
  2028.         cmp     al,10
  2029.         je      ls_64bit
  2030.         jmp     invalid_operand_size
  2031.       ls_16bit:
  2032.         call    operand_16bit
  2033.         call    store_instruction
  2034.         jmp     instruction_assembled
  2035.       ls_32bit:
  2036.         call    operand_32bit
  2037.         call    store_instruction
  2038.         jmp     instruction_assembled
  2039.       ls_64bit:
  2040.         call    operand_64bit
  2041.         call    store_instruction
  2042.         jmp     instruction_assembled
  2043. sh_instruction:
  2044.         mov     [postbyte_register],al
  2045.         lods    byte [esi]
  2046.         call    get_size_operator
  2047.         cmp     al,10h
  2048.         je      sh_reg
  2049.         cmp     al,'['
  2050.         jne     invalid_operand
  2051.       sh_mem:
  2052.         call    get_address
  2053.         push    edx bx cx
  2054.         mov     al,[operand_size]
  2055.         push    eax
  2056.         mov     [operand_size],0
  2057.         lods    byte [esi]
  2058.         cmp     al,','
  2059.         jne     invalid_operand
  2060.         lods    byte [esi]
  2061.         call    get_size_operator
  2062.         cmp     al,'('
  2063.         je      sh_mem_imm
  2064.         cmp     al,10h
  2065.         jne     invalid_operand
  2066.       sh_mem_reg:
  2067.         lods    byte [esi]
  2068.         cmp     al,11h
  2069.         jne     invalid_operand
  2070.         pop     eax cx bx edx
  2071.         cmp     al,1
  2072.         je      sh_mem_cl_8bit
  2073.         jb      sh_mem_cl_nosize
  2074.         call    operand_autodetect
  2075.         mov     [base_code],0D3h
  2076.         call    store_instruction
  2077.         jmp     instruction_assembled
  2078.       sh_mem_cl_nosize:
  2079.         cmp     [error_line],0
  2080.         jne     sh_mem_cl_8bit
  2081.         mov     eax,[current_line]
  2082.         mov     [error_line],eax
  2083.         mov     [error],operand_size_not_specified
  2084.       sh_mem_cl_8bit:
  2085.         mov     [base_code],0D2h
  2086.         call    store_instruction
  2087.         jmp     instruction_assembled
  2088.       sh_mem_imm:
  2089.         mov     al,[operand_size]
  2090.         or      al,al
  2091.         jz      sh_mem_imm_size_ok
  2092.         cmp     al,1
  2093.         jne     invalid_operand_size
  2094.       sh_mem_imm_size_ok:
  2095.         call    get_byte_value
  2096.         mov     byte [value],al
  2097.         pop     eax cx bx edx
  2098.         cmp     al,1
  2099.         je      sh_mem_imm_8bit
  2100.         jb      sh_mem_imm_nosize
  2101.         call    operand_autodetect
  2102.         cmp     byte [value],1
  2103.         je      sh_mem_1
  2104.         mov     [base_code],0C1h
  2105.         call    store_instruction_with_imm8
  2106.         jmp     instruction_assembled
  2107.       sh_mem_1:
  2108.         mov     [base_code],0D1h
  2109.         call    store_instruction
  2110.         jmp     instruction_assembled
  2111.       sh_mem_imm_nosize:
  2112.         cmp     [error_line],0
  2113.         jne     sh_mem_imm_8bit
  2114.         mov     eax,[current_line]
  2115.         mov     [error_line],eax
  2116.         mov     [error],operand_size_not_specified
  2117.       sh_mem_imm_8bit:
  2118.         cmp     byte [value],1
  2119.         je      sh_mem_1_8bit
  2120.         mov     [base_code],0C0h
  2121.         call    store_instruction_with_imm8
  2122.         jmp     instruction_assembled
  2123.       sh_mem_1_8bit:
  2124.         mov     [base_code],0D0h
  2125.         call    store_instruction
  2126.         jmp     instruction_assembled
  2127.       sh_reg:
  2128.         lods    byte [esi]
  2129.         call    convert_register
  2130.         mov     bx,ax
  2131.         mov     [operand_size],0
  2132.         lods    byte [esi]
  2133.         cmp     al,','
  2134.         jne     invalid_operand
  2135.         lods    byte [esi]
  2136.         call    get_size_operator
  2137.         cmp     al,'('
  2138.         je      sh_reg_imm
  2139.         cmp     al,10h
  2140.         jne     invalid_operand
  2141.       sh_reg_reg:
  2142.         lods    byte [esi]
  2143.         cmp     al,11h
  2144.         jne     invalid_operand
  2145.         mov     al,bh
  2146.         cmp     al,1
  2147.         je      sh_reg_cl_8bit
  2148.         call    operand_autodetect
  2149.         mov     [base_code],0D3h
  2150.         call    store_nomem_instruction
  2151.         jmp     instruction_assembled
  2152.       sh_reg_cl_8bit:
  2153.         mov     [base_code],0D2h
  2154.         call    store_nomem_instruction
  2155.         jmp     instruction_assembled
  2156.       sh_reg_imm:
  2157.         mov     al,[operand_size]
  2158.         or      al,al
  2159.         jz      sh_reg_imm_size_ok
  2160.         cmp     al,1
  2161.         jne     invalid_operand_size
  2162.       sh_reg_imm_size_ok:
  2163.         push    ebx
  2164.         call    get_byte_value
  2165.         mov     dl,al
  2166.         pop     ebx
  2167.         mov     al,bh
  2168.         cmp     al,1
  2169.         je      sh_reg_imm_8bit
  2170.         call    operand_autodetect
  2171.         cmp     dl,1
  2172.         je      sh_reg_1
  2173.         mov     [base_code],0C1h
  2174.         call    store_nomem_instruction
  2175.         mov     al,dl
  2176.         stos    byte [edi]
  2177.         jmp     instruction_assembled
  2178.       sh_reg_1:
  2179.         mov     [base_code],0D1h
  2180.         call    store_nomem_instruction
  2181.         jmp     instruction_assembled
  2182.       sh_reg_imm_8bit:
  2183.         cmp     dl,1
  2184.         je      sh_reg_1_8bit
  2185.         mov     [base_code],0C0h
  2186.         call    store_nomem_instruction
  2187.         mov     al,dl
  2188.         stos    byte [edi]
  2189.         jmp     instruction_assembled
  2190.       sh_reg_1_8bit:
  2191.         mov     [base_code],0D0h
  2192.         call    store_nomem_instruction
  2193.         jmp     instruction_assembled
  2194. shd_instruction:
  2195.         mov     [base_code],0Fh
  2196.         mov     [extended_code],al
  2197.         lods    byte [esi]
  2198.         call    get_size_operator
  2199.         cmp     al,10h
  2200.         je      shd_reg
  2201.         cmp     al,'['
  2202.         jne     invalid_operand
  2203.       shd_mem:
  2204.         call    get_address
  2205.         push    edx bx cx
  2206.         lods    byte [esi]
  2207.         cmp     al,','
  2208.         jne     invalid_operand
  2209.         lods    byte [esi]
  2210.         call    get_size_operator
  2211.         cmp     al,10h
  2212.         jne     invalid_operand
  2213.         lods    byte [esi]
  2214.         call    convert_register
  2215.         mov     [postbyte_register],al
  2216.         lods    byte [esi]
  2217.         cmp     al,','
  2218.         jne     invalid_operand
  2219.         mov     al,ah
  2220.         mov     [operand_size],0
  2221.         push    eax
  2222.         lods    byte [esi]
  2223.         call    get_size_operator
  2224.         cmp     al,'('
  2225.         je      shd_mem_reg_imm
  2226.         cmp     al,10h
  2227.         jne     invalid_operand
  2228.         lods    byte [esi]
  2229.         cmp     al,11h
  2230.         jne     invalid_operand
  2231.         pop     eax cx bx edx
  2232.         call    operand_autodetect
  2233.         inc     [extended_code]
  2234.         call    store_instruction
  2235.         jmp     instruction_assembled
  2236.       shd_mem_reg_imm:
  2237.         mov     al,[operand_size]
  2238.         or      al,al
  2239.         jz      shd_mem_reg_imm_size_ok
  2240.         cmp     al,1
  2241.         jne     invalid_operand_size
  2242.       shd_mem_reg_imm_size_ok:
  2243.         call    get_byte_value
  2244.         mov     byte [value],al
  2245.         pop     eax cx bx edx
  2246.         call    operand_autodetect
  2247.         call    store_instruction_with_imm8
  2248.         jmp     instruction_assembled
  2249.       shd_reg:
  2250.         lods    byte [esi]
  2251.         call    convert_register
  2252.         mov     [postbyte_register],al
  2253.         lods    byte [esi]
  2254.         cmp     al,','
  2255.         jne     invalid_operand
  2256.         lods    byte [esi]
  2257.         call    get_size_operator
  2258.         cmp     al,10h
  2259.         jne     invalid_operand
  2260.         lods    byte [esi]
  2261.         call    convert_register
  2262.         mov     bl,[postbyte_register]
  2263.         mov     [postbyte_register],al
  2264.         mov     al,ah
  2265.         push    eax ebx
  2266.         lods    byte [esi]
  2267.         cmp     al,','
  2268.         jne     invalid_operand
  2269.         mov     [operand_size],0
  2270.         lods    byte [esi]
  2271.         call    get_size_operator
  2272.         cmp     al,'('
  2273.         je      shd_reg_reg_imm
  2274.         cmp     al,10h
  2275.         jne     invalid_operand
  2276.         lods    byte [esi]
  2277.         cmp     al,11h
  2278.         jne     invalid_operand
  2279.         pop     ebx eax
  2280.         call    operand_autodetect
  2281.         inc     [extended_code]
  2282.         call    store_nomem_instruction
  2283.         jmp     instruction_assembled
  2284.       shd_reg_reg_imm:
  2285.         mov     al,[operand_size]
  2286.         or      al,al
  2287.         jz      shd_reg_reg_imm_size_ok
  2288.         cmp     al,1
  2289.         jne     invalid_operand_size
  2290.       shd_reg_reg_imm_size_ok:
  2291.         call    get_byte_value
  2292.         mov     dl,al
  2293.         pop     ebx eax
  2294.         call    operand_autodetect
  2295.         call    store_nomem_instruction
  2296.         mov     al,dl
  2297.         stos    byte [edi]
  2298.         jmp     instruction_assembled
  2299. movx_instruction:
  2300.         mov     [base_code],0Fh
  2301.         mov     [extended_code],al
  2302.         lods    byte [esi]
  2303.         call    get_size_operator
  2304.         cmp     al,10h
  2305.         jne     invalid_operand
  2306.         lods    byte [esi]
  2307.         call    convert_register
  2308.         mov     [postbyte_register],al
  2309.         mov     al,ah
  2310.         push    eax
  2311.         lods    byte [esi]
  2312.         cmp     al,','
  2313.         jne     invalid_operand
  2314.         mov     [operand_size],0
  2315.         lods    byte [esi]
  2316.         call    get_size_operator
  2317.         cmp     al,10h
  2318.         je      movx_reg
  2319.         cmp     al,'['
  2320.         jne     invalid_operand
  2321.         call    get_address
  2322.         pop     eax
  2323.         mov     ah,[operand_size]
  2324.         or      ah,ah
  2325.         jz      movx_unknown_size
  2326.         cmp     ah,al
  2327.         jae     invalid_operand_size
  2328.         cmp     ah,1
  2329.         je      movx_mem_8bit
  2330.         cmp     ah,2
  2331.         jne     invalid_operand_size
  2332.       movx_mem_16bit:
  2333.         inc     [extended_code]
  2334.         call    operand_autodetect
  2335.         call    store_instruction
  2336.         jmp     instruction_assembled
  2337.       movx_unknown_size:
  2338.         cmp     [error_line],0
  2339.         jne     movx_mem_8bit
  2340.         mov     eax,[current_line]
  2341.         mov     [error_line],eax
  2342.         mov     [error],operand_size_not_specified
  2343.       movx_mem_8bit:
  2344.         call    operand_autodetect
  2345.         call    store_instruction
  2346.         jmp     instruction_assembled
  2347.       movx_reg:
  2348.         lods    byte [esi]
  2349.         call    convert_register
  2350.         pop     ebx
  2351.         xchg    bl,al
  2352.         cmp     ah,al
  2353.         jae     invalid_operand_size
  2354.         cmp     ah,1
  2355.         je      movx_reg_8bit
  2356.         cmp     ah,2
  2357.         je      movx_reg_16bit
  2358.         jmp     invalid_operand_size
  2359.       movx_reg_8bit:
  2360.         call    operand_autodetect
  2361.         call    store_nomem_instruction
  2362.         jmp     instruction_assembled
  2363.       movx_reg_16bit:
  2364.         call    operand_autodetect
  2365.         inc     [extended_code]
  2366.         call    store_nomem_instruction
  2367.         jmp     instruction_assembled
  2368. movsxd_instruction:
  2369.         mov     [base_code],al
  2370.         lods    byte [esi]
  2371.         call    get_size_operator
  2372.         cmp     al,10h
  2373.         jne     invalid_operand
  2374.         lods    byte [esi]
  2375.         call    convert_register
  2376.         mov     [postbyte_register],al
  2377.         cmp     ah,8
  2378.         jne     invalid_operand_size
  2379.         lods    byte [esi]
  2380.         cmp     al,','
  2381.         jne     invalid_operand
  2382.         mov     [operand_size],0
  2383.         lods    byte [esi]
  2384.         call    get_size_operator
  2385.         cmp     al,10h
  2386.         je      movsxd_reg
  2387.         cmp     al,'['
  2388.         jne     invalid_operand
  2389.         call    get_address
  2390.         cmp     [operand_size],4
  2391.         je      movsxd_mem_store
  2392.         cmp     [operand_size],0
  2393.         jne     invalid_operand_size
  2394.       movsxd_mem_store:
  2395.         call    operand_64bit
  2396.         call    store_instruction
  2397.         jmp     instruction_assembled
  2398.       movsxd_reg:
  2399.         lods    byte [esi]
  2400.         call    convert_register
  2401.         cmp     ah,4
  2402.         jne     invalid_operand_size
  2403.         mov     bl,al
  2404.         call    operand_64bit
  2405.         call    store_nomem_instruction
  2406.         jmp     instruction_assembled
  2407. bt_instruction:
  2408.         mov     [postbyte_register],al
  2409.         shl     al,3
  2410.         add     al,83h
  2411.         mov     [extended_code],al
  2412.         mov     [base_code],0Fh
  2413.         lods    byte [esi]
  2414.         call    get_size_operator
  2415.         cmp     al,10h
  2416.         je      bt_reg
  2417.         cmp     al,'['
  2418.         jne     invalid_operand
  2419.         call    get_address
  2420.         push    eax bx cx
  2421.         lods    byte [esi]
  2422.         cmp     al,','
  2423.         jne     invalid_operand
  2424.         cmp     byte [esi],'('
  2425.         je      bt_mem_imm
  2426.         cmp     byte [esi],11h
  2427.         jne     bt_mem_reg
  2428.         cmp     byte [esi+2],'('
  2429.         je      bt_mem_imm
  2430.       bt_mem_reg:
  2431.         lods    byte [esi]
  2432.         call    get_size_operator
  2433.         cmp     al,10h
  2434.         jne     invalid_operand
  2435.         lods    byte [esi]
  2436.         call    convert_register
  2437.         mov     [postbyte_register],al
  2438.         pop     cx bx edx
  2439.         mov     al,ah
  2440.         call    operand_autodetect
  2441.         call    store_instruction
  2442.         jmp     instruction_assembled
  2443.       bt_mem_imm:
  2444.         xor     al,al
  2445.         xchg    al,[operand_size]
  2446.         push    eax
  2447.         lods    byte [esi]
  2448.         call    get_size_operator
  2449.         cmp     al,'('
  2450.         jne     invalid_operand
  2451.         mov     al,[operand_size]
  2452.         or      al,al
  2453.         jz      bt_mem_imm_size_ok
  2454.         cmp     al,1
  2455.         jne     invalid_operand_size
  2456.       bt_mem_imm_size_ok:
  2457.         call    get_byte_value
  2458.         mov     byte [value],al
  2459.         pop     eax
  2460.         or      al,al
  2461.         jz      bt_mem_imm_nosize
  2462.         call    operand_autodetect
  2463.       bt_mem_imm_store:
  2464.         pop     cx bx edx
  2465.         mov     [extended_code],0BAh
  2466.         call    store_instruction_with_imm8
  2467.         jmp     instruction_assembled
  2468.       bt_mem_imm_nosize:
  2469.         cmp     [error_line],0
  2470.         jne     bt_mem_imm_store
  2471.         mov     eax,[current_line]
  2472.         mov     [error_line],eax
  2473.         mov     [error],operand_size_not_specified
  2474.         jmp     bt_mem_imm_store
  2475.       bt_reg:
  2476.         lods    byte [esi]
  2477.         call    convert_register
  2478.         mov     bl,al
  2479.         lods    byte [esi]
  2480.         cmp     al,','
  2481.         jne     invalid_operand
  2482.         cmp     byte [esi],'('
  2483.         je      bt_reg_imm
  2484.         cmp     byte [esi],11h
  2485.         jne     bt_reg_reg
  2486.         cmp     byte [esi+2],'('
  2487.         je      bt_reg_imm
  2488.       bt_reg_reg:
  2489.         lods    byte [esi]
  2490.         call    get_size_operator
  2491.         cmp     al,10h
  2492.         jne     invalid_operand
  2493.         lods    byte [esi]
  2494.         call    convert_register
  2495.         mov     [postbyte_register],al
  2496.         mov     al,ah
  2497.         call    operand_autodetect
  2498.         call    store_nomem_instruction
  2499.         jmp     instruction_assembled
  2500.       bt_reg_imm:
  2501.         xor     al,al
  2502.         xchg    al,[operand_size]
  2503.         push    eax ebx
  2504.         lods    byte [esi]
  2505.         call    get_size_operator
  2506.         cmp     al,'('
  2507.         jne     invalid_operand
  2508.         mov     al,[operand_size]
  2509.         or      al,al
  2510.         jz      bt_reg_imm_size_ok
  2511.         cmp     al,1
  2512.         jne     invalid_operand_size
  2513.       bt_reg_imm_size_ok:
  2514.         call    get_byte_value
  2515.         mov     byte [value],al
  2516.         pop     ebx eax
  2517.         call    operand_autodetect
  2518.       bt_reg_imm_store:
  2519.         mov     [extended_code],0BAh
  2520.         call    store_nomem_instruction
  2521.         mov     al,byte [value]
  2522.         stos    byte [edi]
  2523.         jmp     instruction_assembled
  2524. bs_instruction:
  2525.         mov     [extended_code],al
  2526.         mov     [base_code],0Fh
  2527.         lods    byte [esi]
  2528.         call    get_size_operator
  2529.         cmp     al,10h
  2530.         jne     invalid_operand
  2531.         lods    byte [esi]
  2532.         call    convert_register
  2533.         mov     [postbyte_register],al
  2534.         lods    byte [esi]
  2535.         cmp     al,','
  2536.         jne     invalid_operand
  2537.         lods    byte [esi]
  2538.         call    get_size_operator
  2539.         cmp     al,10h
  2540.         je      bs_reg_reg
  2541.         cmp     al,'['
  2542.         jne     invalid_argument
  2543.         call    get_address
  2544.         mov     al,[operand_size]
  2545.         call    operand_autodetect
  2546.         call    store_instruction
  2547.         jmp     instruction_assembled
  2548.       bs_reg_reg:
  2549.         lods    byte [esi]
  2550.         call    convert_register
  2551.         mov     bl,al
  2552.         mov     al,ah
  2553.         call    operand_autodetect
  2554.         call    store_nomem_instruction
  2555.         jmp     instruction_assembled
  2556. imul_instruction:
  2557.         mov     [base_code],0F6h
  2558.         mov     [postbyte_register],5
  2559.         lods    byte [esi]
  2560.         call    get_size_operator
  2561.         cmp     al,10h
  2562.         je      imul_reg
  2563.         cmp     al,'['
  2564.         jne     invalid_operand
  2565.       imul_mem:
  2566.         call    get_address
  2567.         mov     al,[operand_size]
  2568.         cmp     al,1
  2569.         je      imul_mem_8bit
  2570.         jb      imul_mem_nosize
  2571.         call    operand_autodetect
  2572.         inc     [base_code]
  2573.         call    store_instruction
  2574.         jmp     instruction_assembled
  2575.       imul_mem_nosize:
  2576.         cmp     [error_line],0
  2577.         jne     imul_mem_8bit
  2578.         mov     eax,[current_line]
  2579.         mov     [error_line],eax
  2580.         mov     [error],operand_size_not_specified
  2581.       imul_mem_8bit:
  2582.         call    store_instruction
  2583.         jmp     instruction_assembled
  2584.       imul_reg:
  2585.         lods    byte [esi]
  2586.         call    convert_register
  2587.         cmp     byte [esi],','
  2588.         je      imul_reg_
  2589.         mov     bl,al
  2590.         mov     al,ah
  2591.         cmp     al,1
  2592.         je      imul_reg_8bit
  2593.         call    operand_autodetect
  2594.         inc     [base_code]
  2595.         call    store_nomem_instruction
  2596.         jmp     instruction_assembled
  2597.       imul_reg_8bit:
  2598.         call    store_nomem_instruction
  2599.         jmp     instruction_assembled
  2600.       imul_reg_:
  2601.         mov     [postbyte_register],al
  2602.         inc     esi
  2603.         cmp     byte [esi],'('
  2604.         je      imul_reg_imm
  2605.         cmp     byte [esi],11h
  2606.         jne     imul_reg_noimm
  2607.         cmp     byte [esi+2],'('
  2608.         je      imul_reg_imm
  2609.       imul_reg_noimm:
  2610.         lods    byte [esi]
  2611.         call    get_size_operator
  2612.         cmp     al,10h
  2613.         je      imul_reg_reg
  2614.         cmp     al,'['
  2615.         jne     invalid_operand
  2616.       imul_reg_mem:
  2617.         call    get_address
  2618.         push    edx bx cx
  2619.         cmp     byte [esi],','
  2620.         je      imul_reg_mem_imm
  2621.         mov     al,[operand_size]
  2622.         call    operand_autodetect
  2623.         pop     cx bx edx
  2624.         mov     [base_code],0Fh
  2625.         mov     [extended_code],0AFh
  2626.         call    store_instruction
  2627.         jmp     instruction_assembled
  2628.       imul_reg_mem_imm:
  2629.         inc     esi
  2630.         lods    byte [esi]
  2631.         call    get_size_operator
  2632.         cmp     al,'('
  2633.         jne     invalid_operand
  2634.         mov     al,[operand_size]
  2635.         cmp     al,2
  2636.         je      imul_reg_mem_imm_16bit
  2637.         cmp     al,4
  2638.         je      imul_reg_mem_imm_32bit
  2639.         cmp     al,8
  2640.         je      imul_reg_mem_imm_64bit
  2641.         jmp     invalid_operand_size
  2642.       imul_reg_mem_imm_16bit:
  2643.         call    operand_16bit
  2644.         call    get_word_value
  2645.         mov     word [value],ax
  2646.         cmp     [value_type],0
  2647.         jne     imul_reg_mem_imm_16bit_store
  2648.         cmp     [size_declared],0
  2649.         jne     imul_reg_mem_imm_16bit_store
  2650.         cmp     ax,-80h
  2651.         jl      imul_reg_mem_imm_16bit_store
  2652.         cmp     ax,80h
  2653.         jl      imul_reg_mem_imm_8bit_store
  2654.       imul_reg_mem_imm_16bit_store:
  2655.         pop     cx bx edx
  2656.         mov     [base_code],69h
  2657.         call    store_instruction_with_imm16
  2658.         jmp     instruction_assembled
  2659.       imul_reg_mem_imm_32bit:
  2660.         call    operand_32bit
  2661.         call    get_dword_value
  2662.       imul_reg_mem_imm_32bit_ok:
  2663.         mov     dword [value],eax
  2664.         cmp     [value_type],0
  2665.         jne     imul_reg_mem_imm_32bit_store
  2666.         cmp     [size_declared],0
  2667.         jne     imul_reg_mem_imm_32bit_store
  2668.         cmp     eax,-80h
  2669.         jl      imul_reg_mem_imm_32bit_store
  2670.         cmp     eax,80h
  2671.         jl      imul_reg_mem_imm_8bit_store
  2672.       imul_reg_mem_imm_32bit_store:
  2673.         pop     cx bx edx
  2674.         mov     [base_code],69h
  2675.         call    store_instruction_with_imm32
  2676.         jmp     instruction_assembled
  2677.       imul_reg_mem_imm_64bit:
  2678.         cmp     [size_declared],0
  2679.         jne     long_immediate_not_encodable
  2680.         call    operand_64bit
  2681.         call    get_simm32
  2682.         cmp     [value_type],4
  2683.         jae     long_immediate_not_encodable
  2684.         jmp     imul_reg_mem_imm_32bit_ok
  2685.       imul_reg_mem_imm_8bit_store:
  2686.         pop     cx bx edx
  2687.         mov     [base_code],6Bh
  2688.         call    store_instruction_with_imm8
  2689.         jmp     instruction_assembled
  2690.       imul_reg_imm:
  2691.         mov     bl,[postbyte_register]
  2692.         dec     esi
  2693.         jmp     imul_reg_reg_imm
  2694.       imul_reg_reg:
  2695.         lods    byte [esi]
  2696.         call    convert_register
  2697.         mov     bl,al
  2698.         cmp     byte [esi],','
  2699.         je      imul_reg_reg_imm
  2700.         mov     al,ah
  2701.         call    operand_autodetect
  2702.         mov     [base_code],0Fh
  2703.         mov     [extended_code],0AFh
  2704.         call    store_nomem_instruction
  2705.         jmp     instruction_assembled
  2706.       imul_reg_reg_imm:
  2707.         inc     esi
  2708.         lods    byte [esi]
  2709.         call    get_size_operator
  2710.         cmp     al,'('
  2711.         jne     invalid_operand
  2712.         mov     al,[operand_size]
  2713.         cmp     al,2
  2714.         je      imul_reg_reg_imm_16bit
  2715.         cmp     al,4
  2716.         je      imul_reg_reg_imm_32bit
  2717.         cmp     al,8
  2718.         je      imul_reg_reg_imm_64bit
  2719.         jmp     invalid_operand_size
  2720.       imul_reg_reg_imm_16bit:
  2721.         call    operand_16bit
  2722.         push    ebx
  2723.         call    get_word_value
  2724.         pop     ebx
  2725.         mov     dx,ax
  2726.         cmp     [value_type],0
  2727.         jne     imul_reg_reg_imm_16bit_store
  2728.         cmp     [size_declared],0
  2729.         jne     imul_reg_reg_imm_16bit_store
  2730.         cmp     ax,-80h
  2731.         jl      imul_reg_reg_imm_16bit_store
  2732.         cmp     ax,80h
  2733.         jl      imul_reg_reg_imm_8bit_store
  2734.       imul_reg_reg_imm_16bit_store:
  2735.         mov     [base_code],69h
  2736.         call    store_nomem_instruction
  2737.         mov     ax,dx
  2738.         call    mark_relocation
  2739.         stos    word [edi]
  2740.         jmp     instruction_assembled
  2741.       imul_reg_reg_imm_32bit:
  2742.         call    operand_32bit
  2743.         push    ebx
  2744.         call    get_dword_value
  2745.       imul_reg_reg_imm_32bit_ok:
  2746.         pop     ebx
  2747.         mov     edx,eax
  2748.         cmp     [value_type],0
  2749.         jne     imul_reg_reg_imm_32bit_store
  2750.         cmp     [size_declared],0
  2751.         jne     imul_reg_reg_imm_32bit_store
  2752.         cmp     eax,-80h
  2753.         jl      imul_reg_reg_imm_32bit_store
  2754.         cmp     eax,80h
  2755.         jl      imul_reg_reg_imm_8bit_store
  2756.       imul_reg_reg_imm_32bit_store:
  2757.         mov     [base_code],69h
  2758.         call    store_nomem_instruction
  2759.         mov     eax,edx
  2760.         call    mark_relocation
  2761.         stos    dword [edi]
  2762.         jmp     instruction_assembled
  2763.       imul_reg_reg_imm_64bit:
  2764.         cmp     [size_declared],0
  2765.         jne     long_immediate_not_encodable
  2766.         call    operand_64bit
  2767.         push    ebx
  2768.         call    get_simm32
  2769.         cmp     [value_type],4
  2770.         jae     long_immediate_not_encodable
  2771.         jmp     imul_reg_reg_imm_32bit_ok
  2772.       imul_reg_reg_imm_8bit_store:
  2773.         mov     [base_code],6Bh
  2774.         call    store_nomem_instruction