#IfWinActive, Darkfall Online
#NoEnv

;Set the number of rays you have here
num_rays = 7

;Set your binds here
/*Regarding modifiers: Shift = +, Ctrl = ^, Alt = !,
> < denotes right and left keys respectively.
Consult the help file for further information
*/
k_1 = {Numpad7} ;Impale
k_2 = {Numpad8} ;Dragon Breath
k_3 = {Numpad9} ;Unholy Caress
k_4 = {Numpad4} ;Frost Bite
k_5 = {Numpad5} ;Insect Swarm
k_6 = {Numpad6} ;Lightning Bolt
k_7 = {Numpad3} ;Pungent Mist

;Tweak cooldowns here
cd_1 = 6500 ;Impale
cd_2 = 14000 ;Dragon Breath
cd_3 = 14000 ;Unholy Caress
cd_4 = 9500 ;Frost Bite
cd_5 = 13000 ;Insect Swarm
cd_6 = 9000 ;Lightning Bolt
cd_7 = 15000 ;Pungent Mist

;Set ray priority here, 1 being highest, 6 being lowest
p_1 = 1 ;Impale
p_2 = 2 ;Dragon Breath
p_3 = 3 ;Unholy Caress
p_4 = 4 ;Frost Bite
p_5 = 5 ;Insect Swarm
p_6 = 6 ;Lightning Bolt
p_7 = 7 ;Pungent Mist

;Initializes ray availability array to 1 (off cooldown)
While A_Index <= num_rays
{
r_%A_Index% = 1
}

;Set your ray HotKey here (currently set to +FButton)
~+F::
cur_ray := RayLogic(cur_ray, cur_key, cur_cool)
Send , %cur_key%
While (ErrorLevel = 1)
{
If (GetKeyState("+F", "P") = 1)
Return
KeyWait, Lbutton, T.2
}
r_%cur_ray% = 0
neg_cur_cool := -cur_cool
SetTimer , %cur_ray% , %neg_cur_cool%
Return

;Subroutine group to reset ray cds
1:
2:
3:
4:
5:
6:
7:
r_%A_ThisLabel% = 1
Return

RayLogic(cur_ray, ByRef cur_key, ByRef cur_cool)
{
global

/*Initiates cur_ray to your highest priority ray
in the case of all rays being off cooldown
*/
cur_ray := p_1

/*Assigns the value of cur_ray to the first available
ray according to priority
*/
While A_Index <= num_rays
{
ray_number := p_%A_Index%
if (r_%ray_number% = 1)
{
cur_ray := ray_number
Break
}
}

;Sets the ray's corresponding key and cooldown
cur_key := k_%cur_ray%
cur_cool := cd_%cur_ray%

Return cur_ray
}