Another Queen Bot

[soi0]

Yea it skips the waving scene on the boat shortening the wait time considerably. Supposedly it also removes you from appearing on the leader board ranks, but... not sure if it really works(I've never appeared on leader board rankings so no clue if it really does work.)

Would this be acceptable in the beginning?

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

if $1 = 6 Then
MsgBox (0,"BOT","Lets Do This!")

Endif


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

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

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

Also, how does one make the tool tip show how many runs you ran =O? I never understood that.

[Zaiakunokami]

Also, how does one make the tool tip show how many runs you ran =O? I never understood that.

At the end of every loop, you need a globally defined variable to increase by 1.

Then use that variable in the tooltip.

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

Try that little snippet, and you should see how it works.

[Dracconus]

regular mouse clicks will work, just factor in lag, put a few extras, make some of the wiat's a little longer, etc. etc.
just do the small things that will make the bot a little more "intelligent."

And at the person that said controlclicks don't work, you're not the only person with the problem, I'm having to tell off dumbasses that think they rule the world all the fucking time over them not working in every operating system.
God damn geniuses...they think they know everything.

[Klymore]

For starters you forgot the d for

Global $Paused

xD;
I see (I think) what you tried to do with the MsgBox()'s but they seem... excessive? xD
What I meant was all you do is just have a MsgBox then start the script like

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

if $1 = 6 Then
MsgBox (0,"BOT","Lets Do This!")

Endif


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

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

can all really be replaced by

MsgBox()    <--Whatever you want it to say
Play()    <--Calls the Play function(the actual script you made)

Since the MsgBox won't disappear until you click either of the buttons, the script will in essence be paused at that point(unless you set it to auto disappear after a set time.)
But having multiple MsgBox()'s for telling the user something can be useful. xD

What Zaia said for counting runs. xD

And at the person that said controlclicks don't work, you're not the only person with the problem, I'm having to tell off dumbasses that think they rule the world all the fucking time over them not working in every operating system.
God damn geniuses...they think they know everything.

I guess you mean me by that? xD I never use them so never knew they (might) just not work on my OS. xD

[Zaiakunokami]

I guess you mean me by that? xD I never use them so never knew they (might) just not work on my OS. xD

While your suggestion is good, it's not what he's after. Though his code could use some cleaning.

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 6 Then
MsgBox (0,"BOT","Lets Do This!")
ElseIf $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit ;<- You forgot that part. :D
EndIf

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

And no, he means this guy, and others like him.

[Klymore]

While your suggestion is good, it's not what he's after. Though his code could use some cleaning.

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 6 Then
MsgBox (0,"BOT","Lets Do This!")
ElseIf $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit ;<- You forgot that part. :D
EndIf

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

And no, he means this guy, and others like him.

oh. Oh. OH! I feel like an idiot. xD Yea do that-^ So that cancel actually cancels. >_>;

[soi0]

While your suggestion is good, it's not what he's after. Though his code could use some cleaning.

$1 = MsgBox (4,"BOT","Are You Sure?")
If $1 = 6 Then
MsgBox (0,"BOT","Lets Do This!")
ElseIf $1 = 7 Then
MsgBox (0,"BOT","Bye~")
Exit ;<- You forgot that part. :D
EndIf

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

And no, he means this guy, and others like him.

Opsies XD and what do you mean by cleaning up?

At the end of every loop, you need a globally defined variable to increase by 1.

Then use that variable in the tooltip.

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

Try that little snippet, and you should see how it works.

Where would I put this? In the beginning or in the end?

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

if $1 = 6 Then
MsgBox (0,"BOT","Lets Do This!")

Endif


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

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

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

When I press F1 It gives me an error saying "Variable used with out being declared" Can anyone clarify this? thanks :]

[Zaiakunokami]

I already cleaned that chunk up for you. You can use that as is.

As far as for the second bit, run it as it's own separate code, so you can see how it works.

And the third thing is because you declared $Pause. The function uses $Paused. Note the "d" at the end. That makes it a different variable. Just change the top to Global $Paused and you should be fine.

[gohan2525]

just fyi sinbot already has a weeping queen just use white tyrant's challenge for it and wala weeping queen bot

[soi0]

Is it possible to make the bot support all screen resolutions?

[Zaiakunokami]

Is it possible to make the bot support all screen resolutions?

Of course it is. And actually detecting the screen resolution is easy. It's the conversion of how the UI acts with the screen resolution and co-ordinates that's the bitch to figure out.

Use these:

@ DesktopWidth
@ DesktopHeight

^ Take out the space, too.

[soi0]

Of course it is. And actually detecting the screen resolution is easy. It's the conversion of how the UI acts with the screen resolution and co-ordinates that's the bitch to figure out.

Use these:

@ DesktopWidth
@ DesktopHeight

^ Take out the space, too.

Then I have a lot to learn

[shadowkeeper]

...
This IS my bot, just cleverly recoded into control clicks, and 1 large wait time pre boss kill before it uses pie's binds, BUT, I didn't use pie's binds, so I'll let it slide :P
Also, Zaia's 2.4 is going to contain Weeping, and had you read and done what my signature says and used the search button you'd have known that
On another note...weeping (in collection with speed ups, and other things) takes about ten seconds to do...do you REALLY even NEED a bot for it?

Sooo what you are saying is to use the search button?

Sorry couldn't help myself.

[soi0]

How do you make the message box start the bot when you click "Ok"?

[Zaiakunokami]

How do you make the message box start the bot when you click "Ok"?

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