Emektar Üye
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]--İlk olarak gerekli malzemeler--[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]1 : İstediğiniz Kadar Combobox Ekleyin
2 : Comboboxa Eklediğiniz İtem Kadar Timer Ekleyin.
[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]--CheckBoxa Girilecek Kodlar--
[/FONT][font=Monaco, Consolas, Courier, monospace]If ComboBox1.Text = "EC GL" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer1.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer1.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "EC SL" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer2.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer2.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "Zait" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer3.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer3.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "ETSR - 1" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer4.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer4.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "MSD - 90" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer5.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer5.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "Full Moon" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer6.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer6.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "EC PX" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer7.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer7.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If
[/FONT][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Ben Comboboxa Bazı Silahlar Ekledim Siz Onları Değiştirebilirsiniz.[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]--Timere Girilecek Kodlar--[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Kod:[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Düzenlenicek Yerler = &H26FB1F [Her Slotta Değişir.]
Düzenlenicek Yerler = "VAL" [Her Silahda Değiştiriniz.]
Düzenlenicek Yerler = Label1.Text [CSH Çekilen Labeli Girin.]
[/FONT][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]
--Pointerler--
Kod:
[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]1 : İstediğiniz Kadar Combobox Ekleyin
2 : Comboboxa Eklediğiniz İtem Kadar Timer Ekleyin.
[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]--CheckBoxa Girilecek Kodlar--
[/FONT][font=Monaco, Consolas, Courier, monospace]If ComboBox1.Text = "EC GL" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer1.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer1.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "EC SL" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer2.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer2.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "Zait" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer3.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer3.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "ETSR - 1" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer4.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer4.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "MSD - 90" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer5.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer5.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "Full Moon" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer6.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer6.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If[/FONT]
[font=Monaco, Consolas, Courier, monospace] If ComboBox1.Text = "EC PX" Then[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer7.Start()[/FONT]
[font=Monaco, Consolas, Courier, monospace] Else[/FONT]
[font=Monaco, Consolas, Courier, monospace] Timer7.Stop()[/FONT]
[font=Monaco, Consolas, Courier, monospace] End If
[/FONT][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Ben Comboboxa Bazı Silahlar Ekledim Siz Onları Değiştirebilirsiniz.[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]--Timere Girilecek Kodlar--[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Kod:[/FONT]
Kod:
Dim hack As Integer = Label1.Text + &H26FB1F
WriteLong("wolftü.bin", hack, "VAL")
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Düzenlenicek Yerler = &H26FB1F [Her Slotta Değişir.]
Düzenlenicek Yerler = "VAL" [Her Silahda Değiştiriniz.]
Düzenlenicek Yerler = Label1.Text [CSH Çekilen Labeli Girin.]
[/FONT][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]
--Pointerler--
Kod:
[/FONT]
Kod:
Envanter Aktif : csh6C68.tmp+271954 ON : 23561487
Anti Ahh x1 : csh2939.tmp+1A9190 Val : 35779
Slot 1 : cshDBD.tmp+27197F
Slot 2 : cshDBD.tmp+2719F3
Slot 3 : cshDBD.tmp+271A37
Slot 4 : cshDBD.tmp+271A79
Tabanca : cshDBD.tmp+271990
Bıçak : cshDBD.tmp+2719A1
Bomba : cshDBD.tmp+2719B2