num_rays = 6
k_1 = {NumPad8}
k_2 = {NumPad9}
k_3 = {P}
k_4 = {J}
k_5 = +{J}
k_6 = +{O}
cd_1 = 13000
cd_2 = 6000
cd_3 = 13000
cd_4 = 8000
cd_5 = 4000
cd_6 = 5000
p_1 = 1
p_2 = 2
p_3 = 3
p_4 = 4
p_5 = 5
P_6 = 6
While A_Index <= num_rays
{
r_%A_Index% = 1
}
SC025::
Send, {Q}
Sleep, 250
cur_ray := RayLogic(cur_ray, cur_key, cur_cool)
Send , %cur_key%
While (ErrorLevel = 1)
{
If (GetKeyState("SC025", "P") = 1)
Return
KeyWait, Lbutton, T.2
}
r_%cur_ray% = 0
neg_cur_cool := -cur_cool
SetTimer , %cur_ray% , %neg_cur_cool%
Return
1:
2:
3:
4:
5:
6:
r_%A_ThisLabel% = 1
Return
RayLogic(cur_ray, ByRef cur_key, ByRef cur_cool)
{
global
cur_ray := p_1
While A_Index <= num_rays
{
ray_number := p_%A_Index%
if (r_%ray_number% = 1)
{
cur_ray := ray_number
Break
}
}
cur_key := k_%cur_ray%
cur_cool := cd_%cur_ray%
Return cur_ray
}
num_rays = 6
k_1 = {NumPad1}
k_2 = {NumPad2}
k_3 = {NumPad3}
k_4 = {NumPad4}
k_5 = {NumPad5}
k_6 = {NumPad6}
cd_1 = 6500
cd_2 = 13000
cd_3 = 12000
cd_4 = 13000
cd_5 = 8000
cd_6 = 1000
p_1 = 1
p_2 = 2
p_3 = 3
p_4 = 4
p_5 = 5
p_6 = 6
While A_Index <= num_rays
{
r_%A_Index% = 1
}
SC026::
Send, {SC013}
Sleep, 250
cur_ray := RayLogic(cur_ray, cur_key, cur_cool)
Send , %cur_key%
While (ErrorLevel = 1)
{
If (GetKeyState("SC026", "P") = 1)
Return
KeyWait, Lbutton, T.2
}
r_%cur_ray% = 0
neg_cur_cool := -cur_cool
SetTimer , %cur_ray% , %neg_cur_cool%
Return
1:
2:
3:
4:
5:
6:
r_%A_ThisLabel% = 1
Return
RayLogic(cur_ray, ByRef cur_key, ByRef cur_cool)
{
global
cur_ray := p_1
While A_Index <= num_rays
{
ray_number := p_%A_Index%
if (r_%ray_number% = 1)
{
cur_ray := ray_number
Break
}
}
cur_key := k_%cur_ray%
cur_cool := cd_%cur_ray%
Return cur_ray
}