[Release + Source Code] No More Room In Hell /Auto Weapons/Quick Chat/

#NoEnv
#Persistent
#SingleInstance Force
#InstallKeybdHook
#NoTrayIcon
if not A_IsAdmin
{
Run *RunAs "%A_ScriptFullPath%"
ExitApp
}
SetKeyDelay, 80
SendMode Input
SetWorkingDir %A_ScriptDir%
ScriptName := A_ScriptName
StringReplace, ScriptName, ScriptName, .ahk,, All
StringReplace, ScriptName, ScriptName, .exe,, All
fl = %ScriptName%.INI
rfs = 1
rf = 0
bf = 0
txt = 0
cup = Follow me
cdown = Come here
cleft = Wait
cright = Let's Go
guns = !guns
rtv = rtv
num0 =
num1 =
num2 =
num3 =
num4 =
num5 =
num6 =
num7 =
num8 =
num9 =

IfExist, %fl%
{
IniRead, rfs, %fl%, Rapid Fire Speed, rfs
IniRead, cup, %fl%, Text, cup
IniRead, cdown, %fl%, Text, cdown
IniRead, cleft, %fl%, Text, cleft
IniRead, cright, %fl%, Text, cright
IniRead, guns, %fl%, Text, guns
IniRead, rtv, %fl%, Text, rtv
IniRead, num0, %fl%, Text, num0
IniRead, num1, %fl%, Text, num1
IniRead, num2, %fl%, Text, num2
IniRead, num3, %fl%, Text, num3
IniRead, num4, %fl%, Text, num4
IniRead, num5, %fl%, Text, num5
IniRead, num6, %fl%, Text, num6
IniRead, num7, %fl%, Text, num7
IniRead, num8, %fl%, Text, num8
IniRead, num9, %fl%, Text, num9
GuiControl,, rfs, %rfs%
GuiControl,, cup, %cup%
GuiControl,, cdown, %cdown%
GuiControl,, cleft, %cleft%
GuiControl,, cright, %cright%
GuiControl,, guns, %guns%
GuiControl,, rtv, %rtv%
GuiControl,, num0, %num0%
GuiControl,, num1, %num1%
GuiControl,, num2, %num2%
GuiControl,, num3, %num3%
GuiControl,, num4, %num4%
GuiControl,, num5, %num5%
GuiControl,, num6, %num6%
GuiControl,, num7, %num7%
GuiControl,, num8, %num8%
GuiControl,, num9, %num9%
}

Gui,Add,Text,x212 y5 w110 h13 gCredit Center,▓♣♠YOUCEF♠♣▓
Gui,Add,Tab2,x4 y3 w313 h507,Weapons|Hotkeys
Gui,Tab,1,1
Gui,Add,Groupbox,x18 y34 w285 h120,Rapid Fire
Gui,Add,Edit,x125 y59 w166 h21 Center ReadOnly,
Gui,Add,UpDown,x272 y59 w18 h21 Range1-10 vrfs,% rfs
Gui,Add,Text,x30 y62 h13,Rapid Fire Speed
Gui,Add,Checkbox,x27 y95 h13 vburstfire gburstfire,Enable Burst Fire, 3 Bullets [X]
Gui,Add,Checkbox,x27 y125 h13 vrapidfire grapidfire,Enable Rapid Fire [F3]
Gui,Add,Button,x212 y120 w80 h23 gApply,Apply
Gui,Tab,2,1
Gui,Add,Text,x22 y39 w73 h15,Right Ctrl + Up
Gui,Add,Text,x22 y66 w85 h13,Right Ctrl + Down
Gui,Add,Text,x22 y92 w73 h14,Right Ctrl + Left
Gui,Add,Text,x22 y118 w80 h13,Right Ctrl + Right
Gui,Add,Text,x22 y145 w57 h12,Left Alt + G
Gui,Add,Text,x22 y174 w53 h12,Left Alt + R
Gui,Add,Text,x22 y204 w53 h15,Numpad 0
Gui,Add,Text,x22 y231 w56 h14,Numpad 1
Gui,Add,Text,x22 y259 w54 h15,Numpad 2
Gui,Add,Text,x22 y288 w50 h16,Numpad 3
Gui,Add,Text,x22 y316 w50 h15,Numpad 4
Gui,Add,Text,x22 y343 w52 h16,Numpad 5
Gui,Add,Text,x22 y370 w49 h16,Numpad 6
Gui,Add,Text,x22 y397 w49 h16,Numpad 7
Gui,Add,Text,x22 y424 w49 h16,Numpad 8
Gui,Add,Text,x22 y451 w49 h16,Numpad 9
Gui,Add,Edit,x118 y37 w185 h21 vcup,% cup
Gui,Add,Edit,x118 y63 w185 h21 vcdown,% cdown
Gui,Add,Edit,x118 y89 w185 h21 vcleft,% cleft
Gui,Add,Edit,x118 y115 w185 h21 vcright,% cright
Gui,Add,Edit,x93 y142 w210 h21 vguns ReadOnly,% guns
Gui,Add,Edit,x93 y171 w210 h21 vrtv ReadOnly,% rtv
Gui,Add,Edit,x93 y201 w210 h20 vnum0,% num0
Gui,Add,Edit,x93 y228 w210 h20 vnum1,% num1
Gui,Add,Edit,x93 y256 w210 h20 vnum2,% num2
Gui,Add,Edit,x93 y285 w210 h20 vnum3,% num3
Gui,Add,Edit,x93 y313 w210 h20 vnum4,% num4
Gui,Add,Edit,x93 y340 w210 h20 vnum5,% num5
Gui,Add,Edit,x93 y367 w210 h20 vnum6,% num6
Gui,Add,Edit,x93 y394 w210 h20 vnum7,% num7
Gui,Add,Edit,x93 y421 w210 h20 vnum8,% num8
Gui,Add,Edit,x93 y448 w210 h20 vnum9,% num9
Gui,Add,Checkbox,x22 y483 h13 vtext gtext,Enable Hotkeys [F4]
Gui,Add,Button,x224 y478 w80 h23 gApply,Apply
ft = 0
Gui,Show,x0 y0 w320 h512 , .:No More Room In Hell:.

$F3::
if rf = 0
{
GuiControl,, rapidfire, 1
gosub, rapidfire
}
else
{
GuiControl,, rapidfire, 0
gosub, rapidfire
}
return

$F4::
if txt = 0
{
GuiControl,, text, 1
gosub, text
}
else
{
GuiControl,, text, 0
gosub, text
}
return

~y::
if txt = 1
{
GuiControl,, text, 0
gosub, text
}
return

#if rf = 1

~*LButton::
gosub, gamecheck
if g = 1
if bf = 1
burstf()
else
rapidf()
return

$x::
if bf = 0
{
GuiControl,, burstfire, 1
gosub, burstfire
}
else
{
GuiControl,, burstfire, 0
gosub, burstfire
}
return

#if

#if txt = 1

!g::
gosub, gamecheck
if g = 1
stxt(guns)
return

!r::
gosub, gamecheck
if g = 1
stxt(rtv)
return

>^Up::
gosub, gamecheck
if g = 1
stxt(cup)
return

>^Down::
gosub, gamecheck
if g = 1
stxt(cdown)
return

>^Left::
gosub, gamecheck
if g = 1
stxt(cleft)
return

>^Right::
gosub, gamecheck
if g = 1
stxt(cright)
return

$Numpad0::
stxt(num0)
return

$Numpad1::
stxt(num1)
return

$Numpad2::
stxt(num2)
return

$Numpad3::
stxt(num3)
return

$Numpad4::
stxt(num4)
return

$Numpad5::
stxt(num5)
return

$Numpad6::
stxt(num6)
return

$Numpad7::
stxt(num7)
return

$Numpad8::
stxt(num8)
return

$Numpad9::
stxt(num9)
return

#if

rapidfire:
if ft = 0
if rf = 0
{
rf = 1
SoundBeep, 1000
}
else
{
rf = 0
SoundBeep, 500
}
gosub, Apply
return

burstfire:
if ft = 0
if bf = 0
{
bf = 1
SoundBeep, 1000
}
else
{
bf = 0
SoundBeep, 500
}
gosub, Apply
return

text:
if ft = 0
if txt = 0
{
txt = 1
SoundBeep, 1000
}
else
{
txt = 0
SoundBeep, 500
}
gosub, Apply
return

Apply:
GuiControlGet, rfs, ,rfs
IniWrite, %rfs%, %fl%, Rapid Fire Speed, rfs
if rfs = 10
v = 20
else if rfs = 9
v = 25
else if rfs = 8
v = 30
else if rfs = 7
v = 35
else if rfs = 6
v = 40
else if rfs = 5
v = 50
else if rfs = 4
v = 60
else if rfs = 3
v = 75
else if rfs = 2
v = 90
else if rfs = 1
v = 100
GuiControlGet, cup, ,cup
GuiControlGet, cdown, ,cdown
GuiControlGet, cleft, ,cleft
GuiControlGet, cright, ,cright
GuiControlGet, guns, ,guns
GuiControlGet, rtv, ,rtv
GuiControlGet, num0, ,num0
GuiControlGet, num1, ,num1
GuiControlGet, num2, ,num2
GuiControlGet, num3, ,num3
GuiControlGet, num4, ,num4
GuiControlGet, num5, ,num5
GuiControlGet, num6, ,num6
GuiControlGet, num7, ,num7
GuiControlGet, num8, ,num8
GuiControlGet, num9, ,num9
IniWrite, %cup%, %fl%, Text, cup
IniWrite, %cdown%, %fl%, Text, cdown
IniWrite, %cleft%, %fl%, Text, cleft
IniWrite, %cright%, %fl%, Text, cright
IniWrite, %guns%, %fl%, Text, guns
IniWrite, %rtv%, %fl%, Text, rtv
IniWrite, %num0%, %fl%, Text, num0
IniWrite, %num1%, %fl%, Text, num1
IniWrite, %num2%, %fl%, Text, num2
IniWrite, %num3%, %fl%, Text, num3
IniWrite, %num4%, %fl%, Text, num4
IniWrite, %num5%, %fl%, Text, num5
IniWrite, %num6%, %fl%, Text, num6
IniWrite, %num7%, %fl%, Text, num7
IniWrite, %num8%, %fl%, Text, num8
IniWrite, %num9%, %fl%, Text, num9
return

gamecheck:
WinGetTitle, wint, A
if wint = No More Room in Hell
g = 1
else
{
g = 0
}
return

Credit:
Run http://www.autohotkey.com/board/user/38568-youcefham/
return

GuiClose:
ExitApp
return

rapidf()
{
global v
state := !state
loop
{
Send, {LButton}
Sleep, %v%
if GetKeyState("LButton","p") = 0
state := !state
}until !state
}
return

burstf()
{
global v
loop, 3
{
send {LButton}
Sleep, %v%
}
}
return

stxt(t)
{
global
gosub, gamecheck
if g = 0
{
key = %A_ThisHotkey%
StringReplace, key, key, $,, All
Send, {%key%}
return
}
else
{
Send, y
Sleep, 200
SendRaw, %t%
Sleep, 100
Send, {Enter}
}
}
return