/*
Decode Of Au3 Program
Script written by 吾爱研究(DDRS)
WebSite : www.52pojie.cn
E-Mail : 输入自己的邮箱即可@qq.com
version : v2015
Date : 2001.6.9
Test Environment : OllyDbg 1.1
ODBGScript 1.51 under WINXP SP3
Thanks : Oleh Yuschuk - author of OllyDbg
SHaG - author of OllyScript
*/
var strlen
var y
var str
var myeax
var myecx
var mystr
var tmp
var fn
bp 41FDD8
RUN
testver:
mov tmp,[eip+2],2
cmp tmp,0875
je main
notok:
msg "AU3程序版本不对!(Not the AU3 Version!)"
ret
main:
ask "请输入要保存的文件名(FileName.au3):"
cmp $RESULT, 0
je main
mov fn, $RESULT
mov y,"#"
add y,"include <GUIConstants.au3>"
wrt fn,y
mov myeax,1
getnextbase:
cmp y,"EndFunc"
je ExitScript
mov myecx,ecx
mov tmp,myeax
shl tmp,2
add myecx,tmp
sub myecx,4
mov mystr,[myecx]
WriteFile:
find mystr,"lobal"
mov strlen,$RESULT
sub strlen,mystr
cmp strlen,1
je loopnext
ExitScript:
msg "Good Luck!\r\n If You'v Found the BUG of My Code \r\n You Can Edit It As You Can\r\n And Please Send Me A Copy \r\nQQ:1668801075"
ret
===================================================================