Regency Posted December 16, 2007 Share Posted December 16, 2007 What is wrong with this script... I had a longer version with more options, but wanted to cut it down. Why wont the GUI show? expandcollapse popup#AutoIt3Wrapper_run_debug_mode=Y #requireadmin #include <GUIConstants.au3> #include <Constants.au3> #include <IE.au3> #include <Misc.au3> ;Opt("MustDeclareVars", 1); having this option set will help find mistakes before you run it. Such as using a variable before setting its value or misspelling a variable Global $name1 = '' Global $pass1 = '' Global $url1 = '' Global $nMsg = 0 Global $J1 = '' Global $M1 = '' SplashTextOn("ScopriA Auto Scripter", "I do not take responsibinity if you get banned or not. Have fun Scripting. The script is kinda self explanitory. Have fun ~~ScorpiA~~ Sabotage|| Corruption|| Infiltrate|| Assassinate||", -1, -1, -1, -1, 4, 4, "") Sleep(3000) SplashOff() Global $Quick = GUICreate("Auto Jailer - By - ScorpiA", 290, 200, 340, 300) Global $Desired = GUICtrlCreateGroup("TMN Login Name", 8, 8, 265, 49) ; Log in name for Themafianetwork.net Global $username = GUICtrlCreateInput("", 16, 24, 145, 21) Global $savename = GUICtrlCreateButton("Save", 168, 24, 75, 25, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $DesiredP = GUICtrlCreateGroup("Password", 8, 56, 265, 49) ; Password for the acct stated above Global $password = GUICtrlCreateInput("", 16, 72, 145, 21) Global $savepassword = GUICtrlCreateButton("Save", 168, 72, 75, 25, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $StartUrl = GUICtrlCreateGroup("Address to log into TMN with", 8, 104, 256, 49) ; You can use proxys if you like, it just needs to get you to The mafia network Global $address = GUICtrlCreateInput("", 16, 120, 145, 21) Global $saveurl = GUICtrlCreateButton("Save", 168, 120, 75, 25, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $User = GUICtrlCreateLabel("", 8, 352, 250, 17) ; This is the Username Global $Pass = GUICtrlCreateLabel("", 8, 368, 250, 17) ; This is the password Global $Url = GUICtrlCreateLabel("", 8, 384, 250, 17) ; The url you posted above Global $Make = GUICtrlCreateButton("Start Auto Jailer By ScorpiA - Hit ESC to Exit", 8, 168, 267, 25, 0) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $savename $name1 = GUICtrlRead($username) GUICtrlSetData($User, $name1) Case $savepassword $pass1 = GUICtrlRead($password) GUICtrlSetData($Pass, $pass1) Case $saveurl $url1 = GUICtrlRead($address) & "/userlogin.aspx?" GUICtrlSetData($Url, $url1) Case $Make MyRun() EndSwitch WEnd Func MyRun() Local $dif = '' Local $oLoginPage = 0 Local $oUser = 0 Local $oPass = 0 Local $oLogIn = 0 Local $bLoop = 1 Local $Mail = '' $oLoginPage = _IECreate($url1) _IELoadWait($oLoginPage) $oUser = _IEGetObjByName($oLoginPage, "txtuid") _IEFormElementSetValue($oUser, $name1) $oPass = _IEGetObjByName($oLoginPage, "txtpwd") _IEFormElementSetValue($oPass, $pass1) $oLogIn = _IEGetObjByName($oLoginPage, "Button1") _IEAction($oLogIn, "click") _IELoadWait($oLoginPage) $oJailPage = _IECreate($J1) ;~ "caTheMafiaNetwork - Nationl Jail - Internet Explorer" _IELoadWait($oJailPage) WinSetState("TheMafiaNetwork - National Jail - Windows Internet Explorer", "", @SW_MAXIMIZE) WinSetState("TheMafiaNetwork - National Jail - Windows Internet Explorer", "", @SW_MINIMIZE) While 2 For $var = 0 To 10 Step 1 _IELoadWait($oJailPage) _IELinkClickByText($oJailPage, "Break") _IELoadWait($oJailPage) _IENavigate($oJailPage, $J1) _IEAction($oJailPage, "refresh") Next Sleep(900) $oMail2 = _IECreate($M1, "", 0) _IELoadWait($oMail2) _IELinkClickByText($oMail2, "Automatic Script Check") _IELinkClickByText($oMail2, "Automatic Script Test") _IELinkClickByText($oMail2, "Script Check") _IELinkClickByText($oMail2, "script test") _IELinkClickByText($oMail2, "romeo") _IELinkClickByText($oMail2, "Dragoncurse") _IELinkClickByText($oMail2, "barsaat") _IELinkClickByText($oMail2, "M33") _IELinkClickByText($oMail2, "Devious") _IELinkClickByText($oMail2, "Doyouhaveenough") _IELinkClickByText($oMail2, "BennieTheBrick") _IELinkClickByText($oMail2, "DeeCee") _IELoadWait($oMail2) If WinExists("TMN2 - Bloody Vendetta - Windows Internet Explorer") = 0 Then Exit EndIf _IEQuit($oMail2) $oVerify = _IEGetObjById($oJailPage, "imgVerify") If IsObj($oVerify) Then MsgBox(0, "Verification Box Present", "Please Enter Verification Code For Script To Resume") Sleep(20000) $bLoop = 1 Else ;What is this supposed If IsObj($oVerify) Then WinSetState("TheMafiaNetwork - National Jail - Windows Internet Explorer", "", @SW_MINIMIZE) Else $bLoop = 1 EndIf EndIf WEnd EndFunc Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted December 16, 2007 Moderators Share Posted December 16, 2007 GUISetState(@SW_SHOW)Oh, that's when you know you need to open the help file ... when "she" answers a question! Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
Regency Posted December 16, 2007 Author Share Posted December 16, 2007 THANKX!! lol thats a big help, thank you Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now