var addrvar srhvar vzvvar ifvar fnvar iatvar adrjmvar chkvar ifbask Enter start iatcmp $RESULT,0je quitmov iat,$RESULTgmi eip,CODEBASEmov srh,$RESULTloop:find srh,#90E8?3?FF#cmp $RESULT,0je quitmov addr,$RESULTmov adrjm,$RESULT+2mov vzv,$RESULT+6mov if,adrjmadd if,adrjm+4mov chk,ifand chk,F00000cmp chk,300000jne nsmov ifb,ifbuf ifbfind iat,ifbcmp $RESULT,0je manualwr:mov fn,$RESULTmov addr,#FF15#add addr,2mov addr,fnmov srh,vzvjmp loopmanual:ask enter manualcmp $RESULT,0je quitmov fn,$RESULTjmp wrns:mov srh,vzvjmp loopquit:ret