Register for your free account! | Forgot your password?

You last visited: Today at 04:46

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[AutoIt] Melee macro

Discussion on [AutoIt] Melee macro within the General Gaming Discussion forum part of the General Gaming category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Jan 2008
Posts: 113
Received Thanks: 56
[AutoIt] Melee macro

New melee macro which allows you to chose offense or defense. Borrowed some code (a lot of code) from Ices

Code:
#cs------------------------------------------------------
Simple melee AutoIt script by TeabagGus
Script requires two people with running the same script
There is a 5 second delay for the macro to start
Wand is slot 8
Heal Self is slot 1
Rest is slot 5
Weapon is slot 0
Shield is slot 9 if using a 1h and shield if not leave blank
#ce-------------------------------------------------------

Dim $a, $c, $d, $e, $f, $g, $h, $z, $x
Global $Paused

HotKeySet("`", "TogglePause")
HotKeySet("{ESC}", "Close")

$g = InputBox( "Question", "How many swings?", "20" )
$h = InputBox( "Question", "How long to parry? [milliseconds]" , "30000" )
$f = InputBox( "Question", "Offense or Defense first?", "Offense" )
$c = InputBox( "Question", "How Long to Rest? [milliseconds]", "180000" )
MsgBox( 0, "Alert", "Click OK then Alt + Tab into Darkfall to start the script." )

WinWaitActive ("Darkfall Online")
Sleep (1000)

While 1
    CombatMode()
    If $f = "Offense" Then
        Offense()
        Defense()
    Else
        Defense()
        Offense()
    EndIf
    CombatMode()
    Rest()
WEnd

Func Offense()
    Sleep (1000)
    $o = 0
    While $o <= $g
        Sleep (1000)
        MouseClick ("left")
        Sleep (1000)
        $o = $o + 1
    WEnd
    Sleep (1000)
EndFunc

Func Defense()
    Sleep (1000)
    Send ("{V Down}")
    Sleep ( $h )
    Send ("{V Up}")
    Sleep (1000)
EndFunc

Func Rest()
    Send ("5")
    Sleep (1000)
    MouseClick ("left")
    Sleep ( $c )
    Send ("W")
    Sleep (1000)
EndFunc

Func CombatMode()
    Sleep (1000)
    Send ("R")
    Sleep (1000)
EndFunc

Func TogglePause( )
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
EndFunc

Func EquipWeapon()
    Sleep (1000)
    Send ( $x ) ; Weapon
    Sleep (1000)
    Send ( $z ) ; Shield
    Sleep (1000)
EndFunc

Func Close()
    Exit
EndFunc
Penakle is offline  
Old 01/13/2011, 15:55   #2
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
;
jorge014 is offline  
Old 01/13/2011, 15:55   #3
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
;j
jorge014 is offline  
Old 01/13/2011, 15:55   #4
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
//
jorge014 is offline  
Old 01/13/2011, 15:55   #5
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
////
jorge014 is offline  
Old 01/13/2011, 15:56   #6
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
/////
jorge014 is offline  
Old 01/13/2011, 15:56   #7
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
m
jorge014 is offline  
Old 01/13/2011, 15:56   #8
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
m,lnm
jorge014 is offline  
Old 01/13/2011, 15:57   #9
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
kkkkkkkkkkk
jorge014 is offline  
Old 01/13/2011, 15:58   #10
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
kkkkkkkkkkkkkkk
jorge014 is offline  
Old 01/13/2011, 15:58   #11
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
kik
jorge014 is offline  
Old 01/13/2011, 15:59   #12
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
kgk
jorge014 is offline  
Old 01/13/2011, 15:59   #13
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
Thread
jorge014 is offline  
Old 01/13/2011, 15:59   #14
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
kkkkk
jorge014 is offline  
Old 01/13/2011, 16:00   #15
 
elite*gold: 0
Join Date: Dec 2007
Posts: 33
Received Thanks: 0
...........
jorge014 is offline  
Reply


Similar Threads Similar Threads
Autoit BG macro
09/05/2010 - World of Warcraft - 0 Replies
Looking for a new autoit bg join/leave macro the old 1 that i have doesnt work anymore instead of pressing the join bg button now it opens the bags :).
[AutoIt] Two Accounts, One Computer Melee / Parry Macro
06/09/2010 - General Gaming Discussion - 4 Replies
Instructions: ESC Key - Terminates Macro Pause Key - Pauses Macro Accounts Need to be ran in windowed mode. Parrying Account should be logged in, with Shield and Weapon equipped and unsheathed. You will need to have rest assigned to the 0 hot key on the hot bar. If your going to be leveling Polearm, I suggest you find a corner to back into or it will not work. Character should be in Mouse look mode before you alt tab to the Attacking character. Attacking Account should be logged in...
Macro/AutoIT für 40/40 set
07/05/2008 - Guild Wars - 13 Replies
Hey, kann man n script schreiben das der jeweile char vor jedem casten (1-8) Z.B. auf F2 in sein 40/40 set wechselt?wenn das gehen würde könntet ihr bitte sowas erstellen...ich denke für euch is das nich wirklich ein problem...aber ich kenn mich damit halt gar nich aus... danke im vorraus :) mfg
macro autoit
06/19/2008 - Cabal Online - 10 Replies
Hi. I'm french.Sorry for my bad english. My version of cabal is europea. I tried to make myself a macro but it is only 2 days that I practice autoit. I therefore know quite limited. I like to share with you my program. I've tested but has no effect on the game like most other programs of the forum that I tested. I'd like to know why.it's really a simple program you will not hurt to understand?:confused: $x = 1 $y = 1 WinWaitActive("CABAL") ;activation of the window cabal...
Request for melee macro..
11/15/2005 - Conquer Online 2 - 0 Replies
Is there or can one be made to auto-level on 2.0 as a melee class (warrior or trojan) ... Sorry I searched and couldn't find... + karma if you have.. :D



All times are GMT +2. The time now is 04:46.


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.