Onaylı Üye
SA BEYLER BAYANLAR BEN BABASURA61 NEDEN BÖYLE BOK GİBİ BİR İSİM KULLANDIN DİYE SORACAKSANIZ NEDENİNİ BİLMİYORUM SURALARLA FANTEZİM VAR DİYEBİLİRİM.
İLK ÖNCE BEYLER ŞU KODU PUBLİC_CLASIN ALTINA YAZIN
BU KOD AYNI ZAMANDA BASE RETURN F1 BASMA KODU NEYSE
[font=Monaco, Consolas, Courier, monospace][/FONT]
[font=Monaco, Consolas, Courier, monospace][/FONT]
EVET BEYLER BU KODU YAPIŞTIRDIKTAN SONRA ŞU KODLARI FORM1_LOADIN ALTINA ŞU KODLARI YAPIŞTIRIYORUZ
NOT: BAZILARI TİMERE YAPIŞTIRIP ENABLEDİ TRUE YAPIYOR BU ZATEN AYNI ŞEY ASLINDA BOŞUNA TİMER HARCIYORLAR
[font=Monaco, Consolas, Courier, monospace][/FONT]
[font=Monaco, Consolas, Courier, monospace][/FONT]
BU ŞEKİLDE YAPTIĞIMIZ ZAMAN KESİNLİKLE OLACAKTIR BUNU LOADER ŞEKLİNDE YAPMANIZI TAVSİYE ETMİYORUM KESİNLİKLE ÇÜNKÜ READYMEMORY VE WRİTEPOİNTER TAM İŞLENMİYOR VE HİLE OLMUYOR TAVSİYEM HEM BYPASS HEM LOADER HEM HİLE YAPMAYIN BİR ARADA OLMUYOR.
İLK ÖNCE BEYLER ŞU KODU PUBLİC_CLASIN ALTINA YAZIN
BU KOD AYNI ZAMANDA BASE RETURN F1 BASMA KODU NEYSE
[font=Monaco, Consolas, Courier, monospace][/FONT]
PHP:
<Runtime.InteropServices.DllImport("user32.dll")> _
Public Shared Function GetAsyncKeyState(ByVal vKey As System.Windows.Forms.Keys) As Short
End FunctionEVET BEYLER BU KODU YAPIŞTIRDIKTAN SONRA ŞU KODLARI FORM1_LOADIN ALTINA ŞU KODLARI YAPIŞTIRIYORUZ
NOT: BAZILARI TİMERE YAPIŞTIRIP ENABLEDİ TRUE YAPIYOR BU ZATEN AYNI ŞEY ASLINDA BOŞUNA TİMER HARCIYORLAR
[font=Monaco, Consolas, Courier, monospace][/FONT]
PHP:
Dim a As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In a.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
End If
Next
If (GetAsyncKeyState(Keys.F5)) Then
Dim b As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In b.Modules
If moz.FileName.IndexOf("obj") <> -1 Then
Label.Text = moz.BaseAddress.ToString
End If
Next
End If
Dim c As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In c.Modules
If moz.FileName.IndexOf("bin") <> -1 Then
Label2.Text = moz.BaseAddress.ToString
End If
NextBU ŞEKİLDE YAPTIĞIMIZ ZAMAN KESİNLİKLE OLACAKTIR BUNU LOADER ŞEKLİNDE YAPMANIZI TAVSİYE ETMİYORUM KESİNLİKLE ÇÜNKÜ READYMEMORY VE WRİTEPOİNTER TAM İŞLENMİYOR VE HİLE OLMUYOR TAVSİYEM HEM BYPASS HEM LOADER HEM HİLE YAPMAYIN BİR ARADA OLMUYOR.
