AutoIt Multihack Problem.

10/21/2010 22:02 iDarkn3ss#1
I have coded a Multihack for 4Story ,but when I enable a hack,

e.g. Speed Hack

I cannot enable any other ,without turning it off first.:rtfm:

In order to freeze the memory address ,I'm using a while loop.

What I have to change in my code ,to be able to enable multiple hacks??

Thank u!
10/21/2010 22:07 lolkop#2
you gotta use variables to set states...

for example:
if $speedhack then enableSpeedhack()

if you use that one in your mainloop, you do many things at one and the same time...
10/22/2010 12:44 iDarkn3ss#3
Thank you very much! xD

I'm gonna try it and I'll tell you.


Update : It doesn't work...Could you give an example?
10/22/2010 19:31 RedKelly™#4
hey keinen doublepost ... is verboten
10/22/2010 19:32 iDarkn3ss#5
I'm sorry for that. Can you help me?
10/22/2010 19:34 RedKelly™#6
click to in the second Post in Edit and clean the post
10/22/2010 19:36 iDarkn3ss#7
Done! What about my problem? Can u help me?
10/22/2010 19:50 lolkop#8
this is a small examplecode:
Code:
Dim $checkbox[10]

GUICreate("blah", 80, 220, -1, -1, 0x10C80000)
For $i=0 To 9
	$checkbox[$i] = GUICtrlCreateCheckbox("Action"&$i+1, 10, 10 + $i*20)
Next

While 1
	$msg = GUIGetMsg()
	If $msg = -3 Then Exit
	For $i=0 To 9
		If GUICtrlRead($checkbox[$i])=1 Then
			ConsoleWrite("Action"&$i+1&" is now active"&@CRLF)
		EndIf
	Next
WEnd
10/22/2010 20:09 iDarkn3ss#9
I'm a new programmer so I cannot understand the code very good.

This is my code (a part).

Code:
#include <GUIConstants.au3>
#include <Pointer.au3>
#RequireAdmin

GUICreate("Hack", 520, 392, 286, 158)

GUICtrlCreateGroup("Skill Hack ", 192, 208, 169, 153)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$Skill = GUICtrlCreateInput("", 200, 264, 161, 22)
GUICtrlCreateLabel("Value ", 200, 240, 45, 18)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$Skill_On = GUICtrlCreateButton("On", 200, 296, 75, 57, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$Skill_Off = GUICtrlCreateButton("Off", 280, 296, 75, 57, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Pvp AOE Hack ", 192, 144, 169, 57)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$PvP_On = GUICtrlCreateButton("On", 200, 168, 75, 25, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$PvP_Off = GUICtrlCreateButton("Off", 280, 168, 75, 25, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)

$Open = _MemoryOpen(ProcessExists("TClient.exe"))

$Pointer = 0x0069F190

Global $Skill_O[3] = [0, Dec("A20"), Dec("454")]

Global $Dmg1_O[3] = [0, Dec("A20"), Dec("45C")]
Global $Dmg2_O[3] = [0, Dec("A20"), Dec("488")]
Global $Dmg3_O[3] = [0, Dec("A20"), Dec("468")]
Global $Dmg4_O[3] = [0, Dec("A20"), Dec("494")]

Global $Miss1_O[3] = [0, Dec("A20"), Dec("456")]
Global $Miss2_O[3] = [0, Dec("A20"), Dec("482")]

While 1
	
	$msg = GUIGetMsg()
	
	
	Select 
		
		Case $msg = $GUI_EVENT_CLOSE
			Exit
			
			Case $msg = $Skill_On 
			
			GUICtrlSetData($Skill_On, "Enabled")

			While 1
			
			$msg = GUIGetMsg()
			
			_MemoryPointerWrite($Pointer, $Open, $Skill_O, GUICtrlRead($Skill))

			Select
			
		    Case $msg = $Skill_Off 
			GUICtrlSetData($Skill_On, "On")
			ExitLoop
			
			Case $msg = $GUI_EVENT_CLOSE
            Exit
			
			
			EndSelect
			
		WEnd
		
		Case $msg = $PvP_On
			
			GUICtrlSetData($PvP_On, "Enabled")


		    While 1
			
            $msg = GUIGetMsg()
			
			_MemoryPointerWrite($Pointer, $Open, $Dmg1_O, "99999")
			_MemoryPointerWrite($Pointer, $Open, $Dmg2_O, "99999")
			_MemoryPointerWrite($Pointer, $Open, $Dmg3_O, "99999")
			_MemoryPointerWrite($Pointer, $Open, $Dmg4_O, "99999")
			_MemoryPointerWrite($Pointer, $Open, $Skill_O, "321")
			

            _MemoryPointerWrite($Pointer, $Open, $Miss1_O, "99999")
			_MemoryPointerWrite($Pointer, $Open, $Miss2_O, "99999")
			
			Select
			
		    Case $msg = $PvP_Off
			GUICtrlSetData($PvP_On, "On")
		
            ExitLoop
			
			Case $msg = $GUI_EVENT_CLOSE
            Exit
			
			
			EndSelect
			
		WEnd
		
	EndSelect
	
WEnd
As you can see, when I enable the Skill Hack,
I cannot run the PvP One-Hit hack.

What I have to change? Thank very-very much for your help!
10/22/2010 20:32 lolkop#10
Code:
#include <GUIConstants.au3>
#include <Pointer.au3>
#RequireAdmin

GUICreate("Hack", 520, 392, 286, 158)

GUICtrlCreateGroup("Skill Hack ", 192, 208, 169, 153)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$Skill = GUICtrlCreateInput("", 200, 264, 161, 22)
GUICtrlCreateLabel("Value ", 200, 240, 45, 18)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$Skill_On = GUICtrlCreateButton("On", 200, 296, 75, 57, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$Skill_Off = GUICtrlCreateButton("Off", 280, 296, 75, 57, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Pvp AOE Hack ", 192, 144, 169, 57)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$PvP_On = GUICtrlCreateButton("On", 200, 168, 75, 25, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
$PvP_Off = GUICtrlCreateButton("Off", 280, 168, 75, 25, 0)
GUICtrlSetFont(-1, 8, 400, 2, "Broadway BT")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)

$Open = _MemoryOpen(ProcessExists("TClient.exe"))

$Pointer = 0x0069F190

Global $Skill_O[3] = [0, Dec("A20"), Dec("454")]

Global $Dmg1_O[3] = [0, Dec("A20"), Dec("45C")]
Global $Dmg2_O[3] = [0, Dec("A20"), Dec("488")]
Global $Dmg3_O[3] = [0, Dec("A20"), Dec("468")]
Global $Dmg4_O[3] = [0, Dec("A20"), Dec("494")]

Global $Miss1_O[3] = [0, Dec("A20"), Dec("456")]
Global $Miss2_O[3] = [0, Dec("A20"), Dec("482")]

While 1
    Switch GUIGetMsg()
        Case -3
            Exit
        Case $Skill_On
            GUICtrlSetData($Skill_On, "Enabled")
        Case $Skill_Off
            GUICtrlSetData($Skill_On, "On")
        Case $PvP_On
            GUICtrlSetData($PvP_On, "Enabled")
        Case $PvP_Off
            GUICtrlSetData($PvP_On, "On")
        Case Else
            If GUICtrlRead($Skill_On) = "Enabled" Then _MemoryPointerWrite($Pointer, $Open, $Skill_O, GUICtrlRead($Skill))
            If GUICtrlRead($PvP_On) = "Enabled" Then
                _MemoryPointerWrite($Pointer, $Open, $Dmg1_O, "99999")
                _MemoryPointerWrite($Pointer, $Open, $Dmg2_O, "99999")
                _MemoryPointerWrite($Pointer, $Open, $Dmg3_O, "99999")
                _MemoryPointerWrite($Pointer, $Open, $Dmg4_O, "99999")
                _MemoryPointerWrite($Pointer, $Open, $Skill_O, "321")
                _MemoryPointerWrite($Pointer, $Open, $Miss1_O, "99999")
                _MemoryPointerWrite($Pointer, $Open, $Miss2_O, "99999")
            EndIf
    EndSwitch
WEnd
10/22/2010 20:49 iDarkn3ss#11
Thank you very much!! ;-D
10/22/2010 21:07 lolkop#12
simply never use more than one endless loop, do not use any sleeps and your script will be able to do a lot of actions "at once".
10/22/2010 22:11 iDarkn3ss#13
:-D