|
You last visited: Today at 14:49
Advertisement
[Support] "Hacking" S4 League
Discussion on [Support] "Hacking" S4 League within the S4 League forum part of the Shooter category.
08/20/2013, 13:48
|
#2866
|
elite*gold: 20
Join Date: Oct 2012
Posts: 346
Received Thanks: 361
|
Okay This Is The Source :
xDark Ingame Hack Source(Visual Basic) :
Code:
Imports System.Diagnostics
Imports System.IO
Imports System.Runtime.InteropServices
Public Class Form1
'API declarations
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Int32, ByVal bInheritHandle As Int32, ByVal dwProcessId As Int32) As Int32
Private Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Int32, ByVal lpBaseAddress As Int32, ByRef lpBuffer As Int32, ByVal nSize As Int32, ByRef lpNumberOfBytesWritten As Int32) As Int32
Private Declare Function ReadProcessMemory Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Int32, ByVal lpBaseAddress As Int32, ByRef lpBuffer As Int32, ByVal nSize As Int32, ByRef lpNumberOfBytesWritten As Int32) As Int32
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Int32) As Int32
'Constants
Public Const PROCESS_VM_READ = &H10
Public Const PROCESS_VM_WRITE = (&H20)
Public Const PROCESS_VM_OPERATION = (&H8)
Public Const PROCESS_QUERY_INFORMATION = (&H400)
Public Const PROCESS_READ_WRITE_QUERY = PROCESS_VM_READ + PROCESS_VM_WRITE + PROCESS_VM_OPERATION + PROCESS_QUERY_INFORMATION
Public Const PROCESS_ALL_ACCESS = &H1F0FFF
Public Function Tibia_Hwnd() As Long
Dim TibiaWindows As Process() = Process.GetProcessesByName("s4client")
If TibiaWindows.Length = 0 Then
Return 0
Exit Function
End If
Return TibiaWindows(0).Id ' 0 is the first tibia-client. 1 is the second one, and so on..
End Function
Private Function Memory_WriteLong(ByVal Address As Int32, ByVal vBuffer As Long) As Long
Dim processHandle As IntPtr = OpenProcess(PROCESS_READ_WRITE_QUERY, 0, Tibia_Hwnd)
WriteProcessMemory(processHandle, Address, vBuffer, 4, 0)
Return vBuffer
CloseHandle(processHandle)
End Function
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If CheckBox1.Checked = True Then
Memory_WriteLong(&H51BF04, 2348565979)
Else
Memory_WriteLong(&H51BF04, 2348565977)
End If
End Sub
Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
If CheckBox2.Checked = True Then
Memory_WriteLong(&H482472, 2348565979)
Else
Memory_WriteLong(&H482472, 2348565977)
End If
End Sub
Private Sub CheckBox4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox4.CheckedChanged
If CheckBox4.Checked = True Then
Memory_WriteLong(&H47F76E, 1166868842)
Else
Memory_WriteLong(&H47F76E, 1166869354)
End If
End Sub
Private Sub CheckBox5_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox5.CheckedChanged
If CheckBox5.Checked = True Then
Memory_WriteLong(&HF5AE78, 2348565979)
Else
Memory_WriteLong(&HF5AE78, 2348565977)
End If
End Sub
Private Sub CheckBox6_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox6.CheckedChanged
If CheckBox6.Checked = True Then
Memory_WriteLong(&H51BF65, 3135869072)
Else
Memory_WriteLong(&H51BF65, 3135833466)
End If
End Sub
Private Sub CheckBox7_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox7.CheckedChanged
If CheckBox7.Checked = True Then
Memory_WriteLong(&H51CAF9, 1593591259)
Else
Memory_WriteLong(&H51CAF9, 1593591257)
End If
End Sub
Private Sub CheckBox8_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox8.CheckedChanged
If CheckBox8.Checked = True Then
Memory_WriteLong(&H76ED6D, 2374697834)
Else
Memory_WriteLong(&H76ED6D, 2374698346)
End If
End Sub
Private Sub CheckBox9_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox9.CheckedChanged
If CheckBox9.Checked = True Then
Memory_WriteLong(&H766931, 3555299472)
Else
Memory_WriteLong(&H12A8FFC, 3555263861)
End If
End Sub
Private Sub CheckBox11_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox11.CheckedChanged
If CheckBox11.Checked = True Then
Memory_WriteLong(&H127329C, 48)
Memory_WriteLong(&H12732A0, 0)
Memory_WriteLong(&H12732A4, 48)
Memory_WriteLong(&H12732A8, 0)
Else
Memory_WriteLong(&H127329C, 1601071469)
Memory_WriteLong(&H12732A0, 20552)
Memory_WriteLong(&H12732A4, 1601724781)
Memory_WriteLong(&H12732A8, 20552)
End If
End Sub
Private Sub CheckBox12_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox12.CheckedChanged
If CheckBox12.Checked = True Then
Memory_WriteLong(&H61B10E, 2240612458)
Else
Memory_WriteLong(&H61B10E, 2240611178)
End If
End Sub
Private Sub CheckBox13_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox13.CheckedChanged
If CheckBox14.Checked = True Then
Memory_WriteLong(&H5634D9, 990399115)
Else
Memory_WriteLong(&H5634D9, 990136971)
End If
End Sub
Private Sub CheckBox15_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox15.CheckedChanged
If CheckBox15.Checked = True Then
Memory_WriteLong(&H5EB344, 2240612202)
Else
Memory_WriteLong(&H5EB344, 2240611178)
End If
End Sub
Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged
If CheckBox15.Checked = True Then
Memory_WriteLong(&H5EFD8E, 2374697322)
Else
Memory_WriteLong(&H5EFD8E, 2374698346)
End If
End Sub
End Class
xDark Console Card Hack Source(C#) :
Code:
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Diagnostics;
using MLibrary;
namespace test
{
class Program
{
static void Main(string[] args)
{
string Onput = "*****************************************\n"
+ "*\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0*\n"
+ "*\0\0\0\0 S4League Hack by xDarkMan\0\0\0\0\0\0\0\0\0*\n"
+ "*\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0*\n"
+ "*****************************************\n";
string Onput2 = "S4Client.exe Not Found";
string Onput3 = "S4Client.exe Found";
string Onput4 = "Features:";
string Onput5 = "Card Hack";
string Onput6 = "Other Soon..";
string Onput12 ="Status:";
string pid = "S4Client";
string title = "xDark S4L Multi Trainer v1";
Console.Title = title;
Console.ForegroundColor = ConsoleColor.DarkMagenta;
Console.WriteLine(Onput);
Console.WriteLine();
Console.ForegroundColor = ConsoleColor.Green;
Console.WriteLine(Onput4);
Console.WriteLine(Onput5);
Console.WriteLine(Onput6);
Console.WriteLine();
Console.WriteLine();
Console.ForegroundColor = ConsoleColor.Blue;
Console.WriteLine();
Console.WriteLine();
Console.ForegroundColor = ConsoleColor.Yellow;
Console.WriteLine(Onput12);
if (Process.GetProcessesByName(pid).Length <= 0)
{
Console.ForegroundColor = ConsoleColor.Red;
Console.WriteLine(Onput2);
Console.Read();
}
else
{
Console.ForegroundColor = ConsoleColor.Yellow;
Console.WriteLine(Onput3);
string Onpu2 = "Press Enter to Start The Hack";
Console.WriteLine(Onpu2);
Console.Read();
/// here write process memory
string pidx = "S4Client";
float Card = 0;
Zero.WriteFloat(pidx,0x012A8FFC,Card);
}
}
}
}
Wish To Help Me In It
================================
Press Thanks If I Helped You!
|
|
|
08/20/2013, 14:01
|
#2867
|
elite*gold: 0
Join Date: Jun 2013
Posts: 274
Received Thanks: 148
|
Check your PM
|
|
|
08/20/2013, 15:23
|
#2868
|
elite*gold: 20
Join Date: Oct 2012
Posts: 346
Received Thanks: 361
|
Any Other Answer??
===========================
Press tHanks If I Helped You!
|
|
|
08/21/2013, 00:44
|
#2869
|
elite*gold: 0
Join Date: Oct 2009
Posts: 11
Received Thanks: 1
|
Deutsch
Brauche Hilfe. Ich hab dieses kleine Script in AutoIt für mich selber geschrieben, aber er ändert die Werte nicht.
Windows 7 32bit
PHP Code:
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> ToolTip("S4Client starten ...", 0, 0) #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 237, 59, 192, 124) $Checkbox1 = GUICtrlCreateCheckbox("Inf. SP", 8, 8, 97, 17) $Checkbox2 = GUICtrlCreateCheckbox("Fast Reload", 8, 32, 97, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 If ProcessExists("S4Client.exe") <> 0 Then Hack() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Hack() $PID = ProcessExists("S4Client.exe") $Open = _MemoryOpen($PID) Sleep(500) If GUICTRLREAD($Checkbox1) = 1 then _MEMORYWRITE(0x00482472, $OPEN, "2348565979", "long") EndIf If GUICTRLREAD($Checkbox2) = 1 then _MEMORYWRITE(0x005E5326, $OPEN, "251708035", "long") EndIf Exit EndFunc
Danke
English
Value is not changing/AutoIt
Windows 7 32bit
PHP Code:
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> ToolTip("S4Client starten ...", 0, 0) #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 237, 59, 192, 124) $Checkbox1 = GUICtrlCreateCheckbox("Inf. SP", 8, 8, 97, 17) $Checkbox2 = GUICtrlCreateCheckbox("Fast Reload", 8, 32, 97, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 If ProcessExists("S4Client.exe") <> 0 Then Hack() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Hack() $PID = ProcessExists("S4Client.exe") $Open = _MemoryOpen($PID) Sleep(500) If GUICTRLREAD($Checkbox1) = 1 then _MEMORYWRITE(0x00482472, $OPEN, "2348565979", "long") EndIf If GUICTRLREAD($Checkbox2) = 1 then _MEMORYWRITE(0x005E5326, $OPEN, "251708035", "long") EndIf Exit EndFunc
Thanks
|
|
|
08/21/2013, 01:22
|
#2870
|
elite*gold: 24
Join Date: Feb 2012
Posts: 1,173
Received Thanks: 3,113
|
Quote:
Originally Posted by Titano95
Deutsch
Brauche Hilfe. Ich hab dieses kleine Script in AutoIt für mich selber geschrieben, aber er ändert die Werte nicht.
Windows 7 32bit
PHP Code:
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> ToolTip("S4Client starten ...", 0, 0) #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 237, 59, 192, 124) $Checkbox1 = GUICtrlCreateCheckbox("Inf. SP", 8, 8, 97, 17) $Checkbox2 = GUICtrlCreateCheckbox("Fast Reload", 8, 32, 97, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ###
While 1 If ProcessExists("S4Client.exe") <> 0 Then Hack() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit
EndSwitch WEnd
Func Hack() $PID = ProcessExists("S4Client.exe") $Open = _MemoryOpen($PID) Sleep(500) If GUICTRLREAD($Checkbox1) = 1 then _MEMORYWRITE(0x00482472, $OPEN, "2348565979", "long") EndIf If GUICTRLREAD($Checkbox2) = 1 then _MEMORYWRITE(0x005E5326, $OPEN, "251708035", "long") EndIf Exit EndFunc
Danke
English
Value is not changing/AutoIt
Windows 7 32bit
PHP Code:
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> ToolTip("S4Client starten ...", 0, 0) #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 237, 59, 192, 124) $Checkbox1 = GUICtrlCreateCheckbox("Inf. SP", 8, 8, 97, 17) $Checkbox2 = GUICtrlCreateCheckbox("Fast Reload", 8, 32, 97, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ###
While 1 If ProcessExists("S4Client.exe") <> 0 Then Hack() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit
EndSwitch WEnd
Func Hack() $PID = ProcessExists("S4Client.exe") $Open = _MemoryOpen($PID) Sleep(500) If GUICTRLREAD($Checkbox1) = 1 then _MEMORYWRITE(0x00482472, $OPEN, "2348565979", "long") EndIf If GUICTRLREAD($Checkbox2) = 1 then _MEMORYWRITE(0x005E5326, $OPEN, "251708035", "long") EndIf Exit EndFunc
Thanks
|
oh well i fail at autoit but afaik "ProcessExists" it checks if process is running at the same time u ran ur program if not it return 0/null i dunno i hate autoit anyway
just use a loop in it or ProcessWait or smthen tht should work
oh and why exiting b4 ending ur func lol that doesnt make any sense
|
|
|
08/21/2013, 02:06
|
#2871
|
elite*gold: 0
Join Date: Oct 2009
Posts: 11
Received Thanks: 1
|
Quote:
Originally Posted by Darsh2012
oh and why exiting b4 ending ur func lol that doesnt make any sense
|
That was the problem! <.<
Thank you.
But my program is detected now. What can i do?
PHP Code:
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> ToolTip("S4Client starten ...", 0, 0) #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 237, 59, 192, 124) $Checkbox1 = GUICtrlCreateCheckbox("Inf. SP", 8, 8, 97, 17) $Checkbox2 = GUICtrlCreateCheckbox("Fast Reload", 8, 32, 97, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 If ProcessExists("S4Client.exe") <> 0 Then Hack() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Hack() $PID = ProcessExists("S4Client.exe") $Open = _MemoryOpen($PID) Sleep(500) If GUICTRLREAD($Checkbox1) = 1 then _MEMORYWRITE(0x00482472, $OPEN, "2348565979", "long") EndIf If GUICTRLREAD($Checkbox2) = 1 then _MEMORYWRITE(0x005E5326, $OPEN, "251708035", "long") EndIf EndFunc Exit
thanks
|
|
|
08/21/2013, 02:47
|
#2872
|
elite*gold: 11
Join Date: Jun 2012
Posts: 894
Received Thanks: 1,463
|
Quote:
Originally Posted by Titano95
That was the problem! <.<
Thank you.
But my program is detected now. What can i do?
PHP Code:
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> ToolTip("S4Client starten ...", 0, 0) #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 237, 59, 192, 124) $Checkbox1 = GUICtrlCreateCheckbox("Inf. SP", 8, 8, 97, 17) $Checkbox2 = GUICtrlCreateCheckbox("Fast Reload", 8, 32, 97, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 If ProcessExists("S4Client.exe") <> 0 Then Hack() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Hack() $PID = ProcessExists("S4Client.exe") $Open = _MemoryOpen($PID) Sleep(500) If GUICTRLREAD($Checkbox1) = 1 then _MEMORYWRITE(0x00482472, $OPEN, "2348565979", "long") EndIf If GUICTRLREAD($Checkbox2) = 1 then _MEMORYWRITE(0x005E5326, $OPEN, "251708035", "long") EndIf EndFunc Exit
thanks
|
its the memory detect i think you need a working Bypass
|
|
|
08/21/2013, 08:39
|
#2873
|
elite*gold: 724
Join Date: Mar 2011
Posts: 10,480
Received Thanks: 3,319
|
Quote:
Originally Posted by Titano95
That was the problem! <.<
Thank you.
But my program is detected now. What can i do?
PHP Code:
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> ToolTip("S4Client starten ...", 0, 0) #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 237, 59, 192, 124) $Checkbox1 = GUICtrlCreateCheckbox("Inf. SP", 8, 8, 97, 17) $Checkbox2 = GUICtrlCreateCheckbox("Fast Reload", 8, 32, 97, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ###
While 1 If ProcessExists("S4Client.exe") <> 0 Then Hack() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit
EndSwitch WEnd
Func Hack() $PID = ProcessExists("S4Client.exe") $Open = _MemoryOpen($PID) Sleep(500) If GUICTRLREAD($Checkbox1) = 1 then _MEMORYWRITE(0x00482472, $OPEN, "2348565979", "long") EndIf If GUICTRLREAD($Checkbox2) = 1 then _MEMORYWRITE(0x005E5326, $OPEN, "251708035", "long") EndIf EndFunc Exit
thanks
|
1) remove the AutoIt Signature from your compiled program
2) disable the XTrap Memory Check
or wait for a bypass.
|
|
|
08/23/2013, 17:49
|
#2874
|
elite*gold: 0
Join Date: May 2013
Posts: 83
Received Thanks: 6
|
Gibt es einen noch funktionierenden ID Manager?
|
|
|
08/23/2013, 18:41
|
#2875
|
elite*gold: 11
Join Date: Jun 2012
Posts: 894
Received Thanks: 1,463
|
Quote:
Originally Posted by SkySoldierLP
Gibt es einen noch funktionierenden ID Manager?
|
ich glaub die von Olympus funktioniert noch
|
|
|
08/23/2013, 20:09
|
#2876
|
elite*gold: 11
Join Date: Jun 2012
Posts: 894
Received Thanks: 1,463
|
Quote:
Originally Posted by ♣*EvolutionBr*♣
|
hör auf zu spammen kleiner faker
|
|
|
08/23/2013, 21:12
|
#2877
|
elite*gold: 20
Join Date: Oct 2012
Posts: 346
Received Thanks: 361
|
Hey All...
Can Anyone Help Me In The 1-0 System?
I Want To Put It In My C# Console Trainer
Please ANyOne Help Me..Because I Search In Google And Nothing Get
====================================
Press Thanks If I Helped You!
|
|
|
08/24/2013, 00:30
|
#2878
|
elite*gold: 0
Join Date: May 2013
Posts: 101
Received Thanks: 42
|
What do you mean by "The 1-0 System" ?
|
|
|
08/24/2013, 05:52
|
#2879
|
elite*gold: 11
Join Date: Jun 2012
Posts: 894
Received Thanks: 1,463
|
Quote:
Originally Posted by xDarkMan
Hey All...
Can Anyone Help Me In The 1-0 System?
I Want To Put It In My C# Console Trainer
Please ANyOne Help Me..Because I Search In Google And Nothing Get
====================================
Press Thanks If I Helped You!
|
you can creat a hack lol
why you cant do this xD
|
|
|
08/24/2013, 11:10
|
#2880
|
elite*gold: 20
Join Date: Oct 2012
Posts: 346
Received Thanks: 361
|
Im Learning Some In The Website But Nothing Get! T_T
About The 1-0 System !
And The 1-0 System Is 1= Active / 0=Deactive
==============================
Press Thanks If I Helped You!
|
|
|
All times are GMT +1. The time now is 14:49.
|
|