Was ist falsch?

05/07/2012 13:38 "-IceCold-"#1
Hallo AutoIt Sektion,

Ich wollte nachfragen was an diesen Code falsch ist?

Code:
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("-[P]rivate- 'n' -Ryo- Trainer P21 v5.0", 336, 295, 192, 124)
GUISetIcon("C:\Documents and Settings\usuario\Escritorio\Conan-Icono.ico", -1)
$Group1 = GUICtrlCreateGroup("Delays", 16, 16, 145, 121)
$Checkbox1 = GUICtrlCreateCheckbox("WallJump-Delay", 24, 32, 105, 33)
$Checkbox2 = GUICtrlCreateCheckbox("Dodge-Delay", 24, 56, 121, 41)
$Checkbox3 = GUICtrlCreateCheckbox("Jump-LandDelay", 24, 88, 121, 41)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Unlimited", 176, 16, 145, 137)
$Checkbox4 = GUICtrlCreateCheckbox("Sp Skill's", 184, 32, 113, 33)
$Checkbox5 = GUICtrlCreateCheckbox("1 hit Kill", 184, 56, 97, 41)
$Checkbox6 = GUICtrlCreateCheckbox("Wall Hack", 184, 88, 105, 33)
$Checkbox9 = GUICtrlCreateCheckbox("Unlimited Ammo", 184, 120, 105, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("START", 184, 184, 121, 25)
$Group3 = GUICtrlCreateGroup("Others", 16, 144, 145, 89)
$Checkbox7 = GUICtrlCreateCheckbox("Accuracy", 24, 160, 113, 25)
$Checkbox8 = GUICtrlCreateCheckbox("Fast Fire", 24, 192, 105, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Input1 = GUICtrlCreateInput("max:3", 240, 160, 73, 21)
$Label1 = GUICtrlCreateLabel("Speed : ", 184, 160, 44, 17)
$Label2 = GUICtrlCreateLabel("Made by -[P]rivate- 'n' -Ryo-", 56, 248, 223, 17)
GUICtrlSetFont(-1, 10, 800, 0, "BankGothic Lt BT")
GUICtrlSetColor(-1, 0xFF0000)
$Button2 = GUICtrlCreateButton("Instruccions", 184, 208, 121, 25)
$Label3 = GUICtrlCreateLabel("Trainer V1.0", 272, 272, 62, 17)
GUICtrlSetColor(-1, 0x808080)
$CLOSE = GUICtrlCreateButton("CLOSE", 8, 272, 65, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
GUISetState(@SW_HIDE)
_Atencion()
_Waiting()
_Fin()

Case $GUI_EVENT_CLOSE
Exit

Case $Button2
_Instruccion()

Case $GUI_EVENT_CLOSE
Exit

Case $CLOSE
Exit 0

Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

If $Checkbox1 = 1 Then
_WallJump()
Else
$Checkbox1 = 0
EndIf

If $Checkbox2 = 1 Then
_DodgeDelay()
Else
$Checkbox2 = 0
EndIf

If $Checkbox3 = 1 Then
_JumpLandDelay()
Else
$Checkbox3 = 0
EndIf

If $Checkbox4 = 1 Then
_SPSkills()
Else
$Checkbox4 = 0
EndIf

If $Checkbox5 = 1 Then
_1HitKill()
Else
$Checkbox5 = 0
EndIf

If $Checkbox6 = 1 Then
_WallHack()
Else
$Checkbox6 = 0
EndIf

If $Checkbox7 = 1 Then
_Accuracy()
Else
$Checkbox7 = 0
EndIf

If $Checkbox8 = 1 Then
_FastFire()
Else
$Checkbox8 = 0
EndIf

If $Checkbox9 = 1 Then
_UnlimitedAmmo()
Else
$Checkbox9 = 0
EndIf

Func _Instruccion()
MsgBox(0, "Instruccions", "Choose your favourite hacks and press Start - Thx -[P]rivate- and -Ryo-")
EndFunc
Sleep(0)

Func _Atencion()
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Atencion", 206, 111, 223, 231)
GUISetIcon("C:\Documents and Settings\usuario\Escritorio\atencion icon.ico", -1)
$Button1 = GUICtrlCreateButton("Abort", 56, 32, 89, 25)
$Label1 = GUICtrlCreateLabel("Do you wanna abort?", 40, 8, 125, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$Button2 = GUICtrlCreateButton("Continue", 56, 64, 89, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
ProcessClose("P21 v5.0 -[P]rivate- Trainer.exe")
Exit

Case $GUI_EVENT_CLOSE
Exit

Case $Button2
GUISetState(@SW_HIDE)
_Waiting()
_Fin()

Case $GUI_EVENT_CLOSE
Exit




EndSwitch
WEnd
EndFunc

Func _Waiting()
ToolTip("Waiting 4 S4Client.exe...",0,0)
Sleep(500)
$EXISTS=PROCESSWAIT("S4Client.exe")
$OPEN=_MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
EndFunc
Sleep(2000)




Func _WallJump()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$WallJumpDelay = 0x00D3C9F4

_MEMORYWRITE($WallJumpDelay, $OPEN, "-1", "char[3]")
EndFunc
Sleep(1)

Func _DodgeDelay()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$DodgeDelay = 0x00D3C99C

_MEMORYWRITE($DodgeDelay, $OPEN, "-1", "char[3]")
EndFunc
Sleep(1)


Func _JumpLandDelay()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$JumpLandDelay = 0x00D3CB88

_MEMORYWRITE($JumpLandDelay, $OPEN, "-1", "char[3]")
EndFunc
Sleep(1)

Func _SPSkills()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$SP1 = 0x00D382B0
$Sp2 = 0x00D3C908
$Sp3 = 0X00D3C962
$Sp4 = 0X00D3C9B9
$Sp5 = 0X00D3C9D1

_MEMORYWRITE($SP1, $OPEN, "-1", "char[3]")
_MEMORYWRITE($SP2, $OPEN, "-1", "char[3]")
_MEMORYWRITE($SP3, $OPEN, "-1", "char[3]")
_MEMORYWRITE($SP4, $OPEN, "-1", "char[3]")
_MEMORYWRITE($SP5, $OPEN, "-1", "char[3]")
EndFunc
Sleep(1)

Func _1HitKill()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$Hit1 = 0x00D38BC0
$Hit2 = 0x00D3C29A
$hit3 = 0x00D3FC47
$hit4 = 0x00D3F244
$Hit5 = 0x0198AD27
$Hit6 = 0x01B816F3

_MEMORYWRITE($Hit1, $OPEN, "range", "char[6]")
_MEMORYWRITE($Hit2, $OPEN, "range", "char[6]")
_MEMORYWRITE($Hit3, $OPEN, "range", "char[6]")
_MEMORYWRITE($Hit4, $OPEN, "range", "char[6]")
_MEMORYWRITE($Hit5, $OPEN, "range", "char[6]")
_MEMORYWRITE($Hit6, $OPEN, "range", "char[6]")
EndFunc
Sleep(1)

Func _WallHack()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$Wall1 = 0x00CEC13E
$Wall2 = 0x00D38318
$Wall3 = 0x00D38328
$Wall4 = 0x00D38C64
$Wall5 = 0x00D38C74
$Wall6 = 0x00D9AF84
$Wall7 = 0x01977CC8
$Wall8 = 0x019817DD
$Wall9 = 0x0198AB90
$Wall10 = 0x01991873
$Wall11 = 0x01991B94
$Wall12 = 0x01991BA4
$Wall13 = 0x01991BB4

_MEMORYWRITE($Wall1, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall2, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall3, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall4, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall5, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall6, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall7, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall8, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall9, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall10, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall11, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall12, $OPEN, "float", "char[6]")
_MEMORYWRITE($Wall13, $OPEN, "float", "char[6]")
EndFunc
Sleep(1)

Func _UnlimitedAmmo()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$Ammo1 = 0x00D38BF0
$Ammo2 = 0x00D38C0C
_MEMORYWRITE($Ammo1, $OPEN, "max_ammo", "char[9]")
_MEMORYWRITE($Ammo2, $OPEN, "max_ammo", "char[9]")
EndFunc
Sleep(1)

Func _Accuracy()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$Accuracy1 = 0x00D3F078

_MEMORYWRITE($Accuracy1, $OPEN, "-1", "char[3]")
EndFunc
Sleep(1)

Func _FastFire()
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
$FastFire1 = 0x00D38BB0

_MEMORYWRITE($FastFire1, $OPEN, "jump_time", "char[10]")
EndFunc
Sleep(1)



Func _Fin()
ToolTip("The injection was a succesfull.", 0, 0)
$EXISTS = PROCESSWAIT("S4Client.exe")
$OPEN = _MEMORYOPEN(PROCESSEXISTS("S4Client.exe"))
Sleep(100)
Exit
EndFunc
05/07/2012 13:46 Freddy​#2
1. Keine includes
2. Die Variablen der Form 2 sind schon bei Form 1 verwendet
05/07/2012 13:50 lolkop#3
Code:
[...]
While 1
[...]
WEnd
//////////////////////////////////////////////
Ab Hier kann nichts mehr erreicht werden
//////////////////////////////////////////////
If $Checkbox1 = 1 Then
[...]
EndIf
[...]
Habe mal recht eindeutig gekennzeichnet was nicht funktionieren kann....
05/07/2012 13:59 "-IceCold-"#4
Also alles neu._.?
05/07/2012 14:02 Freddy​#5
Und warum öffnest du die Memory bei jedem ändern der Werte neu?
05/07/2012 14:06 lolkop#6
du hast eine endlosschleife.
der einzige weg aus dieser schleife ist der exit befehl.

das heist doch im logischen schluss, dass nichts, was sich hinter dieser schleife befindet, je erreicht werden kann.

das einzige was autoit dennoch annerkennt, sind funktionen, da bei einem funktionsaufruf der code nach eben dieser funktion durchsucht wird.

willst du deine checkbox abfragen in deinem code behalten, müssen sie selbstverständlich in die endlosschleife mit eingebaut werden. davon abgesehen beinhalten deine $Control variablen lediglich die control-handles. deshalb macht es keinen sinn zu schauen ob die handles =1 sind.
für derartige control abfragen gibt es die GUICtrlGetState und GUICtrlRead funktionen.