var patch

var x

var y



gmi eip,CODEBASE

mov x,$RESULT

ask "введите размер секции кода(Enter the size  section code)"

mov y,$RESULT



gpa  "GetProcAddress","kernel32.dll"

bp $RESULT

run

bc eip

rtu

find eip,#893C8A807F0555#

cmp $RESULT,0

je quit

mov patch,$RESULT

mov [patch],#89048A#



bprm x,y

run

cmt eip,"OEP"

bpmc

MSG "OEP Faund! Import recover!"

ret

quit:

MSG "Not CrypToCrackPeProtector0.9.2"

ret