Register for your free account! | Forgot your password?

Go Back   elitepvpers > Other Online Games > Heroes of the Storm
You last visited: Today at 17:50

  • Please register to post and access all features, it's quick, easy and FREE!


[Free] Twinkie Heroes of the Storm Bot + Sources

Reply
 
Old   #1
 
elite*gold: 0
Join Date: May 2017
Posts: 50
Received Thanks: 23
[Free] Twinkie Heroes of the Storm Bot + Sources


13.11.2018 - new private powerful undetected bot available.
Supports any game client language. Contact with me in discord or skype.


skype: aubrey.dd
or and feel free to ask about everything you want.

Usage instructions: (Do it step by step and very carefully)

Autoit Source code:
Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ScreenCapture.au3>
#include <MsgBoxConstants.au3>
#include <ColorConstants.au3>
#Include <APIConstants.au3>
#include <GUIListBox.au3>
#Include <WinAPIEx.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Twinkie HotS", 249, 553, -1, -1)
GUISetBkColor(0xA6CAF0)
$Label1 = GUICtrlCreateLabel("Status:", 8, 0, 87, 24, $SS_CENTER)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFF00)
GUICtrlSetBkColor(-1, 0x0078D7)
$Idling = GUICtrlCreateLabel("Not working", 96, 0, 146, 24, $SS_CENTER)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x0078D7)
$Label3 = GUICtrlCreateLabel("Current Map:", 8, 80, 91, 20)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800080)
$Label4 = GUICtrlCreateLabel("Not yet defined!", 104, 80, 137, 20, $SS_CENTER)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x0078D7)
$Label5 = GUICtrlCreateLabel("Current Side:", 8, 104, 93, 20)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800080)
$Label6 = GUICtrlCreateLabel("Not yet defined!", 104, 104, 137, 20, $SS_CENTER)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x0078D7)
$Checkbox1 = GUICtrlCreateCheckbox("Pause the bot after this match", 24, 272, 193, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xD7E4F2)
$Checkbox2 = GUICtrlCreateCheckbox("Screenshot game and put it here:", 24, 288, 209, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("Input1", 16, 328, 217, 21)
GUICtrlSetColor(-1, 0x000000)
GUICtrlSetBkColor(-1, 0xF0F0F0)
$Button1 = GUICtrlCreateButton("Start Twinkie Now", 16, 40, 219, 25)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0x00FF00)
$Label9 = GUICtrlCreateLabel("TotalPlayed:", 8, 128, 93, 20)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800080)
$Label8 = GUICtrlCreateLabel("Not yet defined!", 104, 128, 137, 20, $SS_CENTER)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x0078D7)
$border = GUICtrlCreateGroup("Bypass Blizzard's Checks", 8, 216, 233, 41)
$Checkbox3 = GUICtrlCreateCheckbox("Enable human-like gaming with pauses", 24, 232, 209, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlSetColor(-1, 0x00FF00)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group1 = GUICtrlCreateGroup("Example of path - 'D:\Folder\' (with \ in end)", 8, 312, 233, 41)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Control = GUICtrlCreateGroup("", 8, 24, 233, 49)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Other Settings", 8, 256, 233, 57)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Bot motion type", 8, 176, 233, 41)
$Combo1 = GUICtrlCreateCombo("Default (with A key)", 16, 192, 217, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "Use right mouse clicks")
GUICtrlSetBkColor(-1, 0xF0F0F0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("Enter the name of hero you want to leveling up", 8, 352, 233, 193)
$List1 = GUICtrlCreateList("", 16, 440, 217, 58)
GUICtrlSetBkColor(-1, 0xF0F0F0)
$Button2 = GUICtrlCreateButton("Add hero to leveling queue", 16, 392, 219, 25)
$Button3 = GUICtrlCreateButton("Delete hero from leveling queue", 16, 416, 219, 25)
$Input2 = GUICtrlCreateInput("", 16, 368, 217, 21)
GUICtrlSetBkColor(-1, 0xF0F0F0)
$Group5 = GUICtrlCreateGroup("How m. games bot must play per one hero:", 16, 496, 217, 41)
$Input3 = GUICtrlCreateInput("10", 24, 512, 201, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label2 = GUICtrlCreateLabel("HeroGames:", 8, 152, 91, 20)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800080)
$Label7 = GUICtrlCreateLabel("Not yet defined!", 104, 152, 137, 20, $SS_CENTER)
GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x0078D7)
#EndRegion ### END Koda GUI section ###

$infinityCase = 0
$myCounter = 0
Global $counter = 0
$globalCounter = 0
Global $heroLevelCounter = 0
Global $gameCounter = 0
Local Const $sFilePath =                      [MENTION=5699755]Scriptd[/MENTION]ir & "\" &                     [MENTION=1121303]mday[/MENTION] & "." &                      [MENTION=313989]mon[/MENTION] & "." &                      [MENTION=1988357]year[/MENTION] & " " &                     [MENTION=902431]Hour[/MENTION] & ";" &                      [MENTION=287308]Min[/MENTION] & ";" &                      [MENTION=301518]sec[/MENTION] & ".tmp"

	$sINI =                      [MENTION=5699755]Scriptd[/MENTION]ir & '\config.ini'
	$screenPath = IniRead($sINI, "Screen Path", "FullPath", "")
	GUICtrlSetData($Input1, $screenPath)
	GUISetState(@SW_SHOW)
	TestGUI()

Func WriteLog($text)
If Not FileWrite($sFilePath, "") Then
        MsgBox($MB_SYSTEMMODAL, "", "An error occurred whilst writing the temporary file.")
        Return False
	 EndIf
Local $hFileOpen = FileOpen($sFilePath, $FO_APPEND)
If $hFileOpen = -1 Then
   MsgBox($MB_SYSTEMMODAL, "", "An error occurred whilst writing the temporary file.")
   Return False
EndIf
$goodtext =                     [MENTION=902431]Hour[/MENTION] & ":" &                      [MENTION=287308]Min[/MENTION] & ":" &                      [MENTION=301518]sec[/MENTION] & " " & $text
FileWrite($hFileOpen, $goodtext &                     [MENTION=3576271]CRLF[/MENTION])
FileClose($hFileOpen)
EndFunc

Func LowLevelHeroes()
   Sleep(1000)
   WriteLog("Select hero")
   If $counter <> _GUICtrlListBox_GetCount($List1) Then
	  GuiCtrlSetColor($Idling, 0xFFFACD)
	  GuiCtrlSetData($Idling, "ChangeHero")
	  $HeroName = _GUICtrlListBox_GetText($List1, $counter)
	  WinActivate("[TITLE:Heroes of the Storm]","")
	  Global $hWnd = ProcessWait("HeroesOfTheStorm_x64.exe", 5)
	  MouseMove(512,384)
	  Sleep(500)
	  WinActivate("[TITLE:Heroes of the Storm]","")
	  MouseClick("left",512,384,1)
	  Sleep(2000)
	  Local $aCoord  = PixelSearch(185, 197, 214, 230, 0xF3FEFE, 3)
	  WriteLog("Selecting hero (in process)")
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 MouseMove(810,144)
		 Sleep(500)
		 MouseClick("left",810,144,1)
		 Sleep(500)
		 Send($HeroName)
		 Sleep(500)
		 MouseMove(269,218)
		 Sleep(500)
		 MouseClick("left",269,218,1)
		 Sleep(500)
		 MouseMove(512,384)
		 Sleep(500)
		 MouseClick("left",512,384,1)
	  EndIf
	  $gameCounter += 1
	  GuiCtrlSetColor($Label7, 0x56FF00)
	  GuiCtrlSetData($Label7,$gameCounter)
	  If $gameCounter = GuiCtrlRead($Input3) Then
		 WriteLog("Done play for hero, changing")
		 $gameCounter = 0
		 $counter += 1
	  EndIf
   EndIf
   WriteLog("Exit from change hero function")
EndFunc

Func TestGUI()
   While 1
	  $nMsg = GUIGetMsg()
	  Switch $nMsg
	  Case $GUI_EVENT_CLOSE
		 Exit
	  Case $Button1
		 WinActivate("[TITLE:Heroes of the Storm]","")
		 Global $hWnd = WinWait("[TITLE:Heroes of the Storm]", "", 5)
		 WinMove($hWnd, "", 0,0, Default, Default)
		 NewStartBot()
		 If Not $hWnd Then
			WriteLog("Can't find game window")
			Exit
		 EndIf
	  Case $Button2
			WriteLog("Pressed Button 2. Added hero to queue")
			GuiCtrlSetData($List1, GuiCtrlRead($Input2))
			$count = _GUICtrlListBox_GetCount($List1)
			GUICtrlSetData($Input2,"")
			;MsgBox(0,'cntr',$count)
		 Case $Button3
			WriteLog("Pressed Button 3. Deleted hero from queue")
			;MsgBox(0,'listbox',_GUICtrlListBox_GetText($List1, $count - 1))
			$iSel = _GUICtrlListBox_GetCurSel($List1)
			_GUICtrlListBox_DeleteString($List1, $iSel)
	  EndSwitch
   WEnd
EndFunc

Func bypassBlizz()
   WriteLog("Entering in bypass function")
   If GUICtrlRead($Checkbox3) = 1 Then
	  $rando = Random(3000,15000)
	  GuiCtrlSetColor($Idling, 0xFDD22C)
	  GuiCtrlSetData($Idling, "Imitating")
	  Sleep($rando)
   EndIf
   WriteLog("Exiting from bypass function")
EndFunc

Func PauseBot()
   WriteLog("Entering in pause function")
   While 1
	  Sleep(1000)
	  GuiCtrlSetColor($Idling, 0xFDD22C)
	  GuiCtrlSetData($Idling, "On Pause")
	  If GUICtrlRead($Checkbox1) = 4 Then
		 WriteLog("Pause unchecked, resuming game")
		 NewStartBot()
	  EndIf
   WEnd
EndFunc

Func CheckDifficult()
   WriteLog("Entering intro Check Difficult function")
   $getEasyDifficult = PixelGetColor(63,542)
   $getRecruitDifficult = PixelGetColor(125,542)
   If 0xEAFDFE <> $getEasyDifficult Then
	  If 0xEAFDFE = $getRecruitDifficult Then
		 WriteLog("Changing difficult")
		 MouseClickDrag("left", 125, 542, 63, 542)
	  EndIf
   EndIf
   Local $aCoord  = PixelSearch(60, 536, 66, 548, 0x043E77, 2)
   If Not                     [MENTION=2544426]Error T[/MENTION]hen
	  WriteLog("Changing difficult 2")
	  MouseClick('left',63, 542)
   EndIf
EndFunc

Func ScreenShot()
   WriteLog("Entering into screenshot function")
   If GUICtrlRead($Checkbox2) = 1 Then
	  $file = String($myCounter) & "-" &                     [MENTION=1121303]mday[/MENTION] & "." &                      [MENTION=313989]mon[/MENTION] & "." &                      [MENTION=1988357]year[/MENTION] & " " &                     [MENTION=902431]Hour[/MENTION] & "-" &                      [MENTION=287308]Min[/MENTION]  & ".jpg"
	  WinActivate("[TITLE:Heroes of the Storm]","")
	  WriteLog("Take screenshot")
	  _ScreenCapture_CaptureWnd(GUICtrlRead($Input1) & $file, $hWnd)
   EndIf
   WriteLog("Exiting from screenshot function")
EndFunc

Func CheckGameType()
   WriteLog("Entering into check game type function")
   Local $aCoord  = PixelSearch(58, 596, 65, 617, 0x9382FE, 2)
   If                     [MENTION=2544426]Error T[/MENTION]hen
	  WriteLog("Changing game type")
	  MouseMove(74,614)
	  MouseClick("left",74,614,2)
	  Sleep(500)
   EndIf
   WriteLog("Exiting from change game type function")
EndFunc

Func CheckStartButton()
   WriteLog("Checking start button")
    Local $checkButton = 0
	Do
	   WriteLog("Entering into checking start button loop")
	  Local $aCoord  = PixelSearch(20, 37, 56, 70, 0x9183FB, 3)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Done not error search into check start button.")
		  $infinityCase = 0
		  WinActivate("[TITLE:Heroes of the Storm]","")
		  Sleep(1000)
		  WriteLog("-- Call change hero function")
		  LowLevelHeroes()
		  Sleep(1000)
		  WriteLog("-- Call check game type function")
		  CheckGameType()
		  Sleep(1000)
		  WriteLog("-- Call check difficult function")
		  CheckDifficult()
		  Sleep(1000)
		  WriteLog("-- Call bypass function")
		  bypassBlizz()
		  Sleep(1000)
		  WriteLog("-- Humanizing")
		  bypassBlizz()
		  Sleep(500)
		  WinActivate("[TITLE:Heroes of the Storm]","")
		  WriteLog("---- Pushing Start button")
		  MouseClick('left',518,758,1)
		  GuiCtrlSetColor($Idling, 0x56FF00)
		  GuiCtrlSetData($Idling, "Working")
		  $checkButton = 1
	  EndIf
   Until $checkButton <> 0
   WriteLog("-- Exiting from check start button function")
	Return $checkButton
 EndFunc

Func GetSide()
   WriteLog("Entering into get side function")
   Local $currentSide = 0
   Do
	  WriteLog("Entering into get side loop")
	  Sleep (1000)
	  Local $aCoord  = PixelSearch(7, 161, 11, 217, 0x4FBFFB, 10)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find side. Its left side.")
		 $currentSide = 2
		 GuiCtrlSetColor($Label6, 0x00F200)
		 GuiCtrlSetData($Label6, "Left Side")
	  EndIf
	  Local $aCoord2  = PixelSearch(7, 161, 11, 217, 0xFB4E87, 10)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find side. Its right side.")
		 $currentSide = 1
		 GuiCtrlSetColor($Label6, 0x00F200)
		 GuiCtrlSetData($Label6, "Right Side")
	  EndIf
   Until $currentSide <> 0
   Return $currentSide
EndFunc

Func GetMap()
   WriteLog("Entering into get map function")
   Local $currentMap = 0
   Do
	  Sleep(1000)
	  Local $aCoord  = PixelSearch(380, 380, 390, 390, 0x4A5184, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find hanamura map")
		 $currentMap = 1
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "Hanamura")
	  EndIf
	  Local $aCoord2  = PixelSearch(380, 380, 390, 390, 0x088684, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find towers of doom map")
		 $currentMap = 2
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "TowersOfDoom")
	  EndIf
	  Local $aCoord3  = PixelSearch(380, 380, 390, 390, 0x3C2C32, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find braxis holdout map")
		 $currentMap = 3
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "BraxisHoldout")
	  EndIf
	  Local $aCoord4  = PixelSearch(380, 380, 390, 390, 0xC57112, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find blackhearts bay map")
		 $currentMap = 4
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "BlackheartsBay")
	  EndIf
	  Local $aCoord5  = PixelSearch(380, 380, 390, 390, 0xF3B86E, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find battlefield of eternity map")
		 $currentMap = 5
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "BattlefieldOfEternity")
	  EndIf
	  Local $aCoord6  = PixelSearch(380, 380, 390, 390, 0x295588, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find spider queen map")
		 $currentMap = 6
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "SpiderQueen")
	  EndIf
	  Local $aCoord7  = PixelSearch(380, 380, 390, 390, 0x844F49, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find dragon shire map")
		 $currentMap = 7
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "DragonShire")
	  EndIf
	  Local $aCoord8  = PixelSearch(380, 380, 390, 390, 0xFBB4B1, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find sky temple map")
		 $currentMap = 8
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "SkyTemple")
	  EndIf
	  Local $aCoord9  = PixelSearch(380, 380, 390, 390, 0x46222E, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find infernal shrines map")
		 $currentMap = 9
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "InfernalShrines")
	  EndIf
	  Local $aCoord10  = PixelSearch(380, 380, 390, 390, 0xDBC5BE, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find haunted mines map")
		 $currentMap = 10
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "HauntedMines")
	  EndIf
	  Local $aCoord11  = PixelSearch(380, 380, 390, 390, 0x7347C0, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find cursed hollow map")
		 $currentMap = 11
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "CursedHollow")
	  EndIf
	  Local $aCoord12  = PixelSearch(380, 380, 390, 390, 0x1B263A, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find garden of terror map")
		 $currentMap = 12
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "GardenOfTerror")
	  EndIf
	  Local $aCoord13  = PixelSearch(380, 380, 390, 390, 0xE3693D, 1)
	  If Not                     [MENTION=2544426]Error T[/MENTION]hen
		 WriteLog("Find warhead junction map")
		 $currentMap = 13
		 GuiCtrlSetColor($Label4, 0x00F200)
		 GuiCtrlSetData($Label4, "WarheadJunction")
	  EndIf
   Until $currentMap <> 0
   Return $currentMap
EndFunc

Func GetChampion()
   ; code here
   Local $currentChampion = 0

   Local $DefaultLeftPositionX = 101
   Local $DefaultLeftPositionY = 184
   Local $DefaultRightPositionX = 931
   Local $DefaultRightPositionY = 430

   Local $AbaturColorLeft = 3228701
   Local $AbaturColorRight = 1514271

   Local $AzmodanColorLeft = 988973
   Local $AzmodanColorRight = 3475984

   Local $VarianColorLeft = 14201503
   Local $VarianColorRight = 0

   Local $GuldanColorLeft = 0
   Local $GuldanColorRight = 0

   Local $DehakaColorLeft = 0
   Local $DehakaColorRight = 0

   Local $ZaryaColorLeft = 0
   Local $ZaryaColorRight = 0

   Local $ZulColorLeft = 0
   Local $ZulColorRight = 0

   Local $LiLiColorLeft = 0
   Local $LiLiColorRight = 0

   Local $LusioColorLeft = 0
   Local $LusioColorRight = 0

   Local $NaziboColorLeft = 0
   Local $NaziboColorRight = 0

   Local $NovaColorLeft = 0
   Local $NovaColorRight = 0

   Local $RagnarosColorLeft = 0
   Local $RagnarosColorRight = 0

   Local $SilvanaColorLeft = 0
   Local $SilvanaColorRight = 0

   Local $SonyaColorLeft = 0
   Local $SonyaColorRight = 0

   Local $StezhokColorLeft = 0
   Local $StezhokColorRight = 0

   Local $UterColorLeft = 0
   Local $UterColorRight = 0

   Local $FalstadColorLeft = 0
   Local $FalstadColorRight = 0

   Local $ChenColorLeft = 0
   Local $ChenColorRight = 0

   Local $AurielColorLeft = 0
   Local $AurielColorRight = 0

   Local $JainaColorLeft = 0
   Local $JainaColorRight = 0

   Local $JhoannaColorLeft = 0
   Local $JhoannaColorRight = 0

   Local $DiabloColorLeft = 0
   Local $DiabloColorRight = 0

   Local $ETCColorLeft = 0
   Local $ETCColorRight = 0

   Local $ZagaraColorLeft = 0
   Local $ZagaraColorRight = 0

   Local $KarazimColorLeft = 0
   Local $KarazimColorRight = 0

   Local $LMoralesColorLeft = 0
   Local $LMoralesColorRight = 0

   Local $MalfurionColorLeft = 0
   Local $MalfurionColorRight = 0

   Local $MediveColorLeft = 0
   Local $MediveColorRight = 0

   Local $MuradinColorLeft = 0
   Local $MuradinColorRight = 0

   Local $RegarColorLeft = 0
   Local $RegarColorRight = 0

   Local $RaynorColorLeft = 0
   Local $RaynorColorRight = 0

   Local $TassadarColorLeft = 0
   Local $TassadarColorRight = 0

   Local $TirandaColorLeft = 0
   Local $TirandaColorRight = 0

   Local $TiraelColorLeft = 0
   Local $TiraelColorRight = 0

   Do
	  Sleep (1000)
   Until $currentChampion <> 0
EndFunc

Func CheckForEndgame()
   WriteLog("Entering into check for end game function")
   Local $aCoord  = PixelSearch(20, 37, 56, 70, 0x9183FB, 3)
   If Not                     [MENTION=2544426]Error T[/MENTION]hen
	  WriteLog("Found end game. Stating quitting")
	  GuiCtrlSetColor($Idling, 0xEA899A)
	  GuiCtrlSetData($Idling, "Waiting")
	  $infinityCase = 1
	  $myCounter += 1
	  GuiCtrlSetColor($Label8, 0x7DCCBD)
	  GuiCtrlSetData($Label8, $myCounter)
	  Sleep(5000)
	  WriteLog("Call screenshot function")
	  ScreenShot()
	  Sleep(1000)
	  WriteLog("Pushing Leave button in check end game function")
	  MouseClick('left',140,765,1)
	  If GUICtrlRead($Checkbox1) = 1 Then
		 WriteLog("Found Pause Me Please, so calling Pause function")
		 PauseBot()
	  EndIf
	  Sleep(5000)
      $checkStatus = 1
	  WriteLog("Starting bot from check end game function")
	  NewStartBot()
   EndIf
EndFunc

Func MapRoute($getMeMap)
   WriteLog("Entering into check map route function")
   Select
   Case $getMeMap = 1 ; ханамура
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then; если слева красные
		 Do
			Local $aCoord  = PixelSearch(380, 380, 390, 390, 0x4A5184, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   Local $aCoord  = PixelSearch(784, 628, 797, 648, 0xDB0040, 2)
			   If Not                     [MENTION=2544426]Error T[/MENTION]hen
				  If GUICtrlRead($Combo1) = "Default (with A key)" Then
					 MouseMove(800, 637)
					 Send("A")
				  ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
					 MouseMove(800, 637)
					 MouseClick("right",800, 637,1)
				  EndIf
			   Else
				  Local $aCoord  = PixelSearch(788, 694, 800, 712, 0xDB0040, 2)
				  If Not                     [MENTION=2544426]Error T[/MENTION]hen
					 If GUICtrlRead($Combo1) = "Default (with A key)" Then
						MouseMove(800, 705)
						Send("A")
					 ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
						MouseMove(800, 705)
						MouseClick("right",800, 705,1)
					 EndIf
				  Else
					 If GUICtrlRead($Combo1) = "Default (with A key)" Then
						MouseMove(800, 705)
						Send("A")
					 ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
						MouseMove(800, 705)
						MouseClick("right",800, 705,1)
					 EndIf
				  EndIf
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then; 
		 Do
			Local $aCoord  = PixelSearch(380, 380, 390, 390, 0x4A5184, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   Local $aCoord  = PixelSearch(939, 630, 954, 649, 0xDB0040, 2)
			   If Not                     [MENTION=2544426]Error T[/MENTION]hen
				  If GUICtrlRead($Combo1) = "Default (with A key)" Then
					 MouseMove(940, 637)
					 Send("A")
				  ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
					 MouseMove(940, 637)
					 MouseClick("right",940, 637,1)
				  EndIf
			   Else
				  Local $aCoord  = PixelSearch(942, 695, 955, 712, 0xDB0040, 2)
				  If Not                     [MENTION=2544426]Error T[/MENTION]hen
					 If GUICtrlRead($Combo1) = "Default (with A key)" Then
						MouseMove(940, 706)
						Send("A")
					 ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
						MouseMove(940, 706)
						MouseClick("right",940, 706,1)
					 EndIf
				  Else
					 If GUICtrlRead($Combo1) = "Default (with A key)" Then
						MouseMove(940, 706)
						Send("A")
					 ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
						MouseMove(940, 706)
						MouseClick("right",940, 706,1)
					 EndIf
				  EndIf
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 2 ; #башни рока
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then ; если слева красные
		 Do
			Local $aCoord2  = PixelSearch(380, 380, 390, 390, 0x088684, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(810, 662)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(810, 662)
				  MouseClick("right",810, 662,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then ; если слева синие
		 Do
			Local $aCoord2  = PixelSearch(380, 380, 390, 390, 0x088684, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(936, 661)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(936, 661)
				  MouseClick("right",936, 661,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 3 ; бойня на браксисе
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then ; если слева красные
		 Do
			Local $aCoord3  = PixelSearch(380, 380, 390, 390, 0x3C2C32, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(766, 645)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(766, 645)
				  MouseClick("right",766, 645,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then ; если слева синие
		 Do
			Local $aCoord3  = PixelSearch(380, 380, 390, 390, 0x3C2C32, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(970, 620)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(970, 620)
				  MouseClick("right",970, 620,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 4 ; бухта черносерда
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then ; если слева красные
		 Do
			Local $aCoord4  = PixelSearch(380, 380, 390, 390, 0xC57112, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(769, 688)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(769, 688)
				  MouseClick("right",769, 688,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then ; если слева синие
		 Do
			Local $aCoord4  = PixelSearch(380, 380, 390, 390, 0xC57112, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(976, 688)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(976, 688)
				  MouseClick("right",976, 688,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 5 ; вечная битва
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then ; если слева красные
		 Do
			Local $aCoord5  = PixelSearch(380, 380, 390, 390, 0xF3B86E, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(774, 711)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(774, 711)
				  MouseClick("right",774, 711,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then ; если слева синие
		 Do
			Local $aCoord5  = PixelSearch(380, 380, 390, 390, 0xF3B86E, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(972, 701)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(972, 701)
				  MouseClick("right",972, 701,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 6 ; гробница королевы пауков
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then ; если слева красные
		 Do
			Local $aCoord6  = PixelSearch(380, 380, 390, 390, 0x295588, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(780, 635)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(780, 635)
				  MouseClick("right",780, 635,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then ; если слева синие
		 Do
			Local $aCoord6  = PixelSearch(380, 380, 390, 390, 0x295588, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(958, 636)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(958, 636)
				  MouseClick("right",958, 636,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 7 ; драконий край
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then ; если слева красные
		 Do
			Local $aCoord7  = PixelSearch(380, 380, 390, 390, 0x844F49, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(771, 688)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(771, 688)
				  MouseClick("right",771, 688,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then ; если слева синие
		 Do
			Local $aCoord7  = PixelSearch(380, 380, 390, 390, 0x844F49, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(975, 688)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(975, 688)
				  MouseClick("right",975, 688,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 8 ; небесный храм
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then ; если слева красные
		 Do
			Local $aCoord8  = PixelSearch(380, 380, 390, 390, 0xFBB4B1, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(787, 600)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(787, 600)
				  MouseClick("right",787, 600,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then; если слева синие
		 Do
			Local $aCoord8  = PixelSearch(380, 380, 390, 390, 0xFBB4B1, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(983, 600)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(983, 600)
				  MouseClick("right",983, 600,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 9 ; оскверненные святилища
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then; если слева красные
		 Do
			Local $aCoord9  = PixelSearch(380, 380, 390, 390, 0x46222E, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(767, 663)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(767, 663)
				  MouseClick("right",767, 663,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then; если слева синие
		 Do
			Local $aCoord9  = PixelSearch(380, 380, 390, 390, 0x46222E, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(979, 663)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(979, 663)
				  MouseClick("right",979, 663,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 10 ; призрачные копи
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then; если слева красные
		 Do
			Local $aCoord10  = PixelSearch(380, 380, 390, 390, 0xDBC5BE, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(782, 604)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(782, 604)
				  MouseClick("right",782, 604,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then; если слева синие
		 Do
			Local $aCoord10  = PixelSearch(380, 380, 390, 390, 0xDBC5BE, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(950, 604)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(950, 604)
				  MouseClick("right",950, 604,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 11 ; проклятая лощина
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then; если слева красные
		 Do
			Local $aCoord11  = PixelSearch(380, 380, 390, 390, 0x7347C0, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(763, 687)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(763, 687)
				  MouseClick("right",763, 687,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then; если слева синие
		 Do
			Local $aCoord11  = PixelSearch(380, 380, 390, 390, 0x7347C0, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(968, 668)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(968, 668)
				  MouseClick("right",968, 668,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 12 ; сад ужасов
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then; если слева красные
		 Do
			Local $aCoord12  = PixelSearch(380, 380, 390, 390, 0x1B263A, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(765, 691)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(765, 691)
				  MouseClick("right",765, 691,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then; если слева синие
		 Do
			Local $aCoord12  = PixelSearch(380, 380, 390, 390, 0x1B263A, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(981, 669)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(981, 669)
				  MouseClick("right",981, 669,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   Case $getMeMap = 13 ; ядерный полигон
	  $getMeSide = GetSide()
	  If $getMeSide = 1 Then; если слева красные
		 Do
			Local $aCoord13  = PixelSearch(380, 380, 390, 390, 0xE3693D, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(792, 647)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(792, 647)
				  MouseClick("right",792, 647,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  ElseIf $getMeSide = 2 Then; если слева синие
		 Do
			Local $aCoord13  = PixelSearch(380, 380, 390, 390, 0xE3693D, 1)
			If                     [MENTION=2544426]Error T[/MENTION]hen
			   Sleep(3000)
			   WinActivate("[TITLE:Heroes of the Storm]","")
			   If GUICtrlRead($Combo1) = "Default (with A key)" Then
				  MouseMove(983, 647)
				  Send("A")
			   ElseIf GUICtrlRead($Combo1) = "Use right mouse clicks" Then
				  MouseMove(983, 647)
				  MouseClick("right",983, 647,1)
			   EndIf
			   Sleep(12000)
			   CheckForEndgame()
			EndIf
		 Until $infinityCase = 1
	  EndIf
   EndSelect
EndFunc

Func NewStartBot()
   WriteLog("--- Entering into new Start Bot")
   GuiCtrlSetData($Idling, "Idling in Menu")
      WriteLog("--- Calling check start button function")
   $findButton = CheckStartButton()
   If $findButton = 1 Then
	  WriteLog("Found start button and already pressed it")
	  Sleep(9000)
	  WriteLog("--- Call get map function")
	  $findMap = GetMap()
	  WriteLog("--- Call map route function")
	  MapRoute($findMap)
   EndIf
   WriteLog("Exiting from new start bot function! lol?")
EndFunc
Attached Files
File Type: txt Variables.txt (2.6 KB, 1277 views)
File Type: rar twinkiehots 30.09.17.rar (772.4 KB, 552 views)



TwinkieHotS is offline  
Thanks
3 Users
Old 07/12/2017, 20:28   #2
 
elite*gold: 50
Join Date: Feb 2009
Posts: 765
Received Thanks: 921
Quote:
Now I will create new one with memory editing on another language (probably) and you will receive it first.
You are not able to do this

But nice to see that you share something for free.


flumio is offline  
Old 07/12/2017, 20:30   #3
 
elite*gold: 0
Join Date: May 2017
Posts: 50
Received Thanks: 23
Quote:
Originally Posted by flumio View Post
You are not able to do this
Already tested few offsets, for example switch game mode and switch heroes.
Works well.
TwinkieHotS is offline  
Old 07/12/2017, 22:58   #4
 
elite*gold: 0
Join Date: Jan 2008
Posts: 124
Received Thanks: 7
Quote:
Because of damned blizzard which contacted with me and asked to close this bot...
werent you the guy who was complaining at flumio`s post that he shouldnt be scared of bliz and their punishes or was it to some1 else?

why you even stopping if the bot is "undetected" ?

that sounds so scetchy


asdf69 is offline  
Old 07/12/2017, 23:06   #5
 
elite*gold: 0
Join Date: May 2017
Posts: 50
Received Thanks: 23
Quote:
Originally Posted by asdf69 View Post
werent you the guy who was complaining at flumio`s post that he shouldnt be scared of bliz and their punishes or was it to some1 else?

why you even stopping if the bot is "undetected" ?

that sounds so scetchy
Like they said if I will continue support this bot I will have a lot of problems.
So, I don't need any kind of problems especially with little profit.
I still use this bot on my main account and all my users report to me that all works well.
TwinkieHotS is offline  
Old 07/13/2017, 20:27   #6
 
elite*gold: 0
Join Date: Jul 2017
Posts: 1
Received Thanks: 0
Where do i find the place to replace variables.txt? cannot find it
pmsx10 is offline  
Old 07/13/2017, 21:37   #7
 
elite*gold: 0
Join Date: Jun 2017
Posts: 11
Received Thanks: 2
Quote:
Originally Posted by TwinkieHotS View Post
Already tested few offsets, for example switch game mode and switch heroes.
Works well.
That will be so funny when the first little patch drops

Good luck
andrew1227 is offline  
Thanks
1 User
Old 07/14/2017, 14:47   #8
 
elite*gold: 0
Join Date: May 2017
Posts: 50
Received Thanks: 23
Quote:
Originally Posted by pmsx10 View Post
Where do i find the place to replace variables.txt? cannot find it
C:\Users\UserName\Documents\Heroes of the Storm
TwinkieHotS is offline  
Old 07/17/2017, 14:34   #9
 
elite*gold: 0
Join Date: Jun 2009
Posts: 14
Received Thanks: 0
could u add auto talent selection ? I know bot doesn't use any ability but talents are important for some heroes like varian and raynor.
sroad is offline  
Old 07/18/2017, 11:25   #10
 
elite*gold: 0
Join Date: May 2017
Posts: 119
Received Thanks: 50
Quote:
Originally Posted by sroad View Post
could u add auto talent selection ? I know bot doesn't use any ability but talents are important for some heroes like varian and raynor.
Should be an easy solution to add:

Code:
Func PickTalent($TalentNumber)
   Send("{CTRLDOWN}")
   Send($TalentNumber)
   Send("{CTRLUP}")
EndFunc

PickTalent(1)
In Route loop to get the bot always picking talent 1 for example. But its a lot overhead without detecting if a new talent is avalible.
tobstoh is offline  
Old 07/18/2017, 13:31   #11
 
elite*gold: 0
Join Date: Nov 2014
Posts: 3
Received Thanks: 0
The bot works well.
However, the bot stops from the Sky Temple map.
kth26445 is offline  
Old 07/20/2017, 19:47   #12
 
elite*gold: 0
Join Date: May 2017
Posts: 50
Received Thanks: 23
Quote:
Originally Posted by kth26445 View Post
The bot works well.
However, the bot stops from the Sky Temple map.
Tested now on sky temple. Works well.
TwinkieHotS is offline  
Old 07/20/2017, 21:42   #13
 
elite*gold: 0
Join Date: Jul 2017
Posts: 1
Received Thanks: 0
thanks will try
blackdream1 is offline  
Old 07/21/2017, 07:06   #14
 
elite*gold: 0
Join Date: Jul 2017
Posts: 2
Received Thanks: 0
Hello, my bot gets stuck here:
The bot runs so it changes the changes heroes, clicks training, goes to Imitating mode, then goes to Working, then the mouse goes underneath the ready button and doesn't move after that. Know a solution? thx in advance
Skippytheseal is offline  
Old 07/21/2017, 11:34   #15
 
elite*gold: 0
Join Date: May 2017
Posts: 50
Received Thanks: 23
Quote:
Originally Posted by Skippytheseal View Post
Hello, my bot gets stuck here:
The bot runs so it changes the changes heroes, clicks training, goes to Imitating mode, then goes to Working, then the mouse goes underneath the ready button and doesn't move after that. Know a solution? thx in advance
Im sure that your monitor resolution is smaller then 1440x900.


TwinkieHotS is offline  
Reply



« Twinkie HotS 2.0 Bot | Mitspieler & Teamsuche / Player & team recruitment »

Similar Threads
Twinkie HotS 2.0 Bot
09/08/2018 - Heroes of the Storm - 108 Replies
#wow #suchblizzard #muchthreats free version: https://www.elitepvpers.com/forum/heroes-storm/4326486-free-twinkie-heroes-storm-bot-sources.html 13.11.2018 - new private powerful undetected bot available. Supports any game client language. Contact with me in discord or skype. skype: aubrey.dd or join to our discord channel and feel free to ask about everything you want.



All times are GMT +1. The time now is 17:50.


Powered by vBulletin®
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2018 elitepvpers All Rights Reserved.