union opcodestring
 s as byte ptr
 f as function () as long
end union

dim as string st
dim as opcodestring act

'0:  33 c0                   xor    eax,eax
'2:  40                      inc    eax
'3:  c3                      ret
'st=chr$(&h33)+chr$(&hc0)+chr$(&h40)+chr$(&hc3)                                     ' xor eax,eax inc eax ret


' 0:  66 b8 0a 00             mov    ax,0xa
' 4:  00 00                   add    BYTE PTR [eax],al
' 6:  c3                      ret
'st=chr$(&h66)+chr$(&hb8)+chr$(&h0a)+chr$(&h00)+chr$(&h00)+chr$(&h00)+chr$(&hc3)    ' mov eax,10 ret

st=chr( _
    &hB8, &h0A, &h00, &h00, &h00, _    ' mov eax, 10
    &hC3 _                             ' ret
)

st=chr( _
    &h66, &hB8, &h0A, &h00, _  ' mov eax, 10
    &hC3 _                     ' ret
)


act.s=strptr(st)
asm xor eax,eax     'eax auf 0 setzen
print act.f()