Candy Box 2 create X Potion

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.

; script to create the x potion in candy box 2


; sleep variable
s := 10
bc := 10 ; boil cold
bh := 7000 ; boil hot

; reference position on the letter w in "What you want to put in the cauldron"
; using position relative to window
WPosX := 940
WPosY := 688

candiesY := 34
lolliY := 64
putInY := 94

Loop
{
Sleep, 100
if (GetKeyState("CapsLock", "T"))
{
; add 4 candies
Loop, 4
{
    MouseClick, left, WPosX, WPosY+candiesY ; select candies entry
    Sleep, s
    Send {Blind}1
    Sleep, s
    MouseClick, left, WPosX, WPosY+putInY ; add to couldron
    Sleep, s
    Send {Blind}b ; boil
    Sleep bc
    Send {Blind}s ; stop
    Sleep s
}

; add 1 lollipop
MouseClick, left, WPosX, WPosY+lolliY ; select lollipop entry
Sleep, s
Send {Blind}1
Sleep, s
MouseClick, left, WPosX, WPosY+putInY ; add to couldron
Sleep, s
Send {Blind}b ; boil
Sleep, bh
Send {Blind}s ; stop
Sleep, s
Send {Blind}p ; put in bottle


;Send {Blind}m ;Blind otherwise it turns off capslock for the duration of the send

}
}