Timer := A_TickCount
While, (A_TickCount - Timer) < 2000 ;2 seconds
   SendInput, {a}