icecat25 Posted December 21, 2009 Share Posted December 21, 2009 (edited) What im needing is 2 scripts.. im looking into coding now but it kinda seems confusing..1st macroPress RRight click mouse for (set time)Press RPress 1right click oncePause (set time)Rress space barloop2nd macroPress RHold V (set time)Press RPress 1right click oncePause (set time)Rress space barloopIf anyone has any idea on running these into darkfall.. would be a great help. Edited December 21, 2009 by icecat25 Link to comment Share on other sites More sharing options...
icecat25 Posted December 21, 2009 Author Share Posted December 21, 2009 bump.. Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted December 21, 2009 Moderators Share Posted December 21, 2009 icecat25, Welcome to the AutoIt forum. Please do not bump your own posts within 24 hours - it is considered rude here. Remember this is not a 24/7 support forum - those who answer are only here because they like helping others and have some time to spare. 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...
jebus495 Posted December 21, 2009 Share Posted December 21, 2009 Open up your help file and search for the following things. Send MouseClick While... WEnd Sleep If you read all of the information there and pay attention to the syntax I'm sure you'll find that it's easier than you might think to complete the task you need. Link to comment Share on other sites More sharing options...
MasonMill Posted December 21, 2009 Share Posted December 21, 2009 i sent you a PM, go check that Link to comment Share on other sites More sharing options...
icecat25 Posted December 22, 2009 Author Share Posted December 22, 2009 still cant figure it out lol.. im trying though. il post what ive done soon. Link to comment Share on other sites More sharing options...
icecat25 Posted December 22, 2009 Author Share Posted December 22, 2009 Send ( "r" [,0] )MouseClick ( "left" [, x, y [, 30 [, 10 ]]] )Send ( "r" [,0] )Send ( "1" [,0] )MouseClick ( "left" [, x, y [, 1 [, 10 ]]] )suppose to be... Press RLeft click mouse for (set time)Press RPress 1Left click oncePause (set time)Rress space barloopand the 2nd one im up to is..Send ( "r" [,0] )Send ( "v" [,0] )Send ( "r" [,0] )Send ( "1" [,0] )MouseClick ( "left" [, x, y [, 1[, 10 ]]] )Send ( "r" [,0] )Send ( "space" [,0] )suppose to be...Press RHold V (set time)Press RPress 1Left click oncePause (set time)Rress space barloop Link to comment Share on other sites More sharing options...
SkellySoul Posted December 22, 2009 Share Posted December 22, 2009 (edited) ... I am not going to do all the work for you here is some code that you can play with yourself it's not exactly how you want it but try and figure it out for yourself and if you need more help ill come help if I can. expandcollapse popup;#CS ;This Box doesn't do anything besides give you some information! ; ; ;Left click mouse for (set time)? ; ;ok I understand that but if you need the mouse in a certain ;position please read the help file under MouseClick() ; ;Example: MouseClick("Left" , 100 , 500 , 1 , 0) ; ;Also you may or may not need the Sleep() in your script and 250 is just a ;guess and remember this is milliseconds so 1000 = 1 second. ; ;Tip: If your script doesn't need a Sleep() simply get rid of that line of ;code if your unsure put this in front of the sleep ; to cancel it out. ; ;Example: ;Sleep(250) ;#CE HotKeySet("{ESC}" , "_Exit") ;To Exit hit the ESC button (Escape) _Loop_One() ;This will call the function. Func _Loop_One() ;Sleep(250) ;this is just to show you how to cancel out a piece of code. While 1 Send("R") Sleep(250) MouseDown("left") Sleep(250) MouseUp("left") Sleep(250) Send("R") Sleep(250) ;set time Send("{SPACE}") WEnd EndFunc Func _Exit() Exit EndFunc weird the #CS/#CE tags were making all the code green so used ; instead. Edited December 22, 2009 by SkellySoul Link to comment Share on other sites More sharing options...
icecat25 Posted December 22, 2009 Author Share Posted December 22, 2009 (edited) HotKeySet("{ESC}" , "_Exit") ;To Exit hit the ESC button (Escape) Func _Loop_One() While 1 Send ( "r" [,0] ) MouseClick ( "left" [, 30 [, 10 ]]] ) Send ( "r" [,0] ) Send ( "1" [,0] ) MouseClick ( "left" [, 1 [, 10 ]]] ) Sleep(60000) ;set time Send ( "SPACE" [,0] ) WEnd EndFunc This is what i have.. but it doesnt translate into game. Also, will this auto loop or end after 1 turn? Edited December 22, 2009 by icecat25 Link to comment Share on other sites More sharing options...
SkellySoul Posted December 22, 2009 Share Posted December 22, 2009 (edited) HotKeySet("{ESC}" , "_Exit") ;To Exit hit the ESC button (Escape) Func _Loop_One(100) Send ( "r" [,0] ) MouseClick ( "left" [, 30 [, 10 ]]] ) Send ( "r" [,0] ) Send ( "1" [,0] ) MouseClick ( "left" [, 1 [, 10 ]]] ) Sleep(60000) ;set time Func _Loop_One(100) got a error that i didnt have a same ern funtion.. Hmm may be try this. HotKeySet("{ESC}" , "_Exit") _Loop_One() Func _Loop_One() While 1 Send("r") MouseClick("left" , 30 , 10) Send("r") Send("1") MouseClick("left" , 1 , 10) Sleep(60000) ;set time WEnd EndFunc Func _Exit() Exit EndFunc I also made this since I was bored, it should work for just about anyone on XP not certain about other OS's. $Pub = "HKLM\Software\AutoIt v3\AutoIt,InstallDir" $Beta = "HKLM\Software\AutoIt v3\AutoIt,BetaInstallDir" $Release = 0 If $Release = 0 Then $Split = $Pub ElseIf $Release = 1 Then $Split = $Beta Else Exit EndIf $String = StringSplit($Split , ",") $Reg = RegRead($String[1], $String[2]) ShellExecute($Reg & "\AutoIt.chm") I was going to add in a function to check to see which is newer between the two public v.s beta but than I got off track and wasn't bored anymore Edited December 22, 2009 by SkellySoul Link to comment Share on other sites More sharing options...
icecat25 Posted December 22, 2009 Author Share Posted December 22, 2009 Check PM. Basicly i said, i changed what i wrote and its error free, but it doesn't follow to darkfall. Pressing ESC doesn't start it. I tried yours, again it doesn't follow into Darkfall. Link to comment Share on other sites More sharing options...
SkellySoul Posted December 22, 2009 Share Posted December 22, 2009 (edited) Check PM. Basicly i said, i changed what i wrote and its error free, but it doesn't follow to darkfall. Pressing ESC doesn't start it. I tried yours, again it doesn't follow into Darkfall. Aw I should of added a sleep to the start of the script to give you sometime to activate the game lol sorry it's 4 am and can't think to clear... that could of been the problem. Also pressing ESC doesn't start the script that was added so that you can exit the script easily. This should hopefully do it, run the script and once you get into the game push the home button and when finished with the bot hit the end button to stop it. I got rid of the ESC because game usually use it for main menus and also these keys are close by which I prefer myself not sure about you HotKeySet("{HOME}" , "_Start") HotKeySet("{END}" , "_Exit") ; _Start() ;opps Func _Start() While 1 Send("r") MouseClick("left" , 30 , 10) Send("r") Send("1") MouseClick("left" , 1 , 10) Sleep(60000) ;set time WEnd EndFunc Func _Exit() Exit EndFunc Please let me know if you get it working or your still having trouble. Edited December 23, 2009 by SkellySoul Link to comment Share on other sites More sharing options...
icecat25 Posted December 22, 2009 Author Share Posted December 22, 2009 Aw I should of added a sleep to the start of the script to give you sometime to activate the game lol sorry it's 4 am and can't think to clear... that could of been the problem. Also pressing ESC doesn't start the script that was added so that you can exit the script easily. This should hopefully do it, run the script and once you get into the game push the home button and when finished with the bot hit the end button to stop it. I got rid of the ESC because game usually use it for main menus and also these keys are close by which I prefer myself not sure about you HotKeySet("{HOME}" , "_Start") HotKeySet("{END}" , "_Exit") _Start() Func _Start() While 1 Send("r") MouseClick("left" , 30 , 10) Send("r") Send("1") MouseClick("left" , 1 , 10) Sleep(60000) ;set time WEnd EndFunc Func _Exit() Exit EndFunc Please let me know if you get it working or your still having trouble. ok. it starts and works.. but there is 2 problems. 1, he swings once and it stops instead of clicking 30 times before it pauses. 2nd problem is instead of him just swinging as if you just clicked your mouse button, the mouse seems to spazz out and move in all directions. Link to comment Share on other sites More sharing options...
SkellySoul Posted December 22, 2009 Share Posted December 22, 2009 (edited) ok. it starts and works.. but there is 2 problems. 1, he swings once and it stops instead of clicking 30 times before it pauses. 2nd problem is instead of him just swinging as if you just clicked your mouse button, the mouse seems to spazz out and move in all directions.oh ok... I forgot to add a few things into the code anyways ill add that now but can you please explain to me exactly what you would like done.and also please tell me what R does and what 1 does it would help me understand a bit more.If you wouldn't mine pming me your msn I can help you out a lot faster Edited December 22, 2009 by SkellySoul Link to comment Share on other sites More sharing options...
icecat25 Posted December 22, 2009 Author Share Posted December 22, 2009 (edited) oh ok... I forgot to add a few things into the code anyways ill add that now but can you please explain to me exactly what you would like done. and also please tell me what R does and what 1 does it would help me understand a bit more. ok. this is basicly how it should look "without it being completely messed that you might need to fix" HotKeySet("{HOME}" , "_Start") HotKeySet("{END}" , "_Exit") _Start() Func _Start() While 1 Send("r") MouseClick("left" , 30 , 10) Send("r") Send("1") MouseClick("left" , 1 , 10) Sleep(60000) ;set time Send("space") Sleep(3000) ;set time WEnd EndFunc Func _Exit() Exit EndFunc Basicly. My character needs to press R = equip weapon. He then left clicks 30 times, 1 click per 1 or 2 seconds. he then pressed R to un-equip, Presses "1" that is REST "regains stam". Mouse clicks ONCE to activate it, Then there is a pause of 60 seconds so he gets 60 seconds of rest. Then he hits Spacebar to stop resting, Pause for 3 seconds, Then loop. Edited December 22, 2009 by icecat25 Link to comment Share on other sites More sharing options...
SkellySoul Posted December 22, 2009 Share Posted December 22, 2009 (edited) lol looking at this I noticed so many flaws in my code oh well I worked out some of them [edit] I will post the updated code as soon as I get my wireless back & ill help you with your send down key problem. Edited December 23, 2009 by SkellySoul Link to comment Share on other sites More sharing options...
SkellySoul Posted December 23, 2009 Share Posted December 23, 2009 (edited) lol looking at this I noticed so many flaws in my code oh well I worked out some of them [edit] I will post the updated code as soon as I get my wireless back & ill help you with your send down key problem. HotKeySet("{HOME}" , "_Start") HotKeySet("{END}" , "_Exit") While 1 Sleep(1000) WEnd Func _Start() While 1 Send("r") Sleep(250) For $i = 1 To 30 Step +1 MouseClick("left" , Default , Default , 1 , 0) Sleep(Random(1000 , 2000)) Next Send("r") Sleep(250) Send("1") Sleep(250) MouseClick("left") Sleep(60000) Send("{SPACE}") Sleep(3000) WEnd EndFunc Func _Exit() Exit EndFunc Ill be on msn if you need me Edited December 23, 2009 by SkellySoul 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