Jump to content

cohaholic

Members
  • Posts

    7
  • Joined

  • Last visited

Everything posted by cohaholic

  1. The commas WERE the problem. Thanks a lot guys =) P.S. = I DID mean to make an endless loop, thats why i have the pause. Its supposed to hit the buttons forever. =) and its : $1 = 1 While $1 <= 10 Do Send ("" & $varkeyname1) Sleep (1000) Send ("" & $varkeyname2) Sleep (1000) Send ("" & $varkeyname3) Sleep (1000) Send ("" & $varkeyname4) Sleep (1000) Send ("" & $varkeyname5) Sleep (1000) $1 = $1 + 1 Until $1 = 10 WEnd That would cause it to run through each command 10 times, in order =) Thanks, cohaholic
  2. Yeah, I knew what DLL meant. Just not paying attention to what i was typing... sorry. well, new code is changed from the old code and it still makes an ini and asks me to enter the numbers... : #SingleInstance Global $Paused HotKeySet ("{PAUSE}", "TogglePause") TrayTip("Auto Powers", "Please turn off ANY auto power that you have (Hasten, AM, etc..)", 5, 1) Sleep (10000) If FileExists ( @WORKINGDIR & '\Auto Fire.ini' ) Then $varkeyname1 = IniRead ( "Auto Fire.ini" "keys" "key1" "" ) $varkeyname2 = IniRead ( "Auto Fire.ini" "keys" "key2" "" ) $varkeyname3 = IniRead ( "Auto Fire.ini" "keys" "key3" "" ) $varkeyname4 = IniRead ( "Auto Fire.ini" "keys" "key4" "" ) $varkeyname5 = IniRead ( "Auto Fire.ini" "keys" "key5" "" ) ElseIf Not FileExists ( @WORKINGDIR & '\Auto Fire.ini' ) Then TrayTip("Note About Entering Powers", "Please use the CORRECT key or else it will not work!", 5, 1) Sleep (10000) $varkeyname1 = InputBox ( "Auto Power 1", "Input key # for auto power #1." ) $varkeyname2 = InputBox ( "Auto Power 2", "Input key # for auto power #2." ) $varkeyname3 = InputBox ( "Auto Power 3", "Input key # for auto power #3." ) $varkeyname4 = InputBox ( "Auto Power 4", "Input key # for auto power #4." ) $varkeyname5 = InputBox ( "Auto Power 5", "Input key # for auto power #5." ) IniWrite("Auto Fire.ini", "keys", "key1", "" & $varkeyname1) IniWrite("Auto Fire.ini", "keys", "key2", "" & $varkeyname2) IniWrite("Auto Fire.ini", "keys", "key3", "" & $varkeyname3) IniWrite("Auto Fire.ini", "keys", "key4", "" & $varkeyname4) IniWrite("Auto Fire.ini", "keys", "key5", "" & $varkeyname5) EndIf TrayTip("Pausing Auto Fire", "Use the Pause / Break button located over the page up button to pause this script. Then use the Windows Task Manager to close the process AutoIt3.exe", 5, 1) Sleep(10000) ProgressOn("Loading", "Auto Fire is now loading...") For $m = 10 to 0 step -1 For $i = 100 to 0 step -100 ProgressSet($i, $m & " seconds until loading is complete." & @LF & @LF & "Please be patient.") sleep(592);close to making 100 to 0 = 60 seconds when counting down. Next Next ProgressSet(0 , "You Have 10 seconds to get back in CoH!", "WARNING!") sleep(2000) ProgressOff() sleep(10000) $1 = 1 While $1 = 1 Do Send ("" & $varkeyname1) Sleep (1000) Send ("" & $varkeyname2) Sleep (1000) Send ("" & $varkeyname3) Sleep (1000) Send ("" & $varkeyname4) Sleep (1000) Send ("" & $varkeyname5) Sleep (1000) Until $1 = 10 WEnd Func TogglePause() $Paused = NOT $Paused While $Paused sleep(100) ToolTip('Script is "Paused"',0,0) WEnd ToolTip("") EndFunc any other suggestions...? thanks, cohaholic
  3. Okay, Im making a program that will press the 5 #s that i type into the 5 input boxes over and over again until i stop the script. here is what i have so far : #SingleInstance Global $Paused HotKeySet ("{PAUSE}", "TogglePause") TrayTip("Auto Powers", "Please turn off ANY auto power that you have (Hasten, AM, etc..)", 5, 1) Sleep (10000) If FileExists ( @WORKINGDIR & 'Auto Fire.ini' ) Then $varkeyname1 = IniRead ( "Auto Fire.ini" "keys" "key1" "" ) $varkeyname2 = IniRead ( "Auto Fire.ini" "keys" "key2" "" ) $varkeyname3 = IniRead ( "Auto Fire.ini" "keys" "key3" "" ) $varkeyname4 = IniRead ( "Auto Fire.ini" "keys" "key4" "" ) $varkeyname5 = IniRead ( "Auto Fire.ini" "keys" "key5" "" ) ElseIf Not FileExists ( @WORKINGDIR & 'Auto Fire.ini' ) Then TrayTip("Note About Entering Powers", "Please use the CORRECT key or else it will not work!", 5, 1) Sleep (10000) $varkeyname1 = InputBox ( "Auto Power 1", "Input key # for auto power #1." ) $varkeyname2 = InputBox ( "Auto Power 2", "Input key # for auto power #2." ) $varkeyname3 = InputBox ( "Auto Power 3", "Input key # for auto power #3." ) $varkeyname4 = InputBox ( "Auto Power 4", "Input key # for auto power #4." ) $varkeyname5 = InputBox ( "Auto Power 5", "Input key # for auto power #5." ) IniWrite("Auto Fire.ini", "keys", "key1", "" & $varkeyname1) IniWrite("Auto Fire.ini", "keys", "key2", "" & $varkeyname2) IniWrite("Auto Fire.ini", "keys", "key3", "" & $varkeyname3) IniWrite("Auto Fire.ini", "keys", "key4", "" & $varkeyname4) IniWrite("Auto Fire.ini", "keys", "key5", "" & $varkeyname5) EndIf TrayTip("Pausing Auto Fire", "Use the Pause / Break button located over the page up button to pause this script. Then use the Windows Task Manager to close the process AutoIt3.exe", 5, 1) Sleep(10000) ProgressOn("Loading", "Auto Fire is now loading...") For $m = 10 to 0 step -1 For $i = 100 to 0 step -100 ProgressSet($i, $m & " seconds until loading is complete." & @LF & @LF & "Please be patient.") sleep(592);close to making 100 to 0 = 60 seconds when counting down. Next Next ProgressSet(0 , "You Have 10 seconds to get back in CoH!", "WARNING!") sleep(2000) ProgressOff() sleep(10000) $1 = 1 While $1 = 1 Do Send ("" & $varkeyname1) Sleep (1000) Send ("" & $varkeyname2) Sleep (1000) Send ("" & $varkeyname3) Sleep (1000) Send ("" & $varkeyname4) Sleep (1000) Send ("" & $varkeyname5) Sleep (1000) Until $1 = 10 WEnd Func TogglePause() $Paused = NOT $Paused While $Paused sleep(100) ToolTip('Script is "Paused"',0,0) WEnd ToolTip("") EndFunc Only problem is that when I compile and run it, it ignores the If FileExists part, and does BOTH things, not just the one that i want it to do if there is an INI. All it needs to do, is recognize if there is an ini file, if not ask the 5 questions, then save them to an ini, and next time it's run, the ini is there so that you do not have to create it again. PLEASE HELP ME, im pulling out my hair in frustration... Thanks, cohaholic
  4. Today's monday...
  5. I need to make a program that sends an email, while the mouse/keyboard movement is disabled. Only problem is, how do you send an email from a client using Yahoo, or AOL, or Outlook? The send commands can vary. In Outlook the send command is: Send, !S AOL users do not have one... It varies between the different clients, but how do you use Auto It to send it? Should i try to use LeftClick, ###, ### or should I just pray that they use Outlook? Thanks! So far, i have gotten this: ;FROM THE PROGRAM.AUT FILE IniRead, Text1, %A_SCRIPTDIR%Config.ini, Configuration, Text1 IniRead, Text2, %A_SCRIPTDIR%Config.ini, Configuration, Text2 IniRead, Delay, %A_SCRIPTDIR%Config.ini, Configuration, Delay Sleep, 500 Run,%comspec% /c start mailto:myemail@aol.com?subject=thisoneisforyou:%Text1%%Text2% ;FROM THE CONFIG.INI FILE [Configuration] Text1=Text1 Text2=Text2 Delay=2000
  6. Im working on a "bot" that sends a message in the chat window. So far, i have gotten this idea... 1. You set up a .ini file that is to be read from. (I know how to do it) 2. Run the program that reads the information from the .ini file. (I know how to do it) 3. ***It finds out a specific program's Window Title, such as Diablo II*** 4. ***Maximises the window that you just found*** 5. Sends the information from the .ini file. (I know how to do it) Parts in *** and *** are parts I do NOT know how to do. I would appreciate it if you could help me plz. I use auto it v2, because its what i'm used to. =P The reason for the "find-the-window-name" part: window names can vary in the game, because i use a program that lets you run Diablo II without a CD, and it changes the name of the window to: "D2Loader v1.10b14 Build On Oct 29 2003" and it makes it hard to do things with Auto It. I just would like to run the Auto It program, and let it do the rest. Thanks in advance, Chris
  7. and HOW do you enable this? Thanks, Chris
×
×
  • Create New...