Tuşlu Always Nasıl Kodlarım ?

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Seçkin Üye
Katılım
12 Ara 2016
Mesajlar
509
Tepki puanı
13
9 HİZMET YILI
Selaymün Aleyküm ßeyLer Tuşlu Always Hs Nasıl Kodlarım Yardımcı Olurmusunuz  Araştırdım Bulamadım

Mesala Dword'daki Gibi Shifte Basınca Kafaya Basmayınca Gövdeye Gidiyor ya Aynısını Nası Yaparım Anlatırsanız +1 Rep Veririm

İyi Forumlar
 
Seçkin Üye
Katılım
5 Kas 2016
Mesajlar
425
Tepki puanı
2
9 HİZMET YILI
Public Class Form'un Altına Şu Kodu Yapıştır.
Kod:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Daha Sonra

Always'ın ON Kısmını Bir Timere Kodla Şöyle : (Key.F7) Yerine İStediğin Tuşu Ayarla. 
Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566441904") 'Always HeadShout On
        End If

Daha Sonra Alwaysın OFFsetini de Ayrı Bir Timere Kodla Onuda İstediğin Tuşla Ayarla. Ama Ayrı Ayrı Tuş Olsun. Aynı Tuş Olmasın.

Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566490674") 'Always HeadShout Of
        End If

Daha Sonra Bu İki Timerin Ayarları Şöyle Olsun

Enabled  = False

Interval = 1
 
Onaylı Üye
Katılım
8 Mar 2016
Mesajlar
149
Tepki puanı
7
Ödüller
8
Yaş
26
10 HİZMET YILI
kingwar732' Alıntı:
Public Class Form'un Altına Şu Kodu Yapıştır.
Kod:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Daha Sonra

Always'ın ON Kısmını Bir Timere Kodla Şöyle : (Key.F7) Yerine İStediğin Tuşu Ayarla. 
Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566441904") 'Always HeadShout On
        End If

Daha Sonra Alwaysın OFFsetini de Ayrı Bir Timere Kodla Onuda İstediğin Tuşla Ayarla. Ama Ayrı Ayrı Tuş Olsun. Aynı Tuş Olmasın.

Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566490674") 'Always HeadShout Of
        End If

Daha Sonra Bu İki Timerin Ayarları Şöyle Olsun

Enabled  = False

Interval = 1

adamsın kardesım saol denedım çalısıyor <3
 
Süper Üye
Katılım
10 Kas 2016
Mesajlar
619
Tepki puanı
16
Yaş
23
9 HİZMET YILI
kingwar732' Alıntı:
Public Class Form'un Altına Şu Kodu Yapıştır.
Kod:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Daha Sonra

Always'ın ON Kısmını Bir Timere Kodla Şöyle : (Key.F7) Yerine İStediğin Tuşu Ayarla. 
Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566441904") 'Always HeadShout On
        End If

Daha Sonra Alwaysın OFFsetini de Ayrı Bir Timere Kodla Onuda İstediğin Tuşla Ayarla. Ama Ayrı Ayrı Tuş Olsun. Aynı Tuş Olmasın.

Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566490674") 'Always HeadShout Of
        End If

Daha Sonra Bu İki Timerin Ayarları Şöyle Olsun

Enabled  = False

Interval = 1

kingwar kardeşim bana aimbot ve anti ahh pointer verebilirmisin +1 rep veririm diğer hesaptan da veririm aimbot çok lazım anti ahh acelesi yoq bak nolur
 
Seçkin Üye
Katılım
5 Kas 2016
Mesajlar
425
Tepki puanı
2
9 HİZMET YILI
ReinHackss' Alıntı:
bakalım deniyorum olursa rep senindir

Krdşm Şöyle Diyorsun Ya Kırılıyorum. Yani Olursa Ne Demek? Olmayan Bişey Paylaşıyor muyum Bu Forumda?  :) Hem Rep Fln Alakası Yok. 

Gözüm Repte Deil. Yanlış Anlama. Ben Sadece Bunu Bilin İstiyorum. :)

Hayırlı Günler..

Koury Kouna' Alıntı:
kingwar732' Alıntı:
Public Class Form'un Altına Şu Kodu Yapıştır.
Kod:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Daha Sonra

Always'ın ON Kısmını Bir Timere Kodla Şöyle : (Key.F7) Yerine İStediğin Tuşu Ayarla. 
Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566441904") 'Always HeadShout On
        End If

Daha Sonra Alwaysın OFFsetini de Ayrı Bir Timere Kodla Onuda İstediğin Tuşla Ayarla. Ama Ayrı Ayrı Tuş Olsun. Aynı Tuş Olmasın.

Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566490674") 'Always HeadShout Of
        End If

Daha Sonra Bu İki Timerin Ayarları Şöyle Olsun

Enabled  = False

Interval = 1

kingwar kardeşim bana aimbot ve anti ahh pointer verebilirmisin +1 rep veririm diğer hesaptan da veririm aimbot çok lazım anti ahh acelesi yoq bak nolur

Krdşm Ben Herkese Öyle Pointer Vermem. Hem Repi Napim. +1 Rep Veririm Diğer Hesaptan da Veririm Diyorsun. Krdşm Zaten Böyle 

Diyenlere Vermiyorum. Sanki Dilenciyim Gibi. Tm Ben Paylaşıyorum Ztn Forumda. Konularıma Gir Bulursun. Ben Rep Fln İstemiyorum. Şöyle 

Diyorsunuz ya Sinir Oluyorum. Neyse Konularıma Gir Görürsün Konu Açıp Paylaştım.

Koury Kouna' Alıntı:
kingwar732' Alıntı:
Public Class Form'un Altına Şu Kodu Yapıştır.
Kod:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Daha Sonra

Always'ın ON Kısmını Bir Timere Kodla Şöyle : (Key.F7) Yerine İStediğin Tuşu Ayarla. 
Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566441904") 'Always HeadShout On
        End If

Daha Sonra Alwaysın OFFsetini de Ayrı Bir Timere Kodla Onuda İstediğin Tuşla Ayarla. Ama Ayrı Ayrı Tuş Olsun. Aynı Tuş Olmasın.

Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566490674") 'Always HeadShout Of
        End If

Daha Sonra Bu İki Timerin Ayarları Şöyle Olsun

Enabled  = False

Interval = 1

kingwar kardeşim bana aimbot ve anti ahh pointer verebilirmisin +1 rep veririm diğer hesaptan da veririm aimbot çok lazım anti ahh acelesi yoq bak nolur

Krdşm Ben Herkese Öyle Pointer Vermem. Hem Repi Napim. +1 Rep Veririm Diğer Hesaptan da Veririm Diyorsun. Krdşm Zaten Böyle 

Diyenlere Vermiyorum. Sanki Dilenciyim Gibi. Tm Ben Paylaşıyorum Ztn Forumda. Konularıma Gir Bulursun. Ben Rep Fln İstemiyorum. Şöyle 

Diyorsunuz ya Sinir Oluyorum. Neyse Konularıma Gir Görürsün Konu Açıp Paylaştım.
 
  • Konuyu başlatan
  • Yasaklandı
  • #10
Seçkin Üye
Katılım
12 Ara 2016
Mesajlar
509
Tepki puanı
13
9 HİZMET YILI
kingwar732' Alıntı:
ReinHackss' Alıntı:
bakalım deniyorum olursa rep senindir

Krdşm Şöyle Diyorsun Ya Kırılıyorum. Yani Olursa Ne Demek? Olmayan Bişey Paylaşıyor muyum Bu Forumda?  :) Hem Rep Fln Alakası Yok. 

Gözüm Repte Deil. Yanlış Anlama. Ben Sadece Bunu Bilin İstiyorum. :)

Hayırlı Günler..





Krdşm Ben Herkese Öyle Pointer Vermem. Hem Repi Napim. +1 Rep Veririm Diğer Hesaptan da Veririm Diyorsun. Krdşm Zaten Böyle 

Diyenlere Vermiyorum. Sanki Dilenciyim Gibi. Tm Ben Paylaşıyorum Ztn Forumda. Konularıma Gir Bulursun. Ben Rep Fln İstemiyorum. Şöyle 

Diyorsunuz ya Sinir Oluyorum. Neyse Konularıma Gir Görürsün Konu Açıp Paylaştım.





Krdşm Ben Herkese Öyle Pointer Vermem. Hem Repi Napim. +1 Rep Veririm Diğer Hesaptan da Veririm Diyorsun. Krdşm Zaten Böyle 

Diyenlere Vermiyorum. Sanki Dilenciyim Gibi. Tm Ben Paylaşıyorum Ztn Forumda. Konularıma Gir Bulursun. Ben Rep Fln İstemiyorum. Şöyle 

Diyorsunuz ya Sinir Oluyorum. Neyse Konularıma Gir Görürsün Konu Açıp Paylaştım.
yk kardesm estagfurullah facen varsa eklermsn : https://www.facebook.com/muhammet.gungor.121398
 
Słyszę, słyszę letni powiew.
Kurucu
Katılım
20 Haz 2015
Mesajlar
7,666
Çözümler
136
Tepki puanı
20,724
Ödüller
25
10 HİZMET YILI
kingwar732' Alıntı:
Public Class Form'un Altına Şu Kodu Yapıştır.
Kod:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Daha Sonra

Always'ın ON Kısmını Bir Timere Kodla Şöyle : (Key.F7) Yerine İStediğin Tuşu Ayarla. 
Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566441904") 'Always HeadShout On
        End If

Daha Sonra Alwaysın OFFsetini de Ayrı Bir Timere Kodla Onuda İstediğin Tuşla Ayarla. Ama Ayrı Ayrı Tuş Olsun. Aynı Tuş Olmasın.

Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566490674") 'Always HeadShout Of
        End If

Daha Sonra Bu İki Timerin Ayarları Şöyle Olsun

Enabled  = False

Interval = 1

Evet yukardaki arkadaşın verdiği kod işinizi görecektir.
 
  • Konuyu başlatan
  • Yasaklandı
  • #12
Seçkin Üye
Katılım
12 Ara 2016
Mesajlar
509
Tepki puanı
13
9 HİZMET YILI
nader11ndeu' Alıntı:
kingwar732' Alıntı:
Public Class Form'un Altına Şu Kodu Yapıştır.
Kod:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Daha Sonra

Always'ın ON Kısmını Bir Timere Kodla Şöyle : (Key.F7) Yerine İStediğin Tuşu Ayarla. 
Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566441904") 'Always HeadShout On
        End If

Daha Sonra Alwaysın OFFsetini de Ayrı Bir Timere Kodla Onuda İstediğin Tuşla Ayarla. Ama Ayrı Ayrı Tuş Olsun. Aynı Tuş Olmasın.

Kod:
 If (GetAsyncKeyState(Keys.F7)) Then
            On Error Resume Next
            WriteLong("wolftü.bin", Label3.Text + &H81B65, "1566490674") 'Always HeadShout Of
        End If

Daha Sonra Bu İki Timerin Ayarları Şöyle Olsun

Enabled  = False

Interval = 1

Evet yukardaki arkadaşın verdiği kod işinizi görecektir.

abi seninki gibi comboboxa nasıl kodlayabilirim dwordaki bu arada bildirim şeyi yok
 
Słyszę, słyszę letni powiew.
Kurucu
Katılım
20 Haz 2015
Mesajlar
7,666
Çözümler
136
Tepki puanı
20,724
Ödüller
25
10 HİZMET YILI
ReinHackss' Alıntı:
nader11ndeu' Alıntı:
Evet yukardaki arkadaşın verdiği kod işinizi görecektir.

abi seninki gibi comboboxa nasıl kodlayabilirim dwordaki bu arada bildirim şeyi yok

Senin yerine biz yapalım kardeşim o zaman. Her şeyi memoryhackersten beklemeyin. Evet bu forum aile gibi, evet burda herkes birbirlerine yardım ediyor. Ama sen hiçbir iş yapmıyorsun, hiç çabalamıyorsun direk milletten bekliyorsun. Git internete bak, YAZ GOOGLE AMCAYA Vb.net combobox control diye araştır. Kimse yardım etmesin şuna kendi bulsun
 
Onaylı Üye
Katılım
11 Mar 2016
Mesajlar
93
Tepki puanı
0
10 HİZMET YILI
karşim combobox ta checkbox gibi amk ingilizcen olsa bilirsin bak şimdi sana örnek jump göstericem
3 timerimiz var 1 checkbox timer 1 X1 2 X2 3 X3
Öncleikle ComboBox u enabled false yapcan
sonra checkbox a şu kodu girecen
If Checkbox1.Checked = True Then
ComboBox1.Enabled = True
End If
If Checkbox1.Checked = False Then
ComboBox1.Enabled = False
End If

ComboBox Kodları
If ComboBox.Text = "Jump X1" Then
Timer1.Start
Timer2.Stop
Timer3.Stop
End If

If ComboBox.Text = "Jump X2" Then
Timer2.Start
Timer3.Stop
Timer1.Stop
End If

If ComboBox.Text = "Jump X1" Then
Timer3.Start
Timer2.Stop
Timer1.Stop
End If

Bu Kadar Yani Bundan Kolay Ne var :)  ?
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst