#NoEnv
#SingleInstance Force
SetTitleMatchMode 2
#Persistent
DetectHiddenWindows, On
sendMode Input
#InstallKeybdHook
#InstallMouseHook
SetDefaultMouseSpeed, 0
SetMouseDelay, -1
SetKeyDelay, -1
SetWinDelay, -1
SetBatchLines, -1
SetControlDelay -1
#MaxThreads 30
#MaxHotKeysPerInterval 1000
#MaxThreadsBuffer on
#KeyHistory 0

*LShift::
loop
{     
   GetKeyState, LShiftState, LShift, P
   if (LShiftState = "U")
{
   send {x}
      break
}
else
   {
      send {x down}
      sleep, 40
      send {x up}
      sleep, 30
      }
}