Another Queen Bot

[soi0]

$a = MsgBox("blah","more blah")
DEIf $a = 1 Then
Run("blah.exe") ;(Or you could Call("blah") as well)
Else
Exit
EndIf

Thanks aside from that would you say this is acceptable?
I +rep you just now
I kinda got side tracked and worked with something else

FileInstall("splash.jpg", "splash.jpg")
SplashImageOn("", "splash.jpg", 225, 315, 570, 212, 1)
Sleep(5000)
SplashOff()

Global $Paused
HotKeySet("{ESC}","Close")
HotKeySet("{F1}","TogglePause")
HotKeySet("{F2}", "Play")
MsgBox (1,"BOT","Click to Start")
$1 = MsgBox (4,"BOT","Are You Sure?")

if $1 = 6 Then
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")
Endif


if $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit
Endif

While 1
WinWaitActive("Vindictus","")
WEnd

Func Play()
While 1
Sleep(500)
ControlClick("Vindictus", "", "", "left", 3, 102, 628) ; Start ; Clicks START to launch mission
MouseClick("Left",102,628,1)
Sleep(500)
Send("{\}") ;incase
Sleep(500)
Send("{\}") ;incase
Sleep(16500)
ControlSend("Vindictus", "", "", "{F5}") ;transform
Sleep(300)
ControLSend("Vindictus", "", "", "{,}") ;Godmode
Sleep(200) ; just to be safe
ControLSend("Vindictus", "", "", "{8}") ; GlowySpears
Sleep(207)
Send("{.}") ; 1hitko v1
Sleep(4000)
ControLSend("Vindictus", "", "", "{F}") ; this will get your sitcky bomb out ; in this case a spear
Sleep(1500)
ControlSend("Vindictus", "", "", "{E}") ; and throw
Sleep(1000)
ControlSend("Vindictus", "", "", "{F}") ;JUST IN CASE
Sleep(1500)
ControlSend("Vindictus", "", "", "{E}") ; and throw
Sleep(1000)
Sleep(75000) ; This is the time it takes until the Mission Successful menu shows up.
ControlClick("Vindictus", "", "", "left", 3, 271, 711) ; Replay
MouseClick("Left",271,711,1)
Sleep(1000)
ControlClick("Vindictus", "", "", "left", 3, 89, 612) ; Replay incase of lag
Sleep(20000)
WEnd
EndFunc

Func Close()
    Exit 0
EndFunc

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

Global $RunCounter
$RunCounter=0
While 1
 ToolTip("Counter is now " & $RunCounter,5,5)
 $RunCounter+=1
 Sleep(1000)
WEnd

My only problem right now is getting it to support you when or if you fail/lag seriously bad while trying to re-get on the boat.

Ive been using this bot for a whole night.
No screw ups yet ^^.

Also @Klymore

Thanks a lot I + rep you too.

[Zaiakunokami]

Only thing that I would do is to re-write this part:

$1 = MsgBox (4,"BOT","Are You Sure?")

if $1 = 6 Then
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")
Endif


if $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit
Endif

Into this:

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 6 Then
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")
ElseIf $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit
Endif

[DanK]

Only thing that I would do is to re-write this part:

$1 = MsgBox (4,"BOT","Are You Sure?")

if $1 = 6 Then
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")
Endif


if $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit
Endif

Into this:

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 6 Then
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")
ElseIf $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit
Endif

Personally I would prefer doing like this since it's less code:

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 7 Then
    MsgBox (0,"BOT","Bye~")
    Exit
EndIf
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")

And if you got rid of the msgbox saying bye, you could do:

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 7 Then Exit
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")

Personally I love using switch, I'm a switch addict and if-then hater so I would probably do:

$1 = MsgBox (4,"BOT","Are You Sure?")
Switch $1
    case 6
        MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")
    case 7
        MsgBox (0,"BOT","Bye~")
        exit
EndSwitch

[Zaiakunokami]

Personally I would prefer doing like this since it's less code:

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 7 Then
    MsgBox (0,"BOT","Bye~")
    Exit
EndIf
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")

And if you got rid of the msgbox saying bye, you could do:

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 7 Then Exit
Endif ;<-- You forgot this?
MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")

Personally I love using switch, I'm a switch addict and if-then hater so I would probably do:

$1 = MsgBox (4,"BOT","Are You Sure?")
Switch $1
    case 6
        MsgBox (0,"BOT","Lets Do This! Press F2 and click back into Vindictus")
    case 7
        MsgBox (0,"BOT","Bye~")
        exit
EndSwitch

Way to overkill the code options. and I put a correction(?) in there for you.
Though I agree the switch method is probably the best. I was just trying to re-write using what he gave me.

[DanK]

Way to overkill the code options. and I put a correction(?) in there for you.
Though I agree the switch method is probably the best. I was just trying to re-write using what he gave me.

Nope you don't need an endif on an in-line if statement. The only drawback is you can only do one command with it.

[Poison]

Good job sir

[angrybuddha]

Nope you don't need an endif on an in-line if statement. The only drawback is you can only do one command with it.

Yeah I was definitely wondering about that, I did it this way orinally since i'm used to coding in C but got syntax errors for my trouble and assumed Autoit required endif when it was sloppy coding on my part. Glad to know it actually works thx.

[DanK]

Yeah I was definitely wondering about that, I did it this way orinally since i'm used to coding in C but got syntax errors for my trouble and assumed Autoit required endif when it was sloppy coding on my part. Glad to know it actually works thx.

Yeah C++ which I'm learning now definitely has tons more freedom on how you structure IF's/WHILES etc then say VB or autoit.. I'm loving it since I'm a bit OCD about how my code looks... Can make it so much prettier in C++..