Jump to content

This minimized?


BluhBlah
 Share

Recommended Posts

How to use this? to make it work on warcraft 3 minimized? hmm?

Thanks

Dim $stop = 0 ;

HotKeySet("{F4}", "toggel")
HotKeySet("{F5}", "off")

While 1
    If $stop = 1 Then
        If WinActive("Warcraft III")
            $coord = PixelSearch(34, 145, 34, 145, 0xE3E3E3)
            If Not @error Then
                Send("!Q")
            EndIf
            $coord = PixelSearch(217, 590, 217, 590, 0x977B10)
            If Not @error Then
                Sleep(5000)
                Send("{F10}")
                Send("!E")
                Send("!Q")
            EndIf
            $coord = PixelSearch(199, 497, 199, 497, 0xC19E74)
            If Not @error Then
                Send("{Enter}")
            EndIf
            Sleep(10)
        EndIf
    EndIf
WEnd


Func toggel()
    If $stop = 0 Then
        $stop = 1 ; change the bot to on
        ToolTip("LossBot = ON", 0, 0)
    Else
        $stop = 0 ; change the bot to off
        ToolTip("LossBot = OFF", 0, 0)
    EndIf
EndFunc

Func off()
    Exit
EndFunc

-Xori-

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...