Jump to content
Sign in to follow this  
Maxman

Script for Rose Online

Recommended Posts

Maxman

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

Share this post


Link to post
Share on other sites
Jos

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

Visit the SciTE4AutoIt3 Download page for the latest versions  - Beta files                                How to post scriptsource        Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
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
Sign in to follow this  

×