i made this too lfor my self..but there is a mistake init..that make it doesn`t send keys..made with auto it..debug it and tell me whats wrong init plz
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
global $start = 0
#Region ### START Koda GUI section ###
$Luv_Is_Pain = GUICreate("Luv_Is_Pain", 633, 447, 201, 190)
$PressStart = GUICtrlCreateLabel("Start", 88, 312, 144, 42, BitOR($SS_CENTER,$WS_BORDER,$WS_CLIPSIBLINGS), BitOR($WS_EX_STATICEDGE,$GUI_WS_EX_PARENTDRAG))
GUICtrlSetFont(-1, 14, 800, 2, "Comic Sans MS")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetCursor (-1, 0)
$PressStop = GUICtrlCreateLabel("Stop", 392, 312, 146, 41, BitOR($SS_CENTER,$WS_BORDER,$WS_CLIPSIBLINGS), BitOR($WS_EX_STATICEDGE,$GUI_WS_EX_PARENTDRAG))
GUICtrlSetFont(-1, 14, 800, 2, "Comic Sans MS")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetCursor (-1, 0)
$Input1 = GUICtrlCreateInput("181000", 232, 192, 153, 21)
$Sleep = GUICtrlCreateLabel("Sleep Time", 144, 192, 74, 23)
GUICtrlSetFont(-1, 10, 800, 2, "Comic Sans MS")
$Label1 = GUICtrlCreateLabel("Clicks Delay", 144, 216, 80, 23)
GUICtrlSetFont(-1, 10, 800, 2, "Comic Sans MS")
$Input2 = GUICtrlCreateInput("1500", 232, 216, 153, 21)
$Label2 = GUICtrlCreateLabel("Key Presser Tool For A MinimiZed Client", 122, 8, 397, 31)
GUICtrlSetFont(-1, 14, 800, 2, "Comic Sans MS")
GUICtrlSetColor(-1, 0x0000FF)
$This = GUICtrlCreateEdit("", 160, 76, 321, 89)
GUICtrlSetData(-1, StringFormat("This Tool Will Press 223445111 in the F4 bar on Sro_Client\r\nSo Put ur Main Wpn in Slot No.1,Buff Wpn SlotNo.2,Skill1(Holy Spell),\r\nSkill2(Recovery Devision),Skill3(Bless Spell)\r\n\r\nAll Key Timing(Sleep+Delay) are in Secs\r\n\r\nMade By Luv......Thx To PipeLine From Stealthex.org\r\n\r\nAlways Remeber That Luv is Pain"))
$Status = GUICtrlCreateLabel("Tool Is Stopped", 216, 256, 172, 33, BitOR($SS_CENTER,$WS_BORDER,$WS_CLIPSIBLINGS))
GUICtrlSetFont(-1, 10, 800, 6, "Comic Sans MS")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
AutoItSetOption("sendkeydelay",$Input2)
While 1
if $start = 1 Then
$SleepTime = GuiCTRLread($Input1); reads what has been put into the box, and stores it under $SleepTime
If $Input1 < 5000 Then Msgbox(0,"ERROR", "U need Higher Value dude"); just so it wont be spamming if people set it too low
msgbox(1, "tool", "The tool is now running")
Sleep($Input1)
While 1
$var = WinList("[CLASS:CLIENT]")
For $i = 1 to $var[0][0]
Next
$handle = WinGetHandle($var[1][1])
Sleep(181000)
ControlSend($handle, "", "", "{F4}")
ControlSend($handle, "", "", "224111")
WEnd
EndIf
$msg = Guigetmsg(); is to read which control will be pressed.
Select; selects a case
case $msg = $PressStart ; when button 1 is pressed then
GUICtrlSetData($Status, "Tool is Started"); when the button is clicked ( start button) it sets label 1 to what i said.
$start= 1; sets start to 1, so when the if reads start = 1 i will perform that action until start it changed
Case $msg = $PressStop; if the 2nd button is pressed then
GuiCTRLsetdata($Status, "Tool is Stopped"); when the button is clicked ( stop button) the label will show what I said.
$start = 0; if you press
Case $msg = $GUI_EVENT_CLOSE
EXIT
EndSelect
WEnd
 |
