toothyXdip

Toothydip Autoclicker Ver 1.01 lol i just made it look better have a menu at top and some other stuff enjoy =) there is some stuff that i think ppl could learn from Global $F10OnOff Global $num Global $ver = "Ver 1.01" Global $Disabled = False HotKeySet('{F10}', '_Sendleftclick') HotKeySet('!^c', 'Hotkeyclose') #include <GUIConstants.au3> $main = GUICreate("Toothydip Ac", 230, 300) GUISetBkColor(0x00ccee) $user = GUICtrlCreateDummy() GUICtrlSetOnEvent($GUI_EVENT_CLOSE, 'onclick') $group = XSkinGroup("Speed Setting", 40, 80, 130, 130, $SS_CENTER) ;Labels------------------------------------------- GUISetFont(16, "", "", "Alien Encounters") $title = GUICtrlCreateLabel("Toothydip" & @CRLF & "AutoClicker", 40, 40) GUISetFont(9) $status_label = GUICtrlCreateLabel("Autoclicker is Off", 0, 260, 230, 20, BitOR($SS_SIMPLE, $SS_SUNKEN)) ; Buttons & Checkboxes ---------------------------- GUISetFont(9) $fast_speed_checkbox = GUICtrlCreateRadio(" Fast Speed", 50, 100, 90, 20) $medium_speed_checkbox = GUICtrlCreateRadio(" Medium Speed", 50, 130, 110, 20) GUICtrlSetState($medium_speed_checkbox, $GUI_CHECKED) $slow_speed_checkbox = GUICtrlCreateRadio(" Slow Speed", 50, 160, 90, 20) ; Menus ------------------------------------- GUISetFont(9) $file_menu = GUICtrlCreateMenu("File") $file_exit = GUICtrlCreateMenuitem("Exit", $file_menu) $options_menu = GUICtrlCreateMenu("Options") $options_speed_menu = GUICtrlCreateMenu("Speed", $options_menu) $speed_menu_setting_fast = GUICtrlCreateMenuitem("Fast", $options_speed_menu) $speed_menu_setting_medium = GUICtrlCreateMenuitem("Medium", $options_speed_menu) $speed_menu_setting_slow = GUICtrlCreateMenuitem("Slow", $options_speed_menu) GUICtrlSetState($speed_menu_setting_medium, $GUI_CHECKED) $help_menu = GUICtrlCreateMenu("Help") $help_help = GUICtrlCreateMenuitem("Help", $help_menu) $help_info = GUICtrlCreateMenuitem("Info", $help_menu) $view_menu = GUICtrlCreateMenu("View") $view_status_bar = GUICtrlCreateMenuitem("Status Bar", $view_menu) GUICtrlSetState($view_status_bar, $GUI_CHECKED) ; Other Info -------------------------------- $clicksetting_helper = 0 $defalt_delay = 10 $speed_setting = 0 GUISetState(@SW_SHOW) AdlibEnable("title_textcolor_change", 100) While True $msg = GUIGetMsg() Sleep(10) $clicksetting_helper = $clicksetting_helper + $speed_setting If (($clicksetting_helper * $defalt_delay) / 500) >= 1 Then Sendleftclick() $clicksetting_helper = 0 EndIf Select Case $msg = $GUI_EVENT_CLOSE OnExit() Case $msg = $file_exit ExitLoop Case $msg = $speed_menu_setting_fast speed_menu_setting_fast() Case $msg = $speed_menu_setting_medium speed_menu_setting_medium() Case $msg = $speed_menu_setting_slow speed_menu_setting_slow() Case $msg = $help_info helpinfo() Case $msg = $help_help helphelp() Case $msg = $view_status_bar If BitAND(GUICtrlRead($view_status_bar), $GUI_CHECKED) = $GUI_CHECKED Then GUICtrlSetState($view_status_bar, $GUI_UNCHECKED) GUICtrlSetState($status_label, $GUI_HIDE) Else GUICtrlSetState($view_status_bar, $GUI_CHECKED) GUICtrlSetState($status_label, $GUI_SHOW) EndIf EndSelect WEnd ; Functions ------------------------------------- Func OnExit() Exit EndFunc ;==>OnExit Func Hotkeyclose() Exit EndFunc ;==>Hotkeyclose Func helpinfo() $info = GUICreate("Info", 150, 150, 0, 0) GUISetBkColor(0x000000) GUISetFont(9, "", "", "Comic Sans MS") $speed_label = GUICtrlCreateLabel("Toothydip Autoclicker"& @CRLF & $ver & @CRLF & "Made by ToothyXdip" & @CRLF & "Autoit3", 15, 25) $Okbutton = GUICtrlCreateButton("Ok", 50, 110, 40, 20) GUISetFont(9) GUICtrlSetColor($speed_label, 0xffffff) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() Select Case $msg = $Okbutton GUIDelete($info) ExitLoop Case $msg = $GUI_EVENT_CLOSE GUIDelete($info) ExitLoop EndSelect WEnd EndFunc ;==>helpinfo Func helphelp() $help = GUICreate("Help", 150, 150, 0, 0) GUISetBkColor(0x000000) GUISetFont(9, "", "", "Comic Sans MS") $help_label = GUICtrlCreateLabel("Pick a speed and" & @CRLF & "Press F10 to start" & @CRLF & "or stop Autoclicker" & @CRLF & "Emergency Close:" & @CRLF & "Alt+Ctrl+c", 20, 20) $Okbutton2 = GUICtrlCreateButton("Ok", 50, 110, 40, 20) GUISetFont(9) GUICtrlSetColor($help_label, 0xffffff) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() Select Case $msg = $Okbutton2 GUIDelete($help) ExitLoop Case $msg = $GUI_EVENT_CLOSE GUIDelete($help) ExitLoop EndSelect WEnd EndFunc ;==>helpinfo Func speed_menu_setting_fast() GUICtrlSetState($fast_speed_checkbox, $GUI_CHECKED) GUICtrlSetState($speed_menu_setting_fast, $GUI_CHECKED) GUICtrlSetState($speed_menu_setting_medium, $GUI_UNCHECKED) GUICtrlSetState($speed_menu_setting_slow, $GUI_UNCHECKED) EndFunc ;==>speed_menu_setting_fast Func speed_menu_setting_medium() GUICtrlSetState($medium_speed_checkbox, $GUI_CHECKED) GUICtrlSetState($speed_menu_setting_medium, $GUI_CHECKED) GUICtrlSetState($speed_menu_setting_fast, $GUI_UNCHECKED) GUICtrlSetState($speed_menu_setting_slow, $GUI_UNCHECKED) EndFunc ;==>speed_menu_setting_medium Func speed_menu_setting_slow() GUICtrlSetState($slow_speed_checkbox, $GUI_CHECKED) GUICtrlSetState($speed_menu_setting_slow, $GUI_CHECKED) GUICtrlSetState($speed_menu_setting_fast, $GUI_UNCHECKED) GUICtrlSetState($speed_menu_setting_medium, $GUI_UNCHECKED) EndFunc ;==>speed_menu_setting_slow Func onclick() GUICtrlSendToDummy($user) EndFunc ;==>onclick Func title_textcolor_change() $num += 1 $color = StringSplit("0x000000,0x111111,0x222222,0x333333,0x444444,0x555555,0x666666,0x777777,0x888888,0x999999,0xaaaaaa,0xbbbbbb,0xcccccc,0xdddddd,0xeeeeee,0xffffff,0xeeeeee,0xdddddd,0xcccccc,0xbbbbbb,0xaaaaaa,0x999999,0x888888,0x777777,0x666666,0x555555,0x444444,0x333333,0x222222,0x111111", ",") If $num > $color[0] Then $num = 1 Return GUICtrlSetColor($title, $color[$num]) EndFunc ;==>title_textcolor_change Func Sendleftclick() If $F10OnOff Then MouseClick("Left") EndFunc ;==>Sendleftclick Func _Sendleftclick() $F10OnOff = Not $F10OnOff If $Disabled Then GUICtrlSetState($fast_speed_checkbox, $GUI_ENABLE) GUICtrlSetState($medium_speed_checkbox, $GUI_ENABLE) GUICtrlSetState($slow_speed_checkbox, $GUI_ENABLE) GUICtrlSetData($status_label, "Autoclicker is Off") $Disabled = Not $Disabled Return EndIf If _IsChecked($fast_speed_checkbox) Then $speed_setting = 50 GUICtrlSetState($medium_speed_checkbox, $GUI_DISABLE) GUICtrlSetState($slow_speed_checkbox, $GUI_DISABLE) GUICtrlSetData($status_label, "Autoclicker is On") GUICtrlSetState($speed_menu_setting_fast, $GUI_CHECKED) $Disabled = True ElseIf _IsChecked($medium_speed_checkbox) Then $speed_setting = 30 GUICtrlSetState($fast_speed_checkbox, $GUI_DISABLE) GUICtrlSetState($slow_speed_checkbox, $GUI_DISABLE) GUICtrlSetData($status_label, "Autoclicker is On") GUICtrlSetState($speed_menu_setting_medium, $GUI_CHECKED) $Disabled = True ElseIf _IsChecked($slow_speed_checkbox) Then $speed_setting = 10 GUICtrlSetState($medium_speed_checkbox, $GUI_DISABLE) GUICtrlSetState($fast_speed_checkbox, $GUI_DISABLE) GUICtrlSetData($status_label, "Autoclicker is On") GUICtrlSetState($speed_menu_setting_slow, $GUI_CHECKED) $Disabled = True EndIf EndFunc ;==>_Sendleftclick Func _IsChecked($control) Return BitAND(GUICtrlRead($control), $GUI_CHECKED) = $GUI_CHECKED EndFunc ;==>_IsChecked Func XSkinGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight, $color) $color = 0Xffffff Local $XS_n, $PControl If StringInStr(@OSTYPE, "WIN32_NT") Then $XS_n = DllCall("uxtheme.dll", "int", "GetThemeAppProperties") DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", 0) EndIf $PControl = GUICtrlCreateGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight) ;GUICtrlSetBkColor($PControl, $color1) GUICtrlSetColor($PControl, $color) If StringInStr(@OSTYPE, "WIN32_NT") And IsArray($XS_n) Then DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", $XS_n[0]) EndIf Return $PControl EndFunc ;==>XSkinGroupToothydipAC.exe

Here is your answer

because the CancelPressed function set by Guictrlsetonevent up top wasnt defined and i would recommend setting it up to make it exit by pressing the X =) #include <GUIConstants.au3> Opt("GUICoordMode",2) Opt("GUIResizeMode", 1) Opt("GUIOnEventMode", 1) $parent1 = GUICreate("Parent1") $ok1 = GUICtrlCreateButton ("OK", 10, 30, 50) GUICtrlSetOnEvent(-1, "OKPressed") $cancel1 = GUICtrlCreateButton ( "Cancel", 0, -1) GUICtrlSetOnEvent(-1, "CancelPressed") GUISetState(@SW_SHOW) While 1 GuiSetState() Wend Func OKPressed() MsgBox(0, "OK Pressed", "ID=" & @GUI_CTRLID & " WinHandle=" & @GUI_WINHANDLE & " CtrlHandle=" & @GUI_CTRLHANDLE) EndFunc Func CancelPressed() Exit EndFunc

works for me why what errors are you getting/what is going wrong?

thanks yeah i think im going to look up a array tut or read the whole array help files lol well thanks again this and reading some of your other scrips has helped me to learn alot

thanks =) yeah i dont really know how to use arrays or a lot of the functions yet so that might have helped lol thanks again P.S. i have a question about what is happening in this script ok so tell me where im wrong the AdlibEnable is telling to evaluate the function colorchange every 500 milliseconds making it loop the colorchange then is the $num +=1 telling it how fast to do the color changes in the StringSplit? and the return is telling it what to make out of all of that and that is to change the color accordingly to the array returned from the StringSplit function? 0.o

you mean #region --- GuiBuilder code Start --- ; Script generated by AutoBuilder 0.6 Prototype #include <GuiConstants.au3> GuiCreate("MyGUI", @DesktopWidth, @DesktopHeight-60, -1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS)) GuiSetState() While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case Else ;;; EndSelect WEnd Exit #endregion --- GuiBuilder generated code End ---

Is there a way to make it where there is a constant loop of color change for a label without a ton of "If's" and does without the help of a button send

thanks bro =) HOLY SHIZZ 34,727 POST VIEWS almost as much as the sticky

(ac script at bottem) ok im just working on making my ac a little better and i thought you shouldnt be able to click diff speeds when you are in the clicking process. My problem it will disable the other 2 radios when i start it and keep the selected one enabled but when i press the hot key again the acing stops but the other 2 are still disabled. And yes i did try to get this to work before i posted i tried setting up an else in the if tried having a func that enables them and checks if they are disabled ive tried a lot of stuff so yeah...i probably just did the write thing just in the wrong way. (and im trying something write now that i thought of so i might get it to work) nope that did work i tried a different way of doing the check state if state then change state...still same problem >.< And im not asking for a script im asking for you to give me and Idea of what i need to do Global $F10OnOff HotKeySet('{F10}', '_Sendleftclick') #include <GUIConstants.au3> $main = GUICreate("Toothydip Ac", 230, 300) GUISetBkColor(0x0000ff) $user = GUICtrlCreateDummy() GUICtrlSetOnEvent ($GUI_EVENT_CLOSE, 'onclick') $group = XSkinGroup("Speed Setting", 40, 80, 130, 130, $SS_CENTER) GUISetFont(16, "", "", "Alien Encounters") ;Labels------------------------------------------- $title = GUICtrlCreateLabel("Toothydip" & @CRLF & "AutoClicker", 40, 40) guisetfont(9) ; Buttons & Checkboxes---------------------------- $fast_speed_checkbox = GUICtrlCreateRadio(" Fast Speed", 50, 100,90,20) $medium_speed_checkbox = GUICtrlCreateRadio(" Medium Speed", 50, 130,110,20) $slow_speed_checkbox = GUICtrlCreateRadio(" Slow Speed", 50, 160,90,20) ; Color Sets ------------------------------------- guictrlsetcolor($title, 0x000000) $clicksetting_helper = 0 $defalt_delay = 10 $speed_setting = 0 GUISetState(@SW_SHOW) While True $msg = GUIGetMsg() Sleep(10) $clicksetting_helper = $clicksetting_helper + $speed_setting If (($clicksetting_helper * $defalt_delay) / 500) >= 1 Then Sendleftclick() $clicksetting_helper = 0 EndIf Switch $msg Case $GUI_EVENT_CLOSE OnExit() EndSwitch WEnd ; Functions ------------------------------------- Func OnExit() Exit EndFunc Func onclick() GUICtrlSendToDummy($user) EndFunc Func Sendleftclick() If $F10OnOff Then MouseClick("Left") EndFunc Func _Sendleftclick() $F10OnOff = Not $F10OnOff If _IsChecked($fast_speed_checkbox) Then $speed_setting = 50 GUICtrlSetState($medium_speed_checkbox, $GUI_DISABLE) GUICtrlSetState($slow_speed_checkbox, $GUI_DISABLE) ElseIf _IsChecked($medium_speed_checkbox) Then $speed_setting = 30 GUICtrlSetState($fast_speed_checkbox, $GUI_DISABLE) GUICtrlSetState($slow_speed_checkbox, $GUI_DISABLE) ElseIf _IsChecked($slow_speed_checkbox) Then $speed_setting = 10 GUICtrlSetState($medium_speed_checkbox, $GUI_DISABLE) GUICtrlSetState($fast_speed_checkbox, $GUI_DISABLE) EndIf EndFunc Func _IsChecked($control) Return BitAnd(GUICtrlRead($control),$GUI_CHECKED) = $GUI_CHECKED EndFunc Func XSkinGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight, $color) $color = 0Xffffff Local $XS_n, $PControl If StringInStr(@OSTYPE, "WIN32_NT") Then $XS_n = DllCall("uxtheme.dll", "int", "GetThemeAppProperties") DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", 0) EndIf $PControl = GUICtrlCreateGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight) ;GUICtrlSetBkColor($PControl, $color1) GUICtrlSetColor($PControl, $color) If StringInStr(@OSTYPE, "WIN32_NT") And IsArray($XS_n) Then DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", $XS_n[0]) EndIf Return $PControl EndFunc ;==>XSkinGroup

Just a simple autoclicker not really helping the public but i wanted to make my own AC i would say tell me of any bugs or glitches but its so simple i dont think that there are any 0.o so injoy Speeds: Fast: about 23 clicks per sec Medium: about 15 clicks per sec Slow: about 8 clicks per sec (XSkinGroup made by Valuater i just got it to work in my script) oh yeah i forgot to tell you press F10 to use it Global $F10OnOff HotKeySet('{F10}', '_Sendleftclick') #include <GUIConstants.au3> GUICreate("Toothydip AC", 230, 300) GUISetBkColor(0x0000ff) $user = GUICtrlCreateDummy() GUICtrlSetOnEvent ($GUI_EVENT_CLOSE, 'onclick') $group = XSkinGroup("Speed Setting", 40, 80, 130, 130, $SS_CENTER) GUISetFont(16, "", "", "Alien Encounters") ;Labels------------------------------------------- $title = GUICtrlCreateLabel("Toothydip" & @CRLF & "AutoClicker", 40, 40) guisetfont(9) ; Buttons & Checkboxes---------------------------- $fast_speed_checkbox = GUICtrlCreateRadio(" Fast Speed", 50, 100,90,20) $medium_speed_checkbox = GUICtrlCreateRadio(" Medium Speed", 50, 130,110,20) $slow_speed_checkbox = GUICtrlCreateRadio(" Slow Speed", 50, 160,90,20) ; Color Sets ------------------------------------- guictrlsetcolor($title, 0x000000) $clicksetting_helper = 0 $defalt_delay = 10 $speed_setting = 0 GUISetState(@SW_SHOW) While True $msg = GUIGetMsg() Sleep(10) $clicksetting_helper = $clicksetting_helper + $speed_setting If (($clicksetting_helper * $defalt_delay) / 500) >= 1 Then Sendleftclick() $clicksetting_helper = 0 EndIf Switch $msg Case $GUI_EVENT_CLOSE OnExit() EndSwitch WEnd ; Functions ------------------------------------- Func OnExit() Exit EndFunc Func onclick() GUICtrlSendToDummy($user) EndFunc Func Sendleftclick() If $F10OnOff Then MouseClick("Left") EndFunc Func _Sendleftclick() $F10OnOff = Not $F10OnOff If _IsChecked($fast_speed_checkbox) Then fast() If _IsChecked($medium_speed_checkbox) Then medium() If _IsChecked($slow_speed_checkbox) Then slow() EndFunc Func fast() $speed_setting = 50 EndFunc Func medium() $speed_setting = 30 EndFunc Func slow() $speed_setting = 10 EndFunc Func _IsChecked($control) Return BitAnd(GUICtrlRead($control),$GUI_CHECKED) = $GUI_CHECKED EndFunc Func XSkinGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight, $color) $color = 0Xffffff Local $XS_n, $PControl If StringInStr(@OSTYPE, "WIN32_NT") Then $XS_n = DllCall("uxtheme.dll", "int", "GetThemeAppProperties") DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", 0) EndIf $PControl = GUICtrlCreateGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight) ;GUICtrlSetBkColor($PControl, $color1) GUICtrlSetColor($PControl, $color) If StringInStr(@OSTYPE, "WIN32_NT") And IsArray($XS_n) Then DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", $XS_n[0]) EndIf Return $PControl EndFunc ;==>XSkinGroupToothydip_Ac.exe

NEVERMIND i figured it out like as soon as i posted i was like WAIT and it worked so my working script is at the bottom if you want a ac : \ Im making a simple autoclicker with 3 speed settings it did click until i put in the speeds now it just doesnt click i think it has to do with setting the hotkey to a variable then telling it to search for when that variable is used idk help? Global $F10OnOff $hotkey1 = HotKeySet('{F10}', '_Sendleftclick') #include <GUIConstants.au3> GUICreate("Toothydip AC", 230, 300) GUISetBkColor(0x0000ff) $user = GUICtrlCreateDummy() GUICtrlSetOnEvent ($GUI_EVENT_CLOSE, 'onclick') $group = XSkinGroup("Speed Setting", 40, 80, 130, 130, $SS_CENTER) GUISetFont(16, "", "", "Alien Encounters") ;Labels------------------------------------------- $title = GUICtrlCreateLabel("Toothydip" & @CRLF & "AutoClicker", 40, 40) guisetfont(9) ; Buttons & Checkboxes---------------------------- $fast_speed_checkbox = GUICtrlCreateRadio(" Fast Speed", 50, 100,90,20) $medium_speed_checkbox = GUICtrlCreateRadio(" Medium Speed", 50, 130,110,20) $slow_speed_checkbox = GUICtrlCreateRadio(" Slow Speed", 50, 160,90,20) ; Color Sets ------------------------------------- guictrlsetcolor($title, 0x000000) $clicksetting_helper = 0 $defalt_delay = 10 $speed_setting = 0 GUISetState(@SW_SHOW) While True $msg = GUIGetMsg() Sleep(10) $clicksetting_helper = $clicksetting_helper + $speed_setting If (($clicksetting_helper * $defalt_delay) / 500) >= 1 Then Sendleftclick() $clicksetting_helper = 0 EndIf Switch $msg Case $GUI_EVENT_CLOSE OnExit() Case $hotkey1 If _IsChecked($fast_speed_checkbox) Then fast() If _IsChecked($medium_speed_checkbox) Then medium() If _IsChecked($slow_speed_checkbox) Then slow() EndSwitch WEnd ; Functions ------------------------------------- Func OnExit() Exit EndFunc Func onclick() GUICtrlSendToDummy($user) EndFunc Func Sendleftclick() If $F10OnOff Then MouseClick("Left") EndFunc Func _Sendleftclick() $F10OnOff = Not $F10OnOff EndFunc Func fast() $speed_setting = 50 EndFunc Func medium() $speed_setting = 30 EndFunc Func slow() $speed_setting = 10 EndFunc Func _IsChecked($control) Return BitAnd(GUICtrlRead($control),$GUI_CHECKED) = $GUI_CHECKED EndFunc Func XSkinGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight, $color) $color = 0Xffffff Local $XS_n, $PControl If StringInStr(@OSTYPE, "WIN32_NT") Then $XS_n = DllCall("uxtheme.dll", "int", "GetThemeAppProperties") DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", 0) EndIf $PControl = GUICtrlCreateGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight) ;GUICtrlSetBkColor($PControl, $color1) GUICtrlSetColor($PControl, $color) If StringInStr(@OSTYPE, "WIN32_NT") And IsArray($XS_n) Then DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", $XS_n[0]) EndIf Return $PControl EndFunc ;==>XSkinGroupoÝ÷ Ùc(Fjëh×6Global $F10OnOff HotKeySet('{F10}', '_Sendleftclick') #include <GUIConstants.au3> GUICreate("Toothydip AC", 230, 300) GUISetBkColor(0x0000ff) $user = GUICtrlCreateDummy() GUICtrlSetOnEvent ($GUI_EVENT_CLOSE, 'onclick') $group = XSkinGroup("Speed Setting", 40, 80, 130, 130, $SS_CENTER) GUISetFont(16, "", "", "Alien Encounters") ;Labels------------------------------------------- $title = GUICtrlCreateLabel("Toothydip" & @CRLF & "AutoClicker", 40, 40) guisetfont(9) ; Buttons & Checkboxes---------------------------- $fast_speed_checkbox = GUICtrlCreateRadio(" Fast Speed", 50, 100,90,20) $medium_speed_checkbox = GUICtrlCreateRadio(" Medium Speed", 50, 130,110,20) $slow_speed_checkbox = GUICtrlCreateRadio(" Slow Speed", 50, 160,90,20) ; Color Sets ------------------------------------- guictrlsetcolor($title, 0x000000) $clicksetting_helper = 0 $defalt_delay = 10 $speed_setting = 0 GUISetState(@SW_SHOW) While True $msg = GUIGetMsg() Sleep(10) $clicksetting_helper = $clicksetting_helper + $speed_setting If (($clicksetting_helper * $defalt_delay) / 500) >= 1 Then Sendleftclick() $clicksetting_helper = 0 EndIf Switch $msg Case $GUI_EVENT_CLOSE OnExit() EndSwitch WEnd ; Functions ------------------------------------- Func OnExit() Exit EndFunc Func onclick() GUICtrlSendToDummy($user) EndFunc Func Sendleftclick() If $F10OnOff Then MouseClick("Left") EndFunc Func _Sendleftclick() $F10OnOff = Not $F10OnOff If _IsChecked($fast_speed_checkbox) Then fast() If _IsChecked($medium_speed_checkbox) Then medium() If _IsChecked($slow_speed_checkbox) Then slow() EndFunc Func fast() $speed_setting = 50 EndFunc Func medium() $speed_setting = 30 EndFunc Func slow() $speed_setting = 10 EndFunc Func _IsChecked($control) Return BitAnd(GUICtrlRead($control),$GUI_CHECKED) = $GUI_CHECKED EndFunc Func XSkinGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight, $color) $color = 0Xffffff Local $XS_n, $PControl If StringInStr(@OSTYPE, "WIN32_NT") Then $XS_n = DllCall("uxtheme.dll", "int", "GetThemeAppProperties") DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", 0) EndIf $PControl = GUICtrlCreateGroup($text, $Pleft, $Ptop, $Pwidth, $Pheight) ;GUICtrlSetBkColor($PControl, $color1) GUICtrlSetColor($PControl, $color) If StringInStr(@OSTYPE, "WIN32_NT") And IsArray($XS_n) Then DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", $XS_n[0]) EndIf Return $PControl EndFunc ;==>XSkinGroup

Another example #include <GUIConstants.au3> Global $name_input GUICreate("Demo", 200, 200) $name_input = GUICtrlCreateInput("Your Name?", 100, 100, 90, 20) $next = GUICtrlCreateButton("Next", 150, 170, 50, 20) GUISetState(@SW_SHOW) While True $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Exit Case $msg = $next nextbutton() EndSelect WEnd Func nameinput() $inputname = GUICtrlRead($name_input) EndFunc Func nextbutton() Global $inputname = GUICtrlRead($name_input) GUICreate("Demo", 200, 200) $label = GUICtrlCreateLabel("Your name is " & $inputname, 50, 50) GUISetState(@SW_SHOW) While True $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Exit EndSelect WEnd EndFunc

oops forgot about the search function lol thanks smoke

you could just use his method and just put text in as the pic...