Is there any way to improve the speed even with all 20 keys?
----
Code: Select all
#IfWinActive World of Warcraft
#MaxThreadsPerHotkey 2
#NoEnv
SetBatchLines, -1
SendMode Input
SetWorkingDir %A_ScriptDir%
Toggle:=0
MButton::
exiter = 0
Toggle:=!Toggle
if(Toggle=1)
{
Gui,SNG: +AlwaysOnTop -Caption +Owner
Gui,SNG: Font, s14, Cambria bold
Gui,SNG: Color, red
Gui,SNG: Add, Text, Cwhite,SNG
Gui,SNG: Show, NoActivate x1000 y1650
loop
{
PixelGetColor,Color,30,2070
If Color!=000000
send, 1
if exiter = 1
break
PixelGetColor,Color,90,2070
If Color!=000000
send, 2
if exiter = 1
break
PixelGetColor,Color,150,2070
If Color!=000000
send, 3
if exiter = 1
break
PixelGetColor,Color,210,2070
If Color!=000000
send, 4
if exiter = 1
break
PixelGetColor,Color,270,2070
If Color!=000000
send, 5
if exiter = 1
break
PixelGetColor,Color,330,2070
If Color!=000000
send, 6
if exiter = 1
break
PixelGetColor,Color,390,2070
If Color!=000000
send, 7
if exiter = 1
break
PixelGetColor,Color,450,2070
If Color!=000000
send, 8
if exiter = 1
break
PixelGetColor,Color,510,2070
If Color!=000000
send, 9
if exiter = 1
break
PixelGetColor,Color,570,2070
If Color!=000000
send, 0
if exiter = 1
break
PixelGetColor,Color,630,2070
If Color!=000000
send, {numpad1}
if exiter = 1
break
PixelGetColor,Color,690,2070
If Color!=000000
send, {numpad2}
if exiter = 1
break
PixelGetColor,Color,750,2070
If Color!=000000
send, {numpad3}
if exiter = 1
break
PixelGetColor,Color,810,2070
If Color!=000000
send, {numpad4}
if exiter = 1
break
PixelGetColor,Color,870,2070
If Color!=000000
send, {numpad5}
if exiter = 1
break
PixelGetColor,Color,930,2070
If Color!=000000
send, {numpad6}
if exiter = 1
break
PixelGetColor,Color,990,2070
If Color!=000000
send, {numpad7}
if exiter = 1
break
PixelGetColor,Color,1050,2070
If Color!=000000
send, {numpad8}
if exiter = 1
break
PixelGetColor,Color,1110,2070
If Color!=000000
send, {numpad9}
if exiter = 1
break
PixelGetColor,Color,1170,2070
If Color!=000000
send, {numpad0}
if exiter = 1
break
}
return
}
else
{
Gui,SNG : destroy
exiter = 1
return
}
#IfWinActive
^PgUp::Reload ;; Ctrl + PageUP to reload script
^End::ExitApp ;; Ctrl + End to terminate script[Mod action: Moved topic from the “Gaming” section of “Script and Functions (v2)” since this thread is meant to ask for help with a script, not to share the final working script with others.]
