auto queue & auto join & anti afk [autoit source]

[Coffeebot]

It wont que but it joins bg can anyone help me troubleshoot this problem. I can see it clicks F12 but it wont click F11 to join bg.

[gunnerflow]

Im playing on a private server with the 3.3.5 version, and the F12: /script AcceptBattlefieldPort(1,1); doesn't work so even when the window pops and i manually use F12 on the keyboard i still don't join bg .
So can someone help me please ??

[neax1337]

It doesn't work anymore for me but it worked before, I can join 1 bg but when the battleground is done So closes the "Battlegrounds" on "H" of your keyboard.. It closes down.. can u please fix it it would be pretty nice Thanks!!

[uCko]

Mine doesnt even open the "H" Menu. It cant find wow.exe i guess or something... Anyone can help me ?

[mukurub]

all works for my, but when the bg is finished , scrpit do not leave bg :S help me pls

[daniyalsm]

can someone update this please.

[jjfortherear]

jar, bump, this program rocks

[fall3n85]

bump, need an update for this

[dainfamous]

u download 'autoit'

you make a new .txt file and put this code in

$Key_PvPWindow = "h"
$Key_joinQueue = "{F11}" ; /script JoinBattlefield(0);
$Key_Confirm = "{F12}" ; /script AcceptBattlefieldPort(1,1);
$Key_Idle = "w"
$Key_autorun = "r"

SetPrivilege("SeDebugPrivilege", 1)

$Process = WinGetProcess("World of Warcraft")
$hWnd = WinGetHandle("[CLASS:GxWindowClassD3d]")

$WoWProcess = mem_open($Process)

While True
	$status = mem_read(0x00B6DFD8, $WoWProcess, "int")

	switch $status
	Case 0
		joinQueue()
	Case 1
		idle()
	Case 2
		confirm()
	case 3
		idle()
	EndSwitch
WEnd

Func joinQueue()
Sleep(500)
ControlSend($hWnd, "", "", $Key_PvPWindow)
ControlSend($hWnd, "", "", $Key_Idle)

Sleep(500)
ControlSend($hWnd, "", "", $Key_joinQueue)
Sleep(500)
ControlSend($hWnd, "", "", $Key_Confirm)
EndFunc

Func idle()
	Sleep(600)
	ControlSend($hWnd, "", "", $Key_Idle)
EndFunc

Func confirm()
	ControlSend($hWnd, "", "", $Key_Confirm)
	Sleep(500)
EndFunc

Func mem_open($iv_Pid)
	Local $ah_Handle[2] = [DllOpen('kernel32.dll')]
	Local $av_OpenProcess = DllCall($ah_Handle[0], 'int', 'OpenProcess', 'int', 0x0bea4c8, 'int', 1, 'int', $iv_Pid)
	$ah_Handle[1] = $av_OpenProcess[0]
	Return $ah_Handle
EndFunc

Func mem_read($iv_Address, $ah_Handle, $sv_Type = 'dword')
	Local $v_Buffer = DllStructCreate($sv_Type)
	DllCall($ah_Handle[0], 'int', 'ReadProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')
	Local $v_Value = DllStructGetData($v_Buffer, 1)
	Return $v_Value
EndFunc

Func mem_close($ah_Handle)
	DllCall($ah_Handle[0], 'int', 'CloseHandle', 'int', $ah_Handle[1])
	DllClose($ah_Handle[0])
	Return 1
EndFunc

Func SetPrivilege($privilege, $bEnable)
    Const $MY_TOKEN_ADJUST_PRIVILEGES = 0x0020
    Const $MY_TOKEN_QUERY = 0x0008
    Const $MY_SE_PRIVILEGE_ENABLED = 0x0002
    Local $hToken, $SP_auxret, $SP_ret, $hCurrProcess, $nTokens, $nTokenIndex, $priv
    $nTokens = 1
    $LUID = DLLStructCreate("dword;int")
    If IsArray($privilege) Then    $nTokens = UBound($privilege)
    $TOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $NEWTOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $hCurrProcess = DLLCall("kernel32.dll","hwnd","GetCurrentProcess")
    $SP_auxret = DLLCall("advapi32.dll","int","OpenProcessToken","hwnd",$hCurrProcess[0],   _
            "int",BitOR($MY_TOKEN_ADJUST_PRIVILEGES,$MY_TOKEN_QUERY),"int*",0)
    If $SP_auxret[0] Then
        $hToken = $SP_auxret[3]
        DLLStructSetData($TOKEN_PRIVILEGES,1,1)
        $nTokenIndex = 1
        While $nTokenIndex <= $nTokens
            If IsArray($privilege) Then
                $priv = $privilege[$nTokenIndex-1]
            Else
                $priv = $privilege
            EndIf
            $ret = DLLCall("advapi32.dll","int","LookupPrivilegeValue","str","","str",$priv,   _
                    "ptr",DLLStructGetPtr($LUID))
            If $ret[0] Then
                If $bEnable Then
                    DLLStructSetData($TOKEN_PRIVILEGES,2,$MY_SE_PRIVILEGE_ENABLED,(3 * $nTokenIndex))
                Else
                    DLLStructSetData($TOKEN_PRIVILEGES,2,0,(3 * $nTokenIndex))
                EndIf
                DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetData($LUID,1),(3 * ($nTokenIndex-1)) + 1)
                DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetData($LUID,2),(3 * ($nTokenIndex-1)) + 2)
                DLLStructSetData($LUID,1,0)
                DLLStructSetData($LUID,2,0)
            EndIf
            $nTokenIndex += 1
        WEnd
        $ret = DLLCall("advapi32.dll","int","AdjustTokenPrivileges","hwnd",$hToken,"int",0,   _
                "ptr",DllStructGetPtr($TOKEN_PRIVILEGES),"int",DllStructGetSize($NEWTOKEN_PRIVILEGES),   _
                "ptr",DllStructGetPtr($NEWTOKEN_PRIVILEGES),"int*",0)
        $f = DLLCall("kernel32.dll","int","GetLastError")
    EndIf
    $NEWTOKEN_PRIVILEGES=0
    $TOKEN_PRIVILEGES=0
    $LUID=0
    If $SP_auxret[0] = 0 Then Return 0
    $SP_auxret = DLLCall("kernel32.dll","int","CloseHandle","hwnd",$hToken)
    If Not $ret[0] And Not $SP_auxret[0] Then Return 0
    return $ret[0]
EndFunc

u change the extension to be opened with autoit (which is .au3)

THEN U make a 2 macros to assign to f11 and f12

f11 macro:

/script JoinBattlefield(0);
/cast Sinister Strike
/run RepopMe()

change sinister strike to ur attack


F12:

/script AcceptBattlefieldPort(1,1);


you can get bartender and it will let you bind these easy


this code works in 3.3.5

ur welcome

---------- Post added at 02:43 AM ---------- Previous post was at 02:35 AM ----------

well i cant edit my post but download "AUTOBG" addon on curse which takes you out of the Bg when its over automatically. it also releasese spirit instantly if u die

In 2020 this still works on Warmane server 3.3.5a ! Thank U a lot !!! <3