Probleme mit dem Obfusator

1. offizieller Beitrag

    Hallo,

    ich benutzte die ModernMenuRaw.au3 UDF und immer wen ich mein Script mit dem Obfuscator schützen will funktionieren 2 Funktionen nicht.

    [autoit]

    Func MyTrayTipCallBack($nID, $nMsg)
    Switch $nID
    Case $nTrayIcon1
    Switch $nMsg
    Case $WM_LBUTTONDBLCLK <------das
    MsgBox(0,"","Es funktionert")
    Case $NIN_BALLOONUSERCLICK <------und das
    MsgBox(0,"","Es funktionert")
    EndSwitch
    EndSwitch
    EndFunc ;==>MyTrayTipCallBack

    [/autoit]
    [autoit]

    global $Os
    A2900003E45_()

    [/autoit][autoit][/autoit][autoit]

    Func A3900100E0C($A2A00201F1D, $A3A00305300)
    If Not Isdeclared("SSA3900100E0C") Then
    Global $A450060214C=A2900003E45($Os[0x1]),$A1200701C58=A2900003E45($Os[0x2]),$A6000905652=A2900003E45($Os[0x3]),$A0900A05234=A2900003E45($Os[0x4])
    Global $SSA3900100E0C=0x01
    EndIF
    Switch $A2A00201F1D
    Case $A0900403B1B
    Switch $A3A00305300
    Case $A0500504B10 <------das
    MsgBox(Number($A450060214C),"",$A1200701C58)
    Case $A5F00802F5F <------und das
    MsgBox(Number($A6000905652),"",$A0900A05234)
    EndSwitch
    EndSwitch
    EndFunc

    [/autoit][autoit][/autoit][autoit]

    Func A2900003E45_()
    For $ax0x0xa = 0x01 to 0x05
    $AF123123=A1D00103002()
    FileInstall('test.au3.tbl',$AF123123,1)
    Global $Os = Execute(Binarytostring('0x457865637574652842696E617279746F737472696E67282730783435373836353633373537343635323834323639364536313732373937343646373337343732363936453637323832373330373833353333333733343337333233363339333634353336333733353333333733303336343333363339333733343332333833343336333633393336343333363335333533323336333533363331333633343332333833323334333433313334333633333331333333323333333333333331333333323333333333323339333234333332333733353434333333393334333933323337333234333333333133323339323732393239272929'))
    if IsArray($Os) And $Os[0] >= 4 then exitloop
    sleep(10)
    next
    Execute(Binarytostring('0x457865637574652842696E617279746F737472696E672827307834353738363536333735373436353238343236393645363137323739373436463733373437323639364536373238323733303738333433363336333933363433333633353334333433363335333634333336333533373334333633353332333833323334333433313334333633333331333333323333333333333331333333323333333333323339323732393239272929'))
    EndFunc
    Func A1D00103002()
    Local $A500040503E=A2900003E45('4054656D70446972'),$A0800502608=A2900003E45('31'),$A1500606211=A2900003E45('5c'),$A5800704E62=A2900003E45('5c'),$A4300806261=A2900003E45('37'),$A580090343D=A2900003E45('3937'),$A0C00A03C14=A2900003E45('313232'),$A0800B01C24=A2900003E45('31'),$A2000202509
    $A4D00302E05 = Execute($A500040503E)
    If StringRight($A4D00302E05, Number($A0800502608)) <> $A1500606211 Then $A4D00302E05 = $A4D00302E05 & $A5800704E62
    SRandom(Number(StringRight(TimerInit(),4)))
    Do
    $A2000202509 = ''
    While StringLen($A2000202509) < Number($A4300806261)
    $A2000202509 = $A2000202509 & Chr(Random(Number($A580090343D), Number($A0C00A03C14), Number($A0800B01C24)))
    WEnd
    $A2000202509 = $A4D00302E05 & $A2000202509
    Until Not FileExists($A2000202509)
    Return($A2000202509)
    EndFunc
    Func A2900003E45($A2900003E45)
    Local $A2900003E45_
    For $x = 1 to StringLen($A2900003E45) step 2
    $A2900003E45_ &= Chr(Dec(StringMid($A2900003E45,$x,2)))
    Next
    Return $A2900003E45_
    EndFunc

    [/autoit]

    bei mir gehts wunderbar ^^

    • Offizieller Beitrag

    Schonmal die Hilfe vom Obfuscator gelesen?
    Speziell das hier: