#NoEnv
#Warn
SendMode Input
SetWorkingDir %A_ScriptDir%

^1::
    send, 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
return
sendToHM(text)
{
    cbtemp := Clipboard
    Clipboard := text
    sleep, 500
    ControlClick, ,hackmud,, RIGHT
    sleep, 500
    Clipboard := cbtemp
    sleep, 1000
    ;ControlSend, ,{Enter}, hackmud

    sleep, 7000
}
hardline()
{
    sendToHM("/dc`n")
    sleep, 10000
    sendToHM("clean`n")
    sleep, 15000
    sendToHM("/hl`n")
    sleep, 15000
    ControlSend, ,012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789, hackmud
    sleep, 15000
}
removeFirstLn()
{
Loop, Read, bot_commands.txt, temp.txt
If A_Index=1
   Continue
else
   FileAppend %A_LoopReadLine%`n
FileMove, temp.txt, bot_commands.txt, 1
return
}
^2::
    FileRead, RawCommands, bot_commands.txt
    StringSplit, BotCommands, RawCommands, `n
    onCommand := 1
    Loop, %BotCommands0%
    {
        if (Mod(onCommand, 12) = 1) {
            hardline()
        }
	removeFirstLn()
        sendToHM(BotCommands%onCommand%)
        onCommand++
    }
return
^3::
    Pause
return
^4::
    ExitApp
return