Ich wollte in meine Source Pointer einsetzen oO
habs zwar versucht aber die Versuche sind missglückt ....
jetzt frag ich euch^^
Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
If Not ProcessExists("TClient.exe") Then
MsgBox(0, "CheckInfo", "Please open 4storyEG")
Exit
EndIf
#Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\kevin\desktop\beta hack\h4ck.kxf
$Form1_1 = GUICreate("", 467, 292, 479, 125)
GUICtrlCreateTab(0, 0, 465, 289)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$GE_Bot = GUICtrlCreateTabItem("GE_Bot")
$Button1 = GUICtrlCreateButton("An", 80, 112, 121, 41, 0)
$Button2 = GUICtrlCreateButton("Aus", 240, 112, 121, 41, 0)
$Label1 = GUICtrlCreateLabel("Sendet F12 an das 4Story Fenster so das Aoe mit Skillhack dauerhaft ausgeführt wird.", 32, 176, 409, 17)
$Standard = GUICtrlCreateTabItem("§tandard Hacks")
$Damage = GUICtrlCreateLabel("Damage", 16, 56, 44, 17)
$Label2 = GUICtrlCreateLabel("No Miss", 16, 104, 42, 17)
$Speed = GUICtrlCreateLabel("Speed", 16, 160, 35, 17)
$Invisible = GUICtrlCreateLabel("Invisible", 16, 208, 42, 17)
$Button3 = GUICtrlCreateButton("On", 80, 56, 49, 17, 0)
$Button4 = GUICtrlCreateButton("Off", 136, 56, 49, 17, 0)
$Button5 = GUICtrlCreateButton("On", 80, 104, 49, 17, 0)
$Button6 = GUICtrlCreateButton("Off", 136, 104, 49, 17, 0)
$Button7 = GUICtrlCreateButton("On", 80, 160, 49, 17, 0)
$Button8 = GUICtrlCreateButton("Off", 136, 160, 49, 17, 0)
$Button9 = GUICtrlCreateButton("On", 80, 208, 51, 17, 0)
$Button10 = GUICtrlCreateButton("Off", 136, 208, 49, 17, 0)
$Label3 =GUICtrlCreateLabel("", 196, 208, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label4 =GUICtrlCreateLabel("", 196, 160, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
GUICtrlCreateInput("", 264, 56, 97, 21)
GUICtrlCreateInput("", 264, 104, 97, 21)
$Input3 = GUICtrlCreateInput("", 264, 160, 97, 21)
$Label5 =GUICtrlCreateLabel("", 197, 102, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label6 =GUICtrlCreateLabel("", 196, 56, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
$Spezial = GUICtrlCreateTabItem("§pezial Hacks")
$Label7 = GUICtrlCreateLabel("Kingdomhack", 24, 176, 69, 17)
$On = GUICtrlCreateButton("On", 112, 80, 49, 17, 0)
$Derion = GUICtrlCreateButton("Derion", 112, 176, 49, 17, 0)
$Off = GUICtrlCreateButton("Off", 176, 80, 49, 17, 0)
$Valorian = GUICtrlCreateButton("Valorian", 176, 176, 49, 17, 0)
$Label8 = GUICtrlCreateLabel("Bankhack", 24, 80, 53, 17)
$Label9 = GUICtrlCreateLabel("FlyHack", 24, 128, 43, 17)
$Button11 = GUICtrlCreateButton("On", 112, 128, 49, 17, 0)
$Button12 = GUICtrlCreateButton("Off", 176, 128, 49, 17, 0)
$Label10 =GUICtrlCreateLabel("", 240, 176, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label11=GUICtrlCreateLabel("", 240, 80, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label12=GUICtrlCreateLabel("", 240, 128, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
$Radio1 = GUICtrlCreateRadio("PC - Ausschalten", 296, 80, 121, 17)
$Radio2 = GUICtrlCreateRadio("PC - Neu starten", 296, 128, 97, 17)
$Porthack = GUICtrlCreateTabItem("Porthack")
$Button13 = GUICtrlCreateButton("Teleport", 32, 160, 177, 33, 0)
$Button14 = GUICtrlCreateButton("Teleport zur Leiche", 48, 200, 145, 17, 0)
GUICtrlCreateInput("", 24, 80, 97, 21)
GUICtrlCreateInput("", 144, 80, 97, 21)
$Label13 = GUICtrlCreateLabel("X", 64, 104, 11, 17)
$Label14 = GUICtrlCreateLabel("Y", 184, 104, 11, 17)
$Label15 = GUICtrlCreateLabel("0", 64, 48, 10, 17)
$Label16 = GUICtrlCreateLabel("0", 184, 48, 10, 17)
$Button15 = GUICtrlCreateButton("Teleport", 304, 160, 97, 33, 0)
GUICtrlCreateInput("", 296, 80, 105, 21)
$Label17 = GUICtrlCreateLabel("Z", 344, 104, 11, 17)
$Label18 = GUICtrlCreateLabel("0", 344, 48, 10, 17)
$Label19 = GUICtrlCreateLabel("X,Y = die Koordinaten wo man hin porten will", 16, 240, 214, 17)
$Label20 = GUICtrlCreateLabel("Z = in die Höhe in die man porten möchte (zu hoch stirbt man)", 16, 256, 303, 17)
$Skillhack = GUICtrlCreateTabItem("Skillhack")
GUICtrlSetState(-1,$GUI_SHOW)
$Button16 = GUICtrlCreateButton("Tinktur", 24, 48, 73, 25, 0)
$Button17 = GUICtrlCreateButton("Glückstrank", 104, 48, 73, 25, 0)
$Button18 = GUICtrlCreateButton("Homeport", 24, 144, 73, 25, 0)
$Button19 = GUICtrlCreateButton("Port Kuznez", 24, 80, 73, 25, 0)
$Button20 = GUICtrlCreateButton("Port Lonbaley", 104, 80, 73, 25, 0)
$Button21 = GUICtrlCreateButton("Port Keter", 104, 112, 73, 25, 0)
$Button22 = GUICtrlCreateButton("Port Markut", 24, 112, 73, 25, 0)
$Button23 = GUICtrlCreateButton("5 min Schild", 104, 144, 73, 25, 0)
$Button24 = GUICtrlCreateButton("Blackface weg", 24, 176, 153, 25, 0)
GUICtrlCreateInput("", 24, 208, 113, 21)
$Ausfuehren = GUICtrlCreateButton("Ausführen", 24, 240, 129, 25, 0)
$SkillhackOff = GUICtrlCreateButton("Skillhack Off", 168, 240, 113, 25, 0)
$Label21=GUICtrlCreateLabel("", 296, 240, 44, 20)
GUICtrlSetBkColor(-1, 0xFF0000)
$Chat = GUICtrlCreateTabItem("Chat Hack")
GUICtrlSetState(-1,$GUI_SHOW)
$Label22 = GUICtrlCreateLabel("Mit dem Chathack könnt ihr in den Notizchat sprich Uppchat schreiben", 56, 40, 338, 17)
GUICtrlSetColor(-1, 0xff0000)
$Label23 = GUICtrlCreateLabel("Chat im Spiel mit Enter öffnen ein Text ein geben und mit Enter bestätigen", 48, 72, 350, 17)
GUICtrlSetColor(-1, 0xff0000)
$Button27 = GUICtrlCreateButton("Uppchat schreiben aktivieren", 152, 120, 161, 41, 0)
$Label24 = GUICtrlCreateLabel("Uppchat schreiben aktiviern klicken", 136, 56, 174, 17)
GUICtrlSetColor(-1, 0xff0000)
$Button28 = GUICtrlCreateButton("deaktivieren", 152, 216, 161, 41, 0)
$Label26=GUICtrlCreateLabel("Jetzt müsste im Uppchat bzw Notizchat eure Nachricht erscheinen", 64, 88, 317, 17)
GUICtrlSetColor(-1, 0xff0000)
$Label27=GUICtrlCreateLabel("", 164, 176, 140, 28)
GUICtrlSetBkColor(-1, 0xFF0000)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $Bedingung
Global $Timer = TimerInit()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button1
$Bedingung = 1
Case $button2
$Bedingung = 0
Case $button3
GUICtrlSetBkColor($Label6, 0x9CC83D) ;DMG v
Case $button4
GUICtrlSetBkColor($Label6, 0xFE161C) ;DMG v
Case $button5
GUICtrlSetBkColor($Label5, 0x9CC83D) ;NoMiss v
Case $button6
GUICtrlSetBkColor($Label5, 0xFE161C) ;NoMiss v
Case $button7
GUICtrlSetBkColor($Label4, 0x9CC83D) ;Speedhack v
Case $button8
GUICtrlSetBkColor($Label4, 0xFE161C) ;Speedhack v
Case $button9
GUICtrlSetBkColor($Label3, 0x9CC83D) ;Invisible v
Case $button10
GUICtrlSetBkColor($Label3, 0xFE161C) ;Invisible v
;______________________________________________________________________________________ ;Spezialhacks
Case $On
GUICtrlSetBkColor($Label11, 0x9CC83D) ;Bankhack v
MsgBox(274432, "Wichtig", "Bankfach beim NPC öffnen und wieder schließen dann werden die Slots beim Bankhack angezeigt")
Case $Off
GUICtrlSetBkColor($Label11, 0xFE161C) ;Bankhack v
Case $button11
GUICtrlSetBkColor($Label12, 0x9CC83D) ;Flyhack v
MsgBox(274480, "Warnung", "Durch das aktivieren des Flyhack kann es zu grafischen Fehlern im Spiel kommen")
Case $Button12
GUICtrlSetBkColor($Label12, 0xFE161C) ;Flyhack v
Case $Derion ;Kingdomhack v
GUICtrlSetBkColor($Label10, 0x9CC83D)
Case $Valorian ;Kingdomhack v
GUICtrlSetBkColor($Label10, 0x9CC83D)
;______________________________________________________________________________________ ;Skillhack
Case $Ausfuehren
GUICtrlSetBkColor($Label21, 0x9CC83D) ;Skillhack v
Case $Skillhackoff ;Skillhack v
GUICtrlSetBkColor($Label21, 0xFE161C)
;______________________________________________________________________________________ ;Chathack
Case $button27
GUICtrlSetBkColor($Label27, 0x9CC83D)
Case $button28
GUICtrlSetBkColor($Label27, 0xFE161C)
;______________________________________________________________________________________ ;PC - Funktionen
Case $Radio1
Shutdown(1)
Case $Radio2
Shutdown(2)
EndSwitch
Senden()
WEnd
Func Senden()
If $Bedingung = 1 And TimerDiff($Timer) >= 70 Then
ControlSend("4Story_US", "", "", "{F12}")
$Timer = TimerInit()
EndIf
EndFunc
mfg volle






