Go To Post

naja Trigger only wird schwer...

Wenn du darauf verzichten würdest, lade dir einfach irgendeinen Hack aus Archiv, der nicht älter als 1 Jahr ist zum Beispiel EnhancedAim.

Um Vac musst du dir keine Gedanken machen, da es nicht mehr geupdated wird

Go To Post

Organner ist auch nicht wirklich wire proof...

Es gibt keine Privates die wire proof sind, auch wenn sies behaupten!
Die einzige Möglichkeit wäre, man beauftragt einen Coder dir einen zu programmieren, allerdings müsstest du dafür schätzungsweise 1000+ Euro zahlen.
Außerdem kommt man an solche Programmierer meistens eh nur wenn man richtige Connections hat...

Go To Post

40 finde ich persönlich etwas zu viel, naja...

Will zwar nichts kaufen, aber wie siehts mit Treuhand aus?

Go To Post

#closerequest

Go To Post

Es wäre hilfreich das Spiel zu nennen, um das es sich handelt

Go To Post

Imports System.Runtime.InteropServices
 
Public Class Form1
 
    Public pixColor As Color = GetPixelColor(Cursor.Position.X, Cursor.Position.Y)
    Public modelcolor As Color = GetPixelColor(Cursor.Position.X, Cursor.Position.Y)
    Public ForeColorStr As String
    Public model As String
 
 
 
    <DllImport("gdi32.dll")> _
    Private Shared Function CreateDC( _
      ByVal lpszDriver As String, _
      ByVal lpszDevice As String, _
      ByVal lpszOutput As String, _
      ByVal lpInitData As IntPtr) As IntPtr
    End Function
 
    <DllImport("gdi32.dll")> _
    Private Shared Function DeleteDC(ByVal hdc As IntPtr) As Boolean
    End Function
 
    <DllImport("gdi32.dll")> _
    Private Shared Function GetPixel( _
      ByVal hdc As IntPtr, _
      ByVal nXPos As Integer, _
      ByVal nYPos As Integer) As Integer
    End Function
 
    Public Function GetPixelColor(ByVal x As Integer, ByVal y As Integer) As Color
        Dim hdcScreen As IntPtr = CreateDC("Display", Nothing, Nothing, IntPtr.Zero)
        Dim colorRef As Integer = GetPixel(hdcScreen, x, y)
        DeleteDC(hdcScreen)
 
        Return Color.FromArgb(colorRef And &HFF, _
          (colorRef And &HFF00) >> 8, (colorRef And &HFF0000) >> 16)
    End Function
 
    Public Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
 
    Public Const MOUSEEVENTF_LEFTDOWN = &H2
    Public Const MOUSEEVENTF_LEFTUP = &H4
 
    Public Sub SimulateClick()
        mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
        mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)
    End Sub
 
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
 
        'Dim pixColor As Color = GetPixelColor(Cursor.Position.X, Cursor.Position.Y)
        'Dim ForeColorStr As String = ColorTranslator.ToHtml(pixColor)
        'Label1.Text = ForeColorStr
        Timer1.Enabled = False
        Timer2.Enabled = True
 
 
    End Sub
 
    Public Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal vKey As Int32) As UShort
 
 
 
 
 
    Public Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
 
 
        Dim modelcolor As Color = GetPixelColor(Cursor.Position.X, Cursor.Position.Y)
        Dim model As String = ColorTranslator.ToHtml(modelcolor)
        Label2.Text = model
        Timer4.Enabled = True
 
 
 
 
    End Sub
 
    Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
        If CBool(GetAsyncKeyState(Keys.F12)) Then
            Timer1.Enabled = True
            Dim pixColor As Color = GetPixelColor(Cursor.Position.X, Cursor.Position.Y)
            Dim ForeColorStr As String = ColorTranslator.ToHtml(pixColor)
            Label1.Text = ForeColorStr
 
 
 
            ' Else : Timer1.Enabled = False
            'Timer2.Enabled = False
        End If
    End Sub
 
    Private Sub Timer4_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer4.Tick
 
        If model <> ForeColorStr Then
            SimulateClick()
            Timer2.Enabled = False
            Timer4.Enabled = False
 
        Else
 
 
 
        End If
 
 
    End Sub
End Class

habs mal kurz in die VB tags gesetzt, weil cihs so unübersichtlich fand


Achja ich würde das alles in ner Do Loop Schleife machen, ist deutlich schneller und übersichtlicher

Go To Post

Was machst du eigentlich mit den ganzen Timer

Go To Post

Ich hätte das mithilfe von Chams gelöst, da ists dann ne eindeutige Pixelfarbe vom Gegner...
Das würde ohne Probleme gehen

Go To Post

Soweit ich weiß nicht

Go To Post

ja müsste eigentlich proof sein. Aber wirklich praktisch ist er nicht^^

Go To Post

was funktioniert auf zBlock nicht? Ich mein keine Materials, Chams von  OSH

Go To Post

Ich denk er weiß, was preislich auf ihn zukommen würde...

Go To Post

MemoryHacks, die nur Konsolenbefehle benutzen sind(soweit ich weiß) undetected

Go To Post

Was für ein hack soll das überhaupt sein und welche Speicherbereiche benutzt du?

Go To Post

Sorry ich kenn mich mit Pokemon nich so aus, aber spielt man das online oder geht das nur im offline Modus?

im Offline Modus wäre das sogar ziemlich leicht möglich

Go To Post

Im prinzip sind so ziemlich alle Hacks im Hackarchiv, die nicht älter als ein Jahr sind, undetected, da VAC bei cs 1.6 nicht mehr geupdated wird.

Normalerweise wirst du keine Probleme haben mit 64 bit, zumindestens hatte ich nie welche

Go To Post

https://www.oldschoolhack.me/hackarchiv_file_2908_enhancedaim-cracked-cs16.html

vielleicht geht der noch...

Go To Post

unnötig?

Go To Post

MemoryHacks sind, wie du vermutet hast, erst dann detected, wenn sie einen falschen Spreicherbereich benutzen...

Du kannst somit eigentlich alle Konsolenbefehle für deine MemoryHacks benutzen, ohne irgendwelche bedenken zu haben.

Es kommt drauf an, ob die Adresse im .Code oder .Data Bereich liegt, falls sie im .Data liegt, wäre es undetected.

Go To Post

@xst:

War das nicht immer so, dass wenns im .Data liegt, es nicht zu finden ist...
war doch vor einer Woche auch noch so?