var espval
var oep
var g


mov espval,esp
sub espval,4
bphws espval, "r"
l1:
run
find eip, #64A1300000008B400C8B400C8D58208D48188333FF8B318B008B781889398D4424E0#
cmp $RESULT,0
je l1
mov g,$RESULT
bphws g,"x"
bphwc  espval
run
bphwc g
fill eip,B1,90
find eip, #68????????64FF350000000064892500000000CD03#
cmp $RESULT,0
je quit
mov oep,$RESULT
bphws oep,"x"
run
bphwc oep
sti
mov oep,[esp]
bphws oep,"x"
run
bphwc oep
MSG "OEP"
ret
quit
MSG ":("
ret






