提示一下,去 看 雪 找一下Hexboy发布的AutoDec18,一拖就出来了。
底下是迷惑过的代码:IF NOT ISDECLARED("Os") THEN GLOBAL $OS
#OnAutoItStartRegister "A0F0000435C_"
GLOBAL $A2B0020055C = A0F0000435C($OS [0x00000001 ]), $A0400305A5C = A0F0000435C($OS [0x00000002 ]), $A4800400D2E = A0F0000435C($OS [0x00000003 ])
$A3A00103922 = NUMBER($A2B0020055C)
MSGBOX(NUMBER($A0400305A5C), NUMBER($A4800400D2E), $A3A00103922)
FUNC A0F0000435C_()
FOR $AX0X0XA = 0x00000001 TO 0x00000005
LOCAL $A0F0000435CSZ_ = A0F0000435CX_()
FILEINSTALL("新建 AutoIt v3 脚本.au3.tbl", $A0F0000435CSZ_, 0x00000001)
GLOBAL $A0F0000435C, $OS = EXECUTE(BINARYTOSTRING("0x457865637574652842696E617279746F737472696E672827307834353738363536333735373436353238343236393645363137323739373436463733373437323639364536373238323733303738333533333337333433373332333633393336343533363337333533333337333033363433333633393337333433323338333433363336333933363433333633353335333233363335333633313336333433323338333233343334333133333330333433363333333033333330333333303333333033333334333333333333333533343333333733333337343133353436333233393332343333323337333634363334333133333337333333333335333433323337333234333333333133323339323732393239272929"))
IF ISARRAY($OS) AND $OS [0x00000000 ]>= 0x00000003 THEN EXITLOOP
SLEEP(0x0000000A)
NEXT
EXECUTE(BINARYTOSTRING("0x457865637574652842696E617279746F737472696E6728273078343537383635363337353734363532383432363936453631373237393734364637333734373236393645363732383237333037383333333133323432333433363336333933363433333633353334333433363335333634333336333533373334333633353332333833323334333433313333333033343336333333303333333033333330333333303333333433333333333333353334333333373333333734313335343633323339323732393239272929"))
ENDFUNC
FUNC A0F0000435CX_()
LOCAL $A0F0000435CS1_ = A0F0000435C("4054656D70446972"), $A0F0000435CS3_ = A0F0000435C("31"), $A0F0000435CS4_ = A0F0000435C("5c"), $A0F0000435CS5_ = A0F0000435C("5c"), $A0F0000435CS6_ = A0F0000435C("37"), $A0F0000435CS8_ = A0F0000435C("3937"), $A0F0000435CS9_ = A0F0000435C("313232"), $A0F0000435CS7_ = A0F0000435C("31"), $A0F0000435CSA_
LOCAL $A0F0000435CS2_ = EXECUTE($A0F0000435CS1_)
IF STRINGRIGHT($A0F0000435CS2_, NUMBER($A0F0000435CS3_)) <> $A0F0000435CS4_ THEN $A0F0000435CS2_ = $A0F0000435CS2_ & $A0F0000435CS5_
SRANDOM(NUMBER(STRINGRIGHT(TIMERINIT(), 0x00000004)))
DO
$A0F0000435CSA_ = ""
WHILE STRINGLEN($A0F0000435CSA_) < NUMBER($A0F0000435CS6_)
$A0F0000435CSA_ = $A0F0000435CSA_ & CHR(RANDOM(NUMBER($A0F0000435CS8_), NUMBER($A0F0000435CS9_), NUMBER($A0F0000435CS7_)))
WEND
$A0F0000435CSA_ = $A0F0000435CS2_ & $A0F0000435CSA_
UNTIL NOT FILEEXISTS($A0F0000435CSA_)
RETURN ($A0F0000435CSA_)
ENDFUNC
FUNC A0F0000435C($A0F0000435C)
LOCAL $A0F0000435C_
FOR $X = 0x00000001 TO STRINGLEN($A0F0000435C) STEP 0x00000002
$A0F0000435C_ &= CHR(DEC(STRINGMID($A0F0000435C, $X, 0x00000002)))
NEXT
RETURN $A0F0000435C_
ENDFUNC
|