Jump to content

Darkfall macro help..


icecat25
 Share

Recommended Posts

What im needing is 2 scripts.. im looking into coding now but it kinda seems confusing..

1st macro

Press R

Right click mouse for (set time)

Press R

Press 1

right click once

Pause (set time)

Rress space bar

loop

2nd macro

Press R

Hold V (set time)

Press R

Press 1

right click once

Pause (set time)

Rress space bar

loop

If anyone has any idea on running these into darkfall.. would be a great help.

Edited by icecat25
Link to comment
Share on other sites

  • Moderators

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

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png 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 columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

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

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 R

Left click mouse for (set time)

Press R

Press 1

Left click once

Pause (set time)

Rress space bar

loop

and 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 R

Hold V (set time)

Press R

Press 1

Left click once

Pause (set time)

Rress space bar

loop

Link to comment
Share on other sites

...

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.

;#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 by SkellySoul
Link to comment
Share on other sites

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 by icecat25
Link to comment
Share on other sites

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 by SkellySoul
Link to comment
Share on other sites

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 by SkellySoul
Link to comment
Share on other sites

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

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 by SkellySoul
Link to comment
Share on other sites

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 by icecat25
Link to comment
Share on other sites

lol looking at this I noticed so many flaws in my code :evil: oh well I worked out some of them :idea:

;)

[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 :evil:

Edited by SkellySoul
Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...