Jump to content

Script for Rose Online

Maxman

By Maxman
in AutoIt General Help and Support

 Share

Recommended Posts

Maxman Seeker

Maxman

Posted
Posted (edited)

Hello.

I have made a script, that needs beginning and end >_<

Idea is, that i login to Rose Online and then open Autoit script activate it.

also i need end for it.

My Script is here:

; Definition of key combinations
HotKeySet("^+1", "__HandleWindow")
HotKeySet("{Insert}","__BasicBuffs")
HotKeySet("{HOME}","__FullBuffs")
HotKeySet("{PGUP}","__PartyBuffs")
HotKeySet("{DEL}","__BasicBuffsWithCure")
HotKeySet("{END}","__FullBuffsWithCure")
HotKeySet("{PGDN}","__PartyBuffsWithCure")
HotKeySet("+{B}","__Purify")
HotKeySet("+{R}","__Resurrection")
HotKeySet("+{A}","__Sit")
HotKeySet("+{G}","__PickUp")
HotKeySet("+{S}","__Support")
HotKeySet("+{B}","__Bonfire")
HotKeySet("^{C}","__LoopCure")
HotKeySet("+{C}","__Cure")
HotKeySet("+{H}","__Healing")
HotKeySet("^{ESC}","__EndScript")

Func __BasicBuffs()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        __RunAndDisplayInTray("help", "[1/6] Support", 2000, "!+3", "{F3}")
        __RunAndDisplayInTray("help", "[2/6] Damage Support", 2000, "!+3", "{F4}")
        __RunAndDisplayInTray("help", "[3/6] Power Support", 2000, "!+3", "{F5}")
        __RunAndDisplayInTray("help", "[4/6] Hit Support", 2000, "!+3", "{F6}")
        __RunAndDisplayInTray("help", "[5/6] Critical Support", 2000, "!+3", "{F7}")
        __RunAndDisplayInTray("help", "[6/6] Battle Support", 2000, "!+3", "{F8}")
    EndIf
EndFunc

Func __FullBuffs()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        __RunAndDisplayInTray("help", "[1/6] Support", 2000, "!+3", "{F3}")
        __RunAndDisplayInTray("help", "[2/6] Damage Support", 2000, "!+3", "{F4}")
        __RunAndDisplayInTray("help", "[3/6] Power Support", 2000, "!+3", "{F5}")
        __RunAndDisplayInTray("help", "[4/6] Hit Support", 2000, "!+3", "{F6}")
        __RunAndDisplayInTray("help", "[5/6] Critical Support", 2000, "!+3", "{F7}")
        __RunAndDisplayInTray("help", "[6/6] Battle Support", 2000, "!+3", "{F8}")
        __RunAndDisplayInTray("help", "[7/11] Blessing", 2500, "!+3", "{F1}")
        __RunAndDisplayInTray("help", "[8/11] Blessed Mind", 2500, "!+3", "{F2}")
        __RunAndDisplayInTray("help", "[9/11] Defense Aura", 2500, "!+4", "{F1}")
        __RunAndDisplayInTray("help", "[10/11] Evasion Aura", 2500, "!+4", "{F2}")
        __RunAndDisplayInTray("help", "[11/11] Magical Aura", 2500, "!+4", "{F3}")
    EndIf
EndFunc

Func __PartyBuffs()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        __RunAndDisplayInTray("help", "[1/5] Blessing", 2500, "!+3", "{F1}")
        __RunAndDisplayInTray("help", "[2/5] Blessed Mind", 2500, "!+3", "{F2}")
        __RunAndDisplayInTray("help", "[3/5] Defense Aura", 2500, "!+4", "{F1}")
        __RunAndDisplayInTray("help", "[4/5] Evasion Aura", 2500, "!+4", "{F2}")
        __RunAndDisplayInTray("help", "[5/5] Magical Aura", 2500, "!+4", "{F3}")
    EndIf
EndFunc

Func __BasicBuffsWithCure()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        __RunAndDisplayInTray("help", "[1/6] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[1/6] Support", 2000, "!+3", "{F3}")
        __RunAndDisplayInTray("help", "[1/6] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[2/6] Damage Support", 2000, "!+3", "{F4}")
        __RunAndDisplayInTray("help", "[2/6] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[3/6] Power Support", 2000, "!+3", "{F5}")
        __RunAndDisplayInTray("help", "[3/6] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[4/6] Hit Support", 2000, "!+3", "{F6}")
        __RunAndDisplayInTray("help", "[4/6] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[5/6] Critical Support", 2000, "!+3", "{F7}")
        __RunAndDisplayInTray("help", "[5/6] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[6/6] Battle Support", 2000, "!+3", "{F8}")
        __RunAndDisplayInTray("help", "[6/6] Cure", 2000, "+4", "{F5}")
    EndIf
EndFunc

Func __FullBuffsWithCure()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        __RunAndDisplayInTray("help", "[1/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[1/11] Support", 2000, "!+3", "{F3}")
        __RunAndDisplayInTray("help", "[1/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[2/11] Damage Support", 2000, "!+3", "{F4}")
        __RunAndDisplayInTray("help", "[2/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[3/11] Power Support", 2000, "!+3", "{F5}")
        __RunAndDisplayInTray("help", "[3/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[4/11] Hit Support", 2000, "!+3", "{F6}")
        __RunAndDisplayInTray("help", "[4/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[5/11] Critical Support", 2000, "!+3", "{F7}")
        __RunAndDisplayInTray("help", "[5/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[6/11] Battle Support", 2000, "!+3", "{F8}")
        __RunAndDisplayInTray("help", "[6/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[7/11] Blessing", 2500, "!+3", "{F1}")
        __RunAndDisplayInTray("help", "[7/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[8/11] Blessed Mind", 2500, "!+3", "{F2}")
        __RunAndDisplayInTray("help", "[8/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[9/11] Defense Aura", 2500, "!+4", "{F1}")
        __RunAndDisplayInTray("help", "[9/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[10/11] Evasion Aura", 2500, "!+4", "{F2}")
        __RunAndDisplayInTray("help", "[10/11] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[11/11] Magical Aura", 2500, "!+4", "{F3}")
        __RunAndDisplayInTray("help", "[11/11] Cure", 2000, "+4", "{F5}")
    EndIf
EndFunc

Func __PartyBuffsWithCure()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        __RunAndDisplayInTray("help", "[1/5] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[1/5] Blessing", 2500, "!+3", "{F1}")
        __RunAndDisplayInTray("help", "[1/5] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[2/5] Blessed Mind", 2500, "!+3", "{F2}")
        __RunAndDisplayInTray("help", "[2/5] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[3/5] Defense Aura", 2500, "!+4", "{F1}")
        __RunAndDisplayInTray("help", "[3/5] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[4/5] Evasion Aura", 2500, "!+4", "{F2}")
        __RunAndDisplayInTray("help", "[4/5] Cure", 2000, "+4", "{F5}")
        __RunAndDisplayInTray("help", "[5/5] Magical Aura", 2500, "!+4", "{F3}")
        __RunAndDisplayInTray("help", "[5/5] Cure", 2000, "+4", "{F5}")
    EndIf
EndFunc

Func __Purify()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "Purify", 2000, "!+4", "{F7}")
        $vCantExecSkill = 0
    EndIf
EndFunc

Func __Resurrection()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "Resurrection", 5000, "!+4", "{F8}")
        __RunAndDisplayInTray("help", "Cure", 2000, "!+4", "{F5}")
        $vCantExecSkill = 0
    EndIf
EndFunc

Func __Sit()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "Sit", 2000, "!+1", "{F1}")
        $vCantExecSkill = 0
    EndIf
EndFunc

Func __PickUp()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "PickUp", 100, "!+1", "{F2}")
        $vCantExecSkill = 0
    EndIf
EndFunc


Func __Support()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "Support", 2500, "!+3", "{F3}")
        $vCantExecSkill = 0
    EndIf
EndFunc

Func __Bonfire()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "Bonfire", 6000, "!+4", "{F4}")
        $vCantExecSkill = 0
    EndIf
EndFunc

Func __LoopCure()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 Then
        $vIsCureInLoop = 1
        While $vIsCureInLoop = 1
            __RunAndDisplayInTray("help", "Cure (en boucle)", 2900, "!+1", "{F2}")
        WEnd
    Else
        $vIsCureInLoop = 0
    EndIf
EndFunc

Func __Healing()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "Healing", 6000, "!+1", "{F3}")
        $vCantExecSkill = 0
    EndIf
EndFunc

Func __Cure()
    If $vWindowHandle <> "" And $vIsCureInLoop = 0 And $vCantExecSkill = 0 Then
        $vCantExecSkill = 1
        __RunAndDisplayInTray("help", "Cure", 2800, "!+4", "{F5}")
        $vCantExecSkill = 0
EndIf
EndFunc

Thank you.

Edited by Maxman
  • Developers
Jos Universalist

Jos

Posted
  • Developers
Posted (edited)

I see there is nothing in the script that will be performed thus it will end directly after starting it, but what is the question?

Edited by Jos

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.  :)

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
Go to topic listing
×
×
  • Create New...