• Amused
  • Angry
  • Annoyed
  • Awesome
  • Bemused
  • Cocky
  • Cool
  • Crazy
  • Crying
  • Down
  • Drunk
  • Embarrased
  • Enraged
  • Friendly
  • Geeky
  • Godly
  • Happy
  • Hateful
  • Hungry
  • Innocent
  • Meh
  • Piratey
  • Poorly
  • Sad
  • Secret
  • Shy
  • Sneaky
  • Tired
  • Wtf
  • At Work
  • CodenzHub
  • Coding
  • Deejaying
  • Donating
  • Drinking
  • Eating
  • Editing
  • Hacking
  • Hate Mailing
  • Jamin'
  • Lagging
  • Live Streaming
  • Lurking
  • No Status
  • Pawning
  • PC Gaming
  • PS Gaming
  • Raging
  • Reversing
  • Sleeping
  • Steam Gaming
  • Trolling
  • TwitchStreamer
  • Vodka!
  • Watching TV/Movie
  • Xbox Gaming
  • Youtuber
  • Zombies
  • Results 1 to 9 of 9
    1. #1
      Newbie
      Learning to hack games!
       
      Feeling Normal
       
      Danielkb's Avatar
      Join Date
      Jan 2014
      Location
      Germany
      Posts
      3
      Thanks (-->)
      6
      Thanks (<--)
      0

      Question Need Help [TriggerBot]

      Silent VPN
      Hey Guys,
      I want to write a TriggerBot in vb.net, but I am a newbie.
      Source:
      Public Class Form1 
      Private Sub Schuss()
      Try
      TextBox2.Text = ReadInteger("csgo", &HA6BE2C)
      If TextBox2.Text = ("5") Then
      WriteInteger("csgo", &HA6BE2C, 4) 'client.dll+A6BE2C How can I load the client.dll?
      Else
      If TextBox2.Text = ("4") Then
      WriteInteger("csgo", &HA6BE2C, 5)
      End If
      End If
      Catch ex As Exception
      End Try
      End Sub
      Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
      TextBox1.Text = ReadInteger("csgo.exe", &H2370) '0x2370
      If TextBox1.Text = ("1") Then
      Schuss()
      End If
      End Sub
      Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      Me.Visible = False
      Me.ShowInTaskbar = False
      Me.Opacity = False
      Timer1.Interval = "1"
      End Sub
      End Class


      I hope somebody will explain me it.

      Sincerely yours,
      Daniel
      Last edited by Danielkb; 01-26-2014 at 10:25 PM.
      Donate  

    2. #2
      The Angel Of Verdun
      Always More To Code!
       
      Lurking
       
      Nether's Avatar
      Join Date
      Dec 2013
      Location
      England, SW
      Posts
      299
      Thanks (-->)
      54
      Thanks (<--)
      188
      Hi Daniel,

      You can use this memory class instead https://guidedhacking.com/showthread...B-Memory-Class for VB and to get the module base address you can use.


      Dim Address As Integer = Mem._Module("client.dll+A6BE2C")
      Mem.Write(Address, 5, GetType(integer))

      TextBox1.Text = Mem.Read("csgo.exe+2370", GetType(integer))


      Of course read what i have posted in the thread to use the memory class, let me know if you get any problems.
      Last edited by Nether; 01-26-2014 at 07:02 PM.
      No Need For Anything Extravagant, Your Blood As A Present Shall Suffice.

    3. Thanks Danielkb thanked for this post
    4. #3
      Newbie
      Learning to hack games!
       
      Feeling Normal
       
      Danielkb's Avatar
      Join Date
      Jan 2014
      Location
      Germany
      Posts
      3
      Thanks (-->)
      6
      Thanks (<--)
      0
      Public Class Form1
      Dim Mem As ProcMem = New ProcMem
      'Dim Address As Integer = Mem._Module("client.dll+A6BE2C")
      Private Sub Schuss()
      Mausklick(Windows.Forms.MouseButtons.Left)
      End Sub
      Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
      Try
      TextBox1.Text = Mem.Read("csgo.exe+2370", GetType(Integer)) '0x2370
      If TextBox1.Text = ("1") Then
      Schuss()
      End If
      Catch ex As Exception
      End Try
      End Sub
      Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      Me.Visible = True
      Me.ShowInTaskbar = True
      Me.Opacity = True
      Timer1.Enabled = True
      Timer1.Interval = "1"
      End Sub
      End Class

      No Errors but it´s not working

    5. #4
      The Angel Of Verdun
      Always More To Code!
       
      Lurking
       
      Nether's Avatar
      Join Date
      Dec 2013
      Location
      England, SW
      Posts
      299
      Thanks (-->)
      54
      Thanks (<--)
      188
      Quote Originally Posted by Danielkb View Post
      Public Class Form1
      Dim Mem As ProcMem = New ProcMem
      'Dim Address As Integer = Mem._Module("client.dll+A6BE2C")
      Private Sub Schuss()
      Mausklick(Windows.Forms.MouseButtons.Left)
      End Sub
      Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
      Try
      TextBox1.Text = Mem.Read("csgo.exe+2370", GetType(Integer)) '0x2370
      If TextBox1.Text = ("1") Then
      Schuss()
      End If
      Catch ex As Exception
      End Try
      End Sub
      Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      Me.Visible = True
      Me.ShowInTaskbar = True
      Me.Opacity = True
      Timer1.Enabled = True
      Timer1.Interval = "1"
      End Sub
      End Class

      No Errors but it´s not working


      TextBox1.Text = Mem.Read("csgo.exe+2370", GetType(Integer)) '0x2370
      i wanted to ask, was this meant to be a pointer? like with offset 23 70? PM me your skype if you like.

      also your
       'Dim Address As Integer = Mem._Module("client.dll+A6BE2C")
      comment i thought you needed this, if you need to use it, use it inside a function.
      Last edited by Nether; 01-27-2014 at 10:21 AM.
      No Need For Anything Extravagant, Your Blood As A Present Shall Suffice.

    6. Thanks Danielkb thanked for this post
    7. #5
      Coder
      C++(Qt)/C# Coder
       
      Coding
       
      Cyrion's Avatar
      Join Date
      Dec 2013
      Location
      Canada,Québec
      Posts
      110
      Thanks (-->)
      6
      Thanks (<--)
      16
      CrossHair ID is (client.dll+A6BE2C) + 0x2370 , that's why reading csgo.exe+2370 doesnt work.

      Also , if your crosshair ID is 1 , it means that you're aiming at yourself (It's impossible) , The id is 0 when you aim at nothing and > 1 , if you're aiming at someone.

      After with that ID for the player, you will be able to loop into the entity list to retrieve the player team that you're aiming at to check if he is in your team or not.

      Actual project in progress :
      - Cloud File storage using Qt (In the same style as Dropbox)

      Need  Help [TriggerBot]

    8. Thanks Danielkb thanked for this post
    9. #6
      Respected Hacker
      Learning to hack games!
       
      Coding
       
      till0sch's Avatar
      Join Date
      Oct 2012
      Location
      Germany.
      Posts
      1,168
      Thanks (-->)
      179
      Thanks (<--)
      340
      read the value in "client.dll+A6BE2C", to the value, add 0x2370 and read again. (Just for explanation and if the offsets and addresses posted are correct)

    10. Thanks Danielkb thanked for this post
    11. #7
      Jr.Hacker
      Haze-Productions
       
      Coding
       
      rN''s Avatar
      Join Date
      Jan 2014
      Posts
      340
      Thanks (-->)
      20
      Thanks (<--)
      126
      Here is my pseudo sourcecode for an InCross (PlayerID) Triggerbot. You can transalte it easy to VB.NET PS: Ii prefer C++ to code Cheats :b

      int WINAPI WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow )
      {
      if( Memory::Initialize( "Counter-Strike: Global Offensive" ) )
      {
      Memory::AddModule( "client", "client.dll" );
      }

      int iCrosshairID = 0;

      while( Memory::IsActive() ) // Check if Counter-Strike: Global Offensive is running
      {
      if( GetAsyncKeyState( 6 ) ) // If Triggerkey pressed
      {
      iCrosshairID = Memory::Read<int>( Memory::Read<DWORD>( Memory::GetModule( "client" ) + A6BE2C ) + 0x2370 ); // Read the InCrosshair ID

      if( iCrosshairID >= 0 && iCrosshairID <= 32 ) // If InCrosshair ID between 0 and 32
      {
      mouse_event( MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0 ); // Shoot
      Sleep( 10 );
      mouse_event( MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 );
      }
      }
      }
      return 0;
      }

    12. Thanks Danielkb thanked for this post
    13. #8
      Newbie
      Learning to hack games!
       
      Feeling Normal
       
      Danielkb's Avatar
      Join Date
      Jan 2014
      Location
      Germany
      Posts
      3
      Thanks (-->)
      6
      Thanks (<--)
      0
      Thread can be closed, nether is helping me via skype

    14. #9
      Learning to hack games!
       
      Feeling Normal
       
      's Avatar
      Join Date
      Jan 1970
      Posts
      0
      Thanks (-->)
      294
      Thanks (<--)
      328
      Silent VPN
      Thread closed on OP's request.

    Similar Game Hacker Threads

    1. C# CS GO Triggerbot Only
      By Johnyx in forum CS:GO Hacks
      Replies: 12
      Last Post: 08-27-2017, 03:59 PM
    2. [Help] Triggerbot help.
      By gummy8unny in forum CS:GO Hacks
      Replies: 2
      Last Post: 12-28-2015, 03:53 AM
    3. [Help] CS:GO TriggerBot
      By maxownage01 in forum CS:GO Hacks
      Replies: 6
      Last Post: 09-20-2015, 04:51 AM
    4. Triggerbot help
      By nb81 in forum CS:GO Hacks Help
      Replies: 4
      Last Post: 05-13-2015, 07:51 AM
    5. TriggerBot help?
      By BeesKnees in forum Hacking Help
      Replies: 16
      Last Post: 03-15-2014, 03:25 PM

    Tags for this Thread