bana tuslu hile kodlama lazım

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Onaylı Üye
Katılım
20 Ağu 2016
Mesajlar
105
Tepki puanı
116
Yaş
40
9 HİZMET YILI
slm herkese bana tuslu hile kodlama lazım yardımcı olcak olan var öm atabilir mi yada video lınkı ve metın belgesıde olabılır 
örneğin: 
Base Return [Q]
Team Kill [F7]
gibi vb daha acemiyim ama kabiliyetim var sadece video ve metın belgesi olabilir simdiden kolay gelsin iyi forumlar..
 
Onaylı Üye
Katılım
20 Ağu 2016
Mesajlar
105
Tepki puanı
116
Yaş
40
9 HİZMET YILI
Tmm buldum sagolun arkadaslar http://memoryhackers.org/konu-wolftü-takla-kodlama-tus-ile-calistirma.mh?pid=208398

SaLDarkBlue' Alıntı:
sanırsam öyle bişi mümkün değil istediğin gibi ayarlama.
kardesım sen ayakta uyuyon galiba tuslu hile onceden var ama kodlamayı bılmıyodum buldum onuda konuda paylastım bakarsın ogrenırsın

Fufuker' Alıntı:
GetAsyncKeyState fonksiyonunu kullanabilirsin.
tsk ederım baskan
 
Nothing.
Süper Üye
Katılım
30 Nis 2016
Mesajlar
957
Tepki puanı
37
10 HİZMET YILI
Public class altına:

PHP:
<Runtime.InteropServices.DllImport("user32.dll")> _
 Public Shared Function GetAsyncKeyState(ByVal vKey As System.Windows.Forms.Keys) As Short
 End Function


Base Return(Timer'e yazılıcak):


PHP:
If GetAsyncKeyState(Keys.Q) Then
           Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
           For Each moz As System.Diagnostics.ProcessModule In p.Modules
               If moz.FileName.IndexOf("csh") <> -1 Then
                   Label1.Text = moz.BaseAddress.ToString
               End If
           Next
           WriteLong("wolftü.bin", Label3.Text +&HPOINTER, "VALUE")
         End If


TeamKill(Timere yazılıcak):


PHP:
If GetAsyncKeyState(Keys.F7) Then
           Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
           For Each moz As System.Diagnostics.ProcessModule In p.Modules
               If moz.FileName.IndexOf("obj") <> -1 Then
                   Label3.Text = moz.BaseAddress.ToString
               End If
           Next
           WriteLong("wolftü.bin", Label3.Text +&HPOINTER, "VALUE")
         End If
POİNTER VE VALUE KISMINI POİNTER KATEGORİSİNDEN BULABİLİRSİN.
İyi Forumlar.
 
Onaylı Üye
Katılım
20 Ağu 2016
Mesajlar
105
Tepki puanı
116
Yaş
40
9 HİZMET YILI
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...