Anasayfa
tarafından Evet ilk olarak şu kodu ana modülümüze ekleyelim:
Daha sonra LoadOffSets'e:
Ekleyin.Her patch değişir.Güncelleyin...
Function SendPackets(pPacket() As Byte)
Dim pSize As Long
Dim pCode() As Byte
pSize = UBound(pPacket) - LBound(pPacket) + 1
If BytesAddr = 0 Then
BytesAddr = VirtualAllocEx(KO_HANDLE, 0, 1024, MEM_COMMIT, PAGE_READWRITE)
End If
If BytesAddr <> 0 Then
WriteByteArray BytesAddr, pPacket, pSize
ConvHEX2ByteArray "608B0D" & AlignDWORD(KO_PTR_PKT) & "68" & AlignDWORD(pSize) & "68" & AlignDWORD(BytesAddr) & "BF" & AlignDWORD(KO_SND_FNC) & "FFD7C605" & AlignDWORD(KO_PTR_PKT + &HC0) & "0061C3", pCode
ExecuteRemoteCode pCode, True
End If
VirtualFreeEx KO_HANDLE, BytesAddr, 0, MEM_RELEASE&
End Function
Daha sonra LoadOffSets'e:
KO_SND_FNC = &H475390
Ekleyin.Her patch değişir.Güncelleyin...
