ReaImDown Posted May 24, 2007 Share Posted May 24, 2007 (edited) $MsgBoxResult = MsgBox(1, "AutoBumper", "Made by littlewashu. making life around gaia easier") If $MsgBoxResult = -1 Then Exit Endif If $MsgBoxResult = 1 Then Run("E:\Program Files\Internet Explorer\iexplore.exe","E:\Program Files\Internet Explorer",@SW_MAXIMIZE) winwaitactive("Imperial Valley College - Windows Internet Explorer") sleep(6000) send("{tab}") send("http://www.gaiaonline.com") send("{enter}") winwaitactive("Welcome to Gaia Online - Windows Internet Explorer") sleep(6000) send("{TAB 8}") sleep(1000) send("") sleep(1500) send("{TAB}") send("") sleep(8000) send("{TAB}") send("{ENTER}") WinWaitActive("Gaia :: Welcome to Gaia - Windows Internet Explorer") global $loops = 0 Do $loops = $loops + 1 Sleep(1200) Send("{tab}") send("http://www.gaiaonline.com/guilds/posting.php?mode=reply&tc=576&t=7831119") send("{ENTER}") winwaitactive("Gaia :: Forums - Post a Reply - Windows Internet Explorer") Sleep(7000) Send("{TAB 8}") sleep(4000) send("Bump" & Asc ( 64 + $loops) Send("{TAB 83}") Sleep(35000) Send("{ENTER}") Until $loops = 99999 EndIf try... expandcollapse popup$MsgBoxResult = MsgBox(1, "AutoBumper", "Made by MidnightRaven. making life around gaia easier") If $MsgBoxResult = -1 Then Exit Endif If $MsgBoxResult = 1 Then Run("E:\Program Files\Internet Explorer\iexplore.exe","E:\Program Files\Internet Explorer",@SW_MAXIMIZE) winwaitactive("Imperial Valley College - Windows Internet Explorer") sleep(6000) send("{tab}") send("http://www.gaiaonline.com") send("{enter}") winwaitactive("Welcome to Gaia Online - Windows Internet Explorer") sleep(6000) send("{TAB 8}") sleep(1000) send("") sleep(1500) send("{TAB}") send("") sleep(8000) send("{TAB}") send("{ENTER}") WinWaitActive("Gaia :: Welcome to Gaia - Windows Internet Explorer") global $loops = 0 Do $loops = $loops + 1 Sleep(1200) Send("{tab}") send("http://www.gaiaonline.com/guilds/posting.php?mode=reply&tc=576&t=7831119") send("{ENTER}") winwaitactive("Gaia :: Forums - Post a Reply - Windows Internet Explorer") Sleep(7000) Send("{TAB 8}") sleep(4000) send("Bump" & (Asc ( 64 + $loops)) Send("{TAB 83}") Sleep(35000) Send("{ENTER}") Until $loops = 99999 EndIf keep in mind...the asc values can only go so high b4 they start hitting numbers and other odd characters...so you'd have to make it loop... 65 = Capital A 91 = Capital Z Edited May 24, 2007 by ReaImDown [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
Davo Posted May 24, 2007 Share Posted May 24, 2007 (edited) send("Bump" & Asc ( 64 + $i) on the right track, try this send("Bump" & Chr ( 64 + $i) Keep in mind this will only work for up to a certain number 999 is not going to work! Dave Edited May 24, 2007 by Davo ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------"I don't need to know everything, I just need to know where to find it when I need it"....EinsteinAnd in our case... That's the AutoIT helpfile ;) Please read before posting!!! Link to comment Share on other sites More sharing options...
XXwashuXX Posted May 24, 2007 Author Share Posted May 24, 2007 try... expandcollapse popup$MsgBoxResult = MsgBox(1, "AutoBumper", "Made by MidnightRaven. making life around gaia easier") If $MsgBoxResult = -1 Then Exit Endif If $MsgBoxResult = 1 Then Run("E:\Program Files\Internet Explorer\iexplore.exe","E:\Program Files\Internet Explorer",@SW_MAXIMIZE) winwaitactive("Imperial Valley College - Windows Internet Explorer") sleep(6000) send("{tab}") send("http://www.gaiaonline.com") send("{enter}") winwaitactive("Welcome to Gaia Online - Windows Internet Explorer") sleep(6000) send("{TAB 8}") sleep(1000) send("") sleep(1500) send("{TAB}") send("") sleep(8000) send("{TAB}") send("{ENTER}") WinWaitActive("Gaia :: Welcome to Gaia - Windows Internet Explorer") global $loops = 0 Do $loops = $loops + 1 Sleep(1200) Send("{tab}") send("http://www.gaiaonline.com/guilds/posting.php?mode=reply&tc=576&t=7831119") send("{ENTER}") winwaitactive("Gaia :: Forums - Post a Reply - Windows Internet Explorer") Sleep(7000) Send("{TAB 8}") sleep(4000) send("Bump" & (Asc ( 64 + $loops)) Send("{TAB 83}") Sleep(35000) Send("{ENTER}") Until $loops = 99999 EndIfnope Link to comment Share on other sites More sharing options...
ReaImDown Posted May 24, 2007 Share Posted May 24, 2007 (edited) error? try send("Bump" + Asc ( 64 + $loops)) and if it doesnt work...this should send("Bump" & Asc ( 64 + $loops)) also, if u want an infinte loop, do this Until $loops = -10 Edited May 24, 2007 by ReaImDown [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
ReaImDown Posted May 25, 2007 Share Posted May 25, 2007 error?try send("Bump" + Asc ( 64 + $loops))and if it doesnt work...this shouldsend("Bump" & Asc ( 64 + $loops))also, if u want an infinte loop, do thisUntil $loops = -10...did it work?.... [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
PsaltyDS Posted May 25, 2007 Share Posted May 25, 2007 send("Bump" & Asc ( 64 + $loops))That's the correct version, string append '&', not math add '+'. also, if u want an infinte loop, do this Until $loops = -10An infinite loop is simply: While 1 ; Something forever... WEnd ; Or Do ; Something forever... Until 0 A Do/Until loop runs until the expression is TRUE. In AutoIt, 0 is FALSE and anything non-zero, including -10, is TRUE. So with 'Until 0' it will never be true and never exit the loop, but with Until -10 it will exit on the first loop. Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
ReaImDown Posted May 25, 2007 Share Posted May 25, 2007 That's the correct version, string append '&', not math add '+'. An infinite loop is simply: While 1 ; Something forever... WEnd ; Or Do ; Something forever... Until 0 A Do/Until loop runs until the expression is TRUE. In AutoIt, 0 is FALSE and anything non-zero, including -10, is TRUE. So with 'Until 0' it will never be true and never exit the loop, but with Until -10 it will exit on the first loop. true... thanks lol, w/e works speaking of works...he just stopped posting, any update on the program yet? I dont want to re-install IE to test it myself :| lol [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] 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