AhmedSabry32 Posted March 16, 2013 Share Posted March 16, 2013 I made a GUI with 2 Taps Control , but there's a bug and it's when i open the programme the first tap doesn't show anything (sliders , etc...) I must go to the second tap and back again to the first tap to see everything . so what should i do? Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted March 16, 2013 Moderators Share Posted March 16, 2013 AhmedSabry32, Welcome to the AutoIt forum. so what should i do?Post the code you use so we can look at it! When you do post it please use Code tags - put [autoit] before and [/autoit] after your posted code so that you get a scrolling box and syntax colouring. M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area Link to comment Share on other sites More sharing options...
AhmedSabry32 Posted March 17, 2013 Author Share Posted March 17, 2013 (edited) expandcollapse popupFileInstall("FX.dll", @TempDir & "\FX.jpg", 1) #Region ### start koda gui section ### form= $form1 = GUICreate("NFE-R25-J | Professional Macro", 509, 403, 192, 124) $pic1 = GUICtrlCreatePic(@TempDir & "\FX.jpg", 1, 26, 508, 400) GUICtrlSetState(-1, $gui_disable) SoundPlay("Sheren.mp3") $wait = _guictrlcreatelabel_colorborder(16711680, "AVA was not found!", 280, 355, 115, 18) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 8388608) $MenuItem1 = GUICtrlCreateMenu("Help") $MenuItem2 = GUICtrlCreateMenuItem("How to use?..", $MenuItem1) $MenuItem3 = GUICtrlCreateMenuItem("About", $MenuItem1) $MenuItem4 = GUICtrlCreateMenu("Thanks") $buttonaa = GUICtrlCreateButton("Donate for CCH Egypt", 10, 340, 120, 35) $exit = GUICtrlCreateButton("Exit", 400, 352, 91, 25) $labelaa = _guictrlcreatelabel_colorborder(65280, "Please Donate to CCH(Childern's Cancer Hospital) For new life for kids.", 5, 305, 335, 18) GUICtrlSetBkColor(-1, 16282673) $labelaaa = _guictrlcreatelabel_colorborder(65280, "Proud to be Egyptian", 150, 353, 110, 18) GUICtrlSetBkColor(-1, 16711680) $labelas = _guictrlcreatelabel_colorborder(65280, "Coded By AeriaAVA", 400, 305, 100, 15) GUICtrlSetBkColor(-1, 16711680) $Tab1 = GUICtrlCreateTab(1, 5, 510, 300) $TabSheet1 = GUICtrlCreateTabItem("Basic Macro - Auto") $label4 = _guictrlcreatelabel_colorborder(65280, "Spam bot:", 8, 40, 61, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 8388608) $spam = GUICtrlCreateCombo("", 72, 40, 233, 25, BitOR($cbs_dropdown, $cbs_autohscroll)) GUICtrlSetBkColor(-1, 65280) GUICtrlSetData(-1, "What daa Fuck Aeria? Fuck you Aeria.|I" & Chr(39) & "m not a fucking hacker....|I" & Chr(39) & "m spammer....|MPGH is the best hacking site....|Sorry , My friend will play with me!|Add me..|Fake GM , Fake GM , Fake GM!|Visit MPGH To Get VIP Hacks....!|Oh dear , I" & Chr(39) & "m cooking...!|I'm a hacker") $sspam = GUICtrlCreateButton("Start-Spam", 340, 40, 79, 25) $spress = GUICtrlCreateButton("Start", 240, 120, 79, 25) $label7 = _guictrlcreatelabel_colorborder(65535, "Auto-Press:", 8, 120, 69, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 8388608) $api = GUICtrlCreateCombo("", 80, 118, 145, 25, BitOR($cbs_dropdown, $cbs_autohscroll)) GUICtrlSetBkColor(-1, 9255113) GUICtrlSetData(-1, "{F1}|{F2}|{F3}|{F4}|{F5}|{F6}|{F7}|{F8}|{F9}|P|S|T|Home|Insert|Delete|End|PageUp|PageDown") $bmi = GUICtrlCreateInput("", 85, 200, 150, 20) $label99 = _guictrlcreatelabel_colorborder(0xFFF000, "Delay(MS):", 8, 200, 55, 17) $sbm = GUICtrlCreateButton("Start", 250, 200, 57, 35) $TabSheet2 = GUICtrlCreateTabItem("QS-AutoShoot") $qss = GUICtrlCreateButton("Start QS", 320, 210, 57, 35) $qs = GUICtrlCreateSlider(160, 210, 150, 29) GUICtrlSetLimit(-1, 7, 1) GUICtrlSetData(-1, 1) $asd = GUICtrlCreateSlider(121, 60, 151, 25) GUICtrlSetLimit(-1, 100, 50) GUICtrlSetData(-1, 50) $label3 = _guictrlcreatelabel_colorborder(3381759, "QS Delay: (1) millisecond", 8, 210, 146, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 8388608) $rrr = GUICtrlCreateRadio("2 + 1", 8, 250, 50, 17) GUICtrlSetState($rrr, $GUI_CHECKED) $rr1 = GUICtrlCreateRadio("3 + 1", 200, 250, 50, 17) $rr2 = GUICtrlCreateRadio("Q + Q", 380, 250, 50, 17) $sas = GUICtrlCreateButton("Start Auto-Shot", 188, 100, 90, 25) $label5 = _guictrlcreatelabel_colorborder(16776960, "Auto-Shot(50)MS :", 8, 60, 108, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 8388608) $label6 = _guictrlcreatelabel_colorborder(16711680, "Ammo Bullets:", 6, 100, 83, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 128) $reload = GUICtrlCreateCheckbox("Reload after AutoShot", 300, 60, 145, 17) GUICtrlSetColor($reload, 0x8D38C9) GUICtrlSetState(-1, $gui_checked) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ammo = GUICtrlCreateInput("", 100, 100, 50, 21) GUICtrlSetBkColor(-1, 2842846) GUISetState(@SW_SHOW) #EndRegion ### end koda gui section ### Global $fs = 1 Global $fsx = 1 HotKeySet("{UP}", "_autoshoot") HotKeySet("{PGDN}", "_spam") HotKeySet("{PGUP}", "_start") HotKeySet("{F8}", "_autopress") While 1 $nmsg = GUIGetMsg() Switch $nmsg Case $gui_event_close Exit Case $buttonaa ShellExecute("[url="http://beta.57357.com/?lang=en"]http://beta.57357.com/?lang=en"[/url]) Case $asd $gets = GUICtrlRead($asd) GUICtrlSetData($label5, "Auto-Shot(" & $gets & ")MS") Case $qs $gets1 = GUICtrlRead($qs) GUICtrlSetData($label3, "QS Delay: (" & $gets1 & ") millisecond") Case $sas _autoshoot() Case $exit Exit Case $spress _autopress() Case $sspam _spam() Case $MenuItem2 FileInstall("RIP.dll", @TempDir & "\RIP.exe", 1) ShellExecute(@TempDir & "\RIP.exe") Case $MenuItem3 ShellExecute("[url="http://www.mpgh.net/forum/members/1435230-aeriaava.html"]http://www.mpgh.net/forum/members/1435230-aeriaava.html"[/url]) Case $MenuItem4 ShellExecute("[url="http://www.mpgh.net/forum/post_thanks.php?do=post_thanks_add&p=7705154&securitytoken=1363094369-fc31ebbbb8d6c042429b7b25f264b84715d3f501"]http://www.mpgh.net/forum/post_thanks.php?do=post_thanks_add&p=7705154&securitytoken=1363094369-fc31ebbbb8d6c042429b7b25f264b84715d3f501"[/url]) Case $sbm $pmis = GUICtrlRead($bmi) If ProcessExists("AVA.exe") And _ispressed(01) Then mouseclick("middle") sleep($pmis) ElseIf Not ProcessExists("AVA.exe") Then MsgBox(0, "Error", "AVA was not found!") EndIf EndSwitch If ProcessExists("AVA.exe") Then Sleep(20) GUICtrlSetData($wait, "AVA was found!") ElseIf NOT ProcessExists("AVA.exe") Then GUICtrlSetData($wait, "AVA was not found!") Sleep(40) EndIf If _IsPressed("50") Then SoundPlay("") ElseIf _IsPressed("4F") Then SoundPlay("Sheren.mp3") EndIf WEnd Func _start() If $fsx = 1 And ProcessExists("AVA.exe") Then Global $rrs1 = GUICtrlRead($rr1) Global $rrs2 = GUICtrlRead($rr2) Global $rrs = GUICtrlRead($rrr) Global $see = GUICtrlRead($qs) Do If _ispressed("01") Then While 1 If $rrs = $GUI_CHECKED Then Sleep($see) ControlSend("Alliance of Valiant Arms", "", "", "{2}") Sleep(1) ControlSend("Alliance of Valiant Arms", "", "", "{1}") ElseIf $rrs1 = $GUI_CHECKED Then Sleep($see) ControlSend("Alliance of Valiant Arms", "", "", "{3}") Sleep(1) ControlSend("Alliance of Valiant Arms", "", "", "{1}") ElseIf $rrs2 = $GUI_CHECKED Then Sleep($see) ControlSend("Alliance of Valiant Arms", "", "", "{Q}") Sleep(1) ControlSend("Alliance of Valiant Arms", "", "", "{Q}") EndIf If $fsx = 0 Then Return EndIf WEnd EndIf Until $fsx = 0 Or _IsPressed("04") ElseIf NOT ProcessExists("AVA.exe") Then MsgBox(0, "Error", "Alliance of Valiant Arms was not found!") Else MsgBox(0, "Error", "Be sure that you opened the macro as administrator!") EndIf EndFunc Func _autoshoot() $check = GUICtrlRead($reload) ;get variable $check1 = GUICtrlRead($asd) ;get variable $check2 = GUICtrlRead($ammo) ;get variable If NOT ProcessExists("AVA.exe") Then MsgBox(0, "Error", "AVA is not found!") ElseIf NOT ProcessExists("AVA.exe") AND $check2 = "" Then ;if the previous condition are wrong then check this one MsgBox(0, "Error", "AVA is not found and Please Enter Ammo Bullet Number!") ElseIf ProcessExists("AVA.exe") AND $check2 = "" Then ;if the previous condition are wrong then check this one MsgBox(0, "Error", "Please Enter Ammo Bullet Number!") Else ;i changed this cause your way if AVA existed, there was no check for if there was something write in the number of bullet, the way i made it, it first check for error, if there not then it will do the function While ProcessExists("AVA.exe") ;as long as AVA.exe exist this loop will be, or until the exitloop condition is right in this case its Arrow down, read below If _ispressed("26") Then ;if arrow up is pressed If $check = $GUI_CHECKED Then ;check if the reload is ativated by the user Local $sBegin = TimerInit() ;Start the counter EndIf Do MouseClick("Left") ; send mouse click Sleep($check1) ;????? sleep for? this is a sleep between every bullet If $check = $GUI_CHECKED Then ;check if the reload is ativated by the user If TimerDiff($sBegin) > $check1 Then ;diff get the time counted since you started with the start, you cannot make it if equal then cause the MS are really fast and you will miss your number so you do if the time set by the user is less than the current time of counter, so if the timer is more than what the user set you make it do the func reload. ControlSend("Alliance of Valiant Arms", "", "", "{R}") ;Reload Local $sBegin = TimerInit() ;Since we don't want the counter to continue counting from where he paused we Restart the counter EndIf EndIf Until _IsPressed("28") ;loop the shot until Arrow down get pressed EndIf If _IsPressed("28") Then ExitLoop ; when arrow down is pressed you exit the loop function WEnd EndIf EndFunc Func _spam() If NOT ProcessExists("AVA.exe") Then MsgBox(0, "Error", "Alliance of Valiant Arms was not found!") ElseIf ProcessExists("AVA.exe") Then Global $spams = GUICtrlRead($spam) Do ControlSend("Alliance of Valiant Arms", "", "", "" & $spams & "") Sleep(50) ControlSend("Alliance of Valiant Arms", "", "", "{ENTER}") Until _ispressed("23") EndIf EndFunc Func _autopress() $apig = GUICtrlRead($api) If ProcessExists("AVA.exe") AND $apig = "" OR NOT ProcessExists("AVA.exe") AND $apig = "" Then MsgBox(0, "Error", "Alliance of Valiant Arms was not found or you didn't input a key!") ElseIf ProcessExists("AVA.exe") Then Do If ProcessExists("AVA.exe") Then ControlSend("Alliance of Valiant Arms", "", "", "'" & $apig & "'") Sleep(50) ControlSend("Alliance of Valiant Arms", "", "", "{ENTER}") EndIf Until _IsPressed("78") ElseIf NOT ProcessExists("AVA.exe") Then MsgBox(0, "Error", "Alliance of Valiant Arms was not found!") EndIf EndFunc Func _guictrlcreatelabel_colorborder($i_color, $s_text, $i_left, $i_top, $i_width = -1, $i_height = -1, $i_style = -1, $i_exstyle = -1) GUICtrlCreateLabel("", $i_left - 1, $i_top - 1, $i_width + 2, $i_height + 2) GUICtrlSetBkColor(-1, $i_color) Return GUICtrlCreateLabel($s_text, $i_left, $i_top, $i_width, $i_height, $i_style, $i_exstyle) EndFunc Edited March 17, 2013 by AhmedSabry32 Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted March 17, 2013 Moderators Share Posted March 17, 2013 AhmedSabry32,You appear to have missed the Forum rules when you joined. Please read them now (there is also a link at bottom right of each page) - particularly the bit about not discussing game automation - and then you will understand why you will get no help and this thread will now be locked. See you soon with a legitimate question I hope. M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area Link to comment Share on other sites More sharing options...
Recommended Posts