oVoice := ComObjCreate("SAPI.SpVoice")
powerOn:=1
loop
{
Sleep,1
    if GetKeyState("F1", "P")
    {
        if powerOn=0
        {
            powerOn:=1
            suspend off
            oVoice.Speak("On")
            SetScrollLockState, on
        }
        else if powerOn=1
        {
            powerOn:=0
            suspend on
            oVoice.Speak("Off")
            SetScrollLockState, off
        }
    }
    if powerOn=1
    {
augblade()
        While GetKeyState("rbutton","P")
        {
            augblade()
            Sendevent r
            sleep,350
        }
        While GetKeyState("lbutton","P")
        {
            augblade()
            Sendevent r
            sleep,350
        }
    }
}
*1::
if (powerOn=1)
    SendEvent {1}{x}
else SendEvent {1}
sleep,100
Return
SplitRGBColor(RGBColor, ByRef Red, ByRef Green, ByRef Blue)
{
    Red := RGBColor >> 16 & 0xFF
    Green := RGBColor >> 8 & 0xFF
    Blue := RGBColor & 0xFF
}
abon()
{
    PixelGetColor, Color1, 1227, 550, RGB
    SplitRGBColor(color1, Red, Green, Blue)
    return ((Green>245) && (Red>245) && (Blue>245))
}
aboff()
{
    PixelGetColor, Color1, 1241, 550, RGB
    SplitRGBColor(color1, Red, Green, Blue)
    return ((Green<10) && (Red>245) && (Blue<10))
}
augblade()
{
sleep,100
 If abon()
    {
    SendEvent c
    }
    If aboff()
    {
    SendEvent c
    }
}