usta bypass ve güncel pointerları özelden atarmısın elinde varsa tabi
Code:
Imports Microsoft.VisualBasic
Imports Microsoft.VisualBasic.CompilerServices
Imports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Drawing
Imports System.IO
Imports System.Runtime.CompilerServices
Imports System.Windows.Forms
Imports System.Environment
Timer.enabled=true olacak ve içerisine
Code:
Try
Dim folderPath As String = Environment.GetFolderPath(SpecialFolder.Windows)
FileSystem.FileClose(New Integer() {1})
FileSystem.FileClose(New Integer() {2})
If My.Computer.FileSystem.FileExists((folderPath & "\xspirit.sys")) Then
FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
Else
File.WriteAllBytes((folderPath & "\xspirit.sys"), New Byte() {0})
FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
End If
If My.Computer.FileSystem.FileExists((folderPath & "wolftü.bin\xhunter1.sys")) Then
FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
Else
File.WriteAllBytes((folderPath & "\xhunter1.sys"), New Byte() {0})
FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
End If
Catch exception1 As Exception
ProjectData.SetProjectError(exception1)
Dim ex As Exception = exception1
ProjectData.SetProjectError(ex)
Dim exception As Exception = ex
ProjectData.ClearProjectError()
ProjectData.ClearProjectError()
End Try
Try
Dim folderPath As String = Environment.GetFolderPath(SpecialFolder.Windows)
FileSystem.FileClose(New Integer() {1})
FileSystem.FileClose(New Integer() {2})
If My.Computer.FileSystem.FileExists((folderPath & "\xspirit.sys")) Then
FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
Else
File.WriteAllBytes((folderPath & "\xspirit.sys"), New Byte() {0})
FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
End If
If My.Computer.FileSystem.FileExists((folderPath & "\xhunter1.sys")) Then
FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
Else
File.WriteAllBytes((folderPath & "\xhunter1.sys"), New Byte() {0})
FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
End If
If My.Computer.FileSystem.FileExists((folderPath & "\xigncode")) Then
End If
FileSystem.FileOpen(1, (folderPath & "\xigncode"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
Catch ex As Exception
End Try
Name Esp
WriteLong("wolftü.bin", label1.Text + &H36A584 , "2268606836")'Name Esp On
WriteLong("wolftü.bin", label1.Text + &H36A584 , "2268606837")'Name Esp Of
-----------------------------------------------------------------------------
İnfinte Ammo
WriteLong("wolftü.bin", label1.Text + &H13FCB4, "2114045827")'İnfinte Ammo On
WriteLong("wolftü.bin", label1.Text + &H13FCB4, "2114045828")'İnfinte Ammo Off
------------------------------------------------------------------------------
No Recoil
WriteLong("wolftü.bin",label1.Text + &H84123, "2665025140")' No Recoil On
WriteLong("wolftü.bin", label1.Text + &H84123, "2665025141") 'No Recoil Off
------------------------------------------------------------------------------
No Spread
WriteLong("wolftü.bin", label1.Text + &H1534E3, "1301090420") 'No Spread On
WriteLong("wolftü.bin", label1.Text + &H1534E3, "1301090421") 'No Spread Off
-------------------------------------------------------------------------------
No Reload
WriteLong("wolftü.bin", label1.Text + &H133F43, "2257258100") 'No Reload On
WriteLong("wolftü.bin", label1.Text + &H133F43, "2257258101") 'No Reload Of
--------------------------------------------------------------------------------
Rapid Fire
WriteLong("wolftü.bin", label1.Text + &H13A49B, "1574503796") 'Rapid Fire On
WriteLong("wolftü.bin", label1.Text + &H13A49B, "1574503797") 'Rapid Fire Of
----------------------------------------------------------------------------------
Crosshair
WriteLong("wolftü.bin", Label1.Text + &H748D70 , "1600") 'Crosshair Red
WriteLong("wolftü.bin", label1.Text + &H748D70 , "1") 'Crosshair OfF
------------------------------------------------------------------------------------
Özel kurt yetengi
WritePointerInteger("wolftü.bin", Label1.Text + &H6CCB50, "19601", &H18)
------------------------------------------------------------------------------------
F1 Base Return
WriteLong("wolftü.bin", label1.Text + &H72AA2C, "2") 'F1 Base Return On
------------------------------------------------------------------------------------
Teamkill
WriteLong("wolftü.bin", label3.Text + &H5CB2E , "418117253") 'Teamkill On
WriteLong("wolftü.bin", label3.Text + &H5CB2E , "410318469") 'Teamkill Off
------------------------------------------------------------------------------------
AlWays HeadShout
WriteLong("wolftü.bin", label3.Text + &H84B25, "1566441904") 'AlWays HeadShout On
WriteLong("wolftü.bin", label3.Text + &H84B25, "1566490674") 'AlWays HeadShout Off
-------------------------------------------------------------------------------------
Aimbot Ultra
WriteLong("wolftü.bin", label3.Text + &H2186B, "2251820148")'aim bot on
WriteLong("wolftü.bin", label3.Text + &H2186B, "2251820149")'aimbot of
--------------------------------------------------------------------------------------
Ölümsüzlük
WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198040") 'Ölümsüzlük On
WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198041") 'Ölümsüzlük Off
------------------------------------------------------------------------------------
Tek Atma
WriteLong("wolftü.bin", label3.Text + &HA46D4 , "5") 'Tek Atma On
WriteLong("wolftü.bin", label3.Text + &HA46D4 , "1967244534") 'Tek Atma Off
--------------------------------------------------------------------------------------
Takla
WriteLong("wolftü.bin", label3.Text + &H1DE65 , "378215541") 'Takla On
WriteLong("wolftü.bin", label3.Text + &H1DE65 , "378215540") 'Takla Off
----------------------------------------------------------------------------------------
0Sp
WriteLong("wolftü.bin",label1.Text + &H19CEF0, "3071218292") 'No Weapon Sp On
WriteLong("wolftü.bin",label1.Text + &H19CEF0, "3071218293") 'No Weapon Sp O
-------------------------------------------------------------------------------------
Özel kurt yetengi
WritePointerInteger("wolftü.bin", Label1.Text + &H6CCB50, "19601", &H18)
-------------------------------------------------------------------------------------
Ölümsüzlük
WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198040") 'Ölümsüzlük On
WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198041") 'Ölümsüzlük Off
--------------------------------------------------------------------------------------
Shot To Refersh HP
WriteLong("wolftü.bin", Label3.Text + &H5EC81 , "138795016") 'Shot To Refersh HP On
WriteLong("wolftü.bin", Label3.Text + &H5EC81 , "138795272") 'Shot To Refersh HP Off
--------------------------------------------------------------------------------------
Ben geçen yeni bir hile yapam diye giriştim bir sürü pointer filan cektim 5 dk sonra log verip atıyor bypass eski dediler bu yeni bypass mıBazı pointerler :Kod:Code: Imports Microsoft.VisualBasic Imports Microsoft.VisualBasic.CompilerServices Imports System Imports System.Collections Imports System.Collections.Generic Imports System.ComponentModel Imports System.Diagnostics Imports System.Drawing Imports System.IO Imports System.Runtime.CompilerServices Imports System.Windows.Forms Imports System.Environment Timer.enabled=true olacak ve içerisine Code: Try Dim folderPath As String = Environment.GetFolderPath(SpecialFolder.Windows) FileSystem.FileClose(New Integer() {1}) FileSystem.FileClose(New Integer() {2}) If My.Computer.FileSystem.FileExists((folderPath & "\xspirit.sys")) Then FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) Else File.WriteAllBytes((folderPath & "\xspirit.sys"), New Byte() {0}) FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) End If If My.Computer.FileSystem.FileExists((folderPath & "wolftü.bin\xhunter1.sys")) Then FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) Else File.WriteAllBytes((folderPath & "\xhunter1.sys"), New Byte() {0}) FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) End If Catch exception1 As Exception ProjectData.SetProjectError(exception1) Dim ex As Exception = exception1 ProjectData.SetProjectError(ex) Dim exception As Exception = ex ProjectData.ClearProjectError() ProjectData.ClearProjectError() End Try Try Dim folderPath As String = Environment.GetFolderPath(SpecialFolder.Windows) FileSystem.FileClose(New Integer() {1}) FileSystem.FileClose(New Integer() {2}) If My.Computer.FileSystem.FileExists((folderPath & "\xspirit.sys")) Then FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) Else File.WriteAllBytes((folderPath & "\xspirit.sys"), New Byte() {0}) FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) End If If My.Computer.FileSystem.FileExists((folderPath & "\xhunter1.sys")) Then FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) Else File.WriteAllBytes((folderPath & "\xhunter1.sys"), New Byte() {0}) FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) End If If My.Computer.FileSystem.FileExists((folderPath & "\xigncode")) Then End If FileSystem.FileOpen(1, (folderPath & "\xigncode"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1) Catch ex As Exception End Try
Kod:Name Esp WriteLong("wolftü.bin", label1.Text + &H36A584 , "2268606836")'Name Esp On WriteLong("wolftü.bin", label1.Text + &H36A584 , "2268606837")'Name Esp Of ----------------------------------------------------------------------------- İnfinte Ammo WriteLong("wolftü.bin", label1.Text + &H13FCB4, "2114045827")'İnfinte Ammo On WriteLong("wolftü.bin", label1.Text + &H13FCB4, "2114045828")'İnfinte Ammo Off ------------------------------------------------------------------------------ No Recoil WriteLong("wolftü.bin",label1.Text + &H84123, "2665025140")' No Recoil On WriteLong("wolftü.bin", label1.Text + &H84123, "2665025141") 'No Recoil Off ------------------------------------------------------------------------------ No Spread WriteLong("wolftü.bin", label1.Text + &H1534E3, "1301090420") 'No Spread On WriteLong("wolftü.bin", label1.Text + &H1534E3, "1301090421") 'No Spread Off ------------------------------------------------------------------------------- No Reload WriteLong("wolftü.bin", label1.Text + &H133F43, "2257258100") 'No Reload On WriteLong("wolftü.bin", label1.Text + &H133F43, "2257258101") 'No Reload Of -------------------------------------------------------------------------------- Rapid Fire WriteLong("wolftü.bin", label1.Text + &H13A49B, "1574503796") 'Rapid Fire On WriteLong("wolftü.bin", label1.Text + &H13A49B, "1574503797") 'Rapid Fire Of ---------------------------------------------------------------------------------- Crosshair WriteLong("wolftü.bin", Label1.Text + &H748D70 , "1600") 'Crosshair Red WriteLong("wolftü.bin", label1.Text + &H748D70 , "1") 'Crosshair OfF ------------------------------------------------------------------------------------ Özel kurt yetengi WritePointerInteger("wolftü.bin", Label1.Text + &H6CCB50, "19601", &H18) ------------------------------------------------------------------------------------ F1 Base Return WriteLong("wolftü.bin", label1.Text + &H72AA2C, "2") 'F1 Base Return On ------------------------------------------------------------------------------------ Teamkill WriteLong("wolftü.bin", label3.Text + &H5CB2E , "418117253") 'Teamkill On WriteLong("wolftü.bin", label3.Text + &H5CB2E , "410318469") 'Teamkill Off ------------------------------------------------------------------------------------ AlWays HeadShout WriteLong("wolftü.bin", label3.Text + &H84B25, "1566441904") 'AlWays HeadShout On WriteLong("wolftü.bin", label3.Text + &H84B25, "1566490674") 'AlWays HeadShout Off ------------------------------------------------------------------------------------- Aimbot Ultra WriteLong("wolftü.bin", label3.Text + &H2186B, "2251820148")'aim bot on WriteLong("wolftü.bin", label3.Text + &H2186B, "2251820149")'aimbot of -------------------------------------------------------------------------------------- Ölümsüzlük WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198040") 'Ölümsüzlük On WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198041") 'Ölümsüzlük Off ------------------------------------------------------------------------------------ Tek Atma WriteLong("wolftü.bin", label3.Text + &HA46D4 , "5") 'Tek Atma On WriteLong("wolftü.bin", label3.Text + &HA46D4 , "1967244534") 'Tek Atma Off -------------------------------------------------------------------------------------- Takla WriteLong("wolftü.bin", label3.Text + &H1DE65 , "378215541") 'Takla On WriteLong("wolftü.bin", label3.Text + &H1DE65 , "378215540") 'Takla Off ---------------------------------------------------------------------------------------- 0Sp WriteLong("wolftü.bin",label1.Text + &H19CEF0, "3071218292") 'No Weapon Sp On WriteLong("wolftü.bin",label1.Text + &H19CEF0, "3071218293") 'No Weapon Sp O ------------------------------------------------------------------------------------- Özel kurt yetengi WritePointerInteger("wolftü.bin", Label1.Text + &H6CCB50, "19601", &H18) ------------------------------------------------------------------------------------- Ölümsüzlük WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198040") 'Ölümsüzlük On WriteLong("wolftü.bin", Label3.Text + &H2EBD4 , "3641198041") 'Ölümsüzlük Off -------------------------------------------------------------------------------------- Shot To Refersh HP WriteLong("wolftü.bin", Label3.Text + &H5EC81 , "138795016") 'Shot To Refersh HP On WriteLong("wolftü.bin", Label3.Text + &H5EC81 , "138795272") 'Shot To Refersh HP Off --------------------------------------------------------------------------------------
Pointerlada alakalı csh poinleri log verirken obj ler log vermiyor.Bende pek anlamış değilim.Yakında source atıcam.Şimdilik bi deneyin bunu.Ben geçen yeni bir hile yapam diye giriştim bir sürü pointer filan cektim 5 dk sonra log verip atıyor bypass eski dediler bu yeni bypass mı
Kontrol ediyorum. Hata kodunu, yazısını yazarmısınız.güzel hileye benziyor deneyeceğim çok teşekkürler
Post automatically merged:
ama çalışmıyor şimdi denedim olduğu yerde kalıyor insanken hareket etmiyor birde kafa vurmuyor ve sürekli hata veriyor oyunu başlatıp yönetici olarak çalıştırmama rağmen
Malesef fix, yeni kek en yakın zamanda gelecek. İyi Forumlar. #Kilitlog hatası alıyorum hile tespit edildi diyor açtığım gibi
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?