-p fffff silent 1
AX=0000 BX=0000 CX=0000 DX=0000 SP=FFFC BP=0000 SI=0000 DI=0000
DS=1DF2 ES=1DF2 SS=1DF2 CS=1DF2 IP=0204 NV UP EI PL ZR NA PE NC
1DF2:0204 C3                retn
AX=0000 BX=0000 CX=0000 DX=0000 SP=FFFE BP=0000 SI=0000 DI=0000
DS=1DF2 ES=1DF2 SS=1DF2 CS=1DF2 IP=0104 NV UP EI PL ZR NA PE NC
1DF2:0104 90                nop
-re.list
@R; @r dco2 or= v2; @if byte [cs:eip] == c3 then r v2 = 8000
-

@r; @r dco2 or= v2; @r v2= 0; @r v3 = 0; @:checkprefix; @if not (value byte [cs:eip + v3] in f3,f2,66,67) then goto :checkinst; @r v3 += 1; @goto :checkprefix; @:checkinst; @if (value byte [cs:eip + v3] in c2, c3, ca, cb, cf) then r v2=8000

re.replace @r; @r dco2 or=v2; @r v2=0; @r v3=0; @:prefix; @if not (value byte [cs:eip+v3] in f3,f2,f0,64,65,66,67,26,2e,36,3e) then goto :inst; @r v3+=1; @goto :prefix; @:inst; @if (value byte [cs:eip+v3] in c2,c3,ca,cb,cf) then r v2=8000