#include <Misc.au3>

$dll = DllOpen("user32.dll")
Local $ux1 = ""
Local $uy1 = ""
Local $ux2 = ""
Local $uy2 = ""
Local $ux3 = ""
Local $uy3 = ""
Local $a

HotKeySet("{ESC}", "_exit")
HotKeySet("^p", "_Pause")
HotKeySet("^r", "_restart")

_restart()

Func _restart()
	$press1 = 0
	$press2 = 0
	While 1
		$num2 = 100
		$a = MouseGetPos()
		$press1 = _IsPressed(01, $dll)
		$press2 = _IsPressed(02, $dll)
		If Not _IsPressed(01, $dll) And Not _IsPressed(02, $dll) Then
			If $ux1 <> $a[0] Or $uy1 <> $a[1] Then
				FileWriteLine("texte.txt", "MouseMove(" & $a[0] & "," & $a[1] & ", 1)")
				$ux1 = $a[0]
				$uy1 = $a[1]
			EndIf
		Else
			If _IsPressed(01, $dll) Then
				FileWriteLine("texte.txt", "MouseClick('Left'," & $a[0] & "," & $a[1] & ", 1)")
				Sleep($num2)
			EndIf
			If _IsPressed(02, $dll) Then
				FileWriteLine("texte.txt", "MouseClick('Right'," & $a[0] & "," & $a[1] & ", 1)")
				Sleep($num2)
			EndIf
		EndIf

		$num = 180
		$press3 = _IsPressed(08, $dll)
		If _IsPressed(08, $dll) Then ; Effacer
			FileWriteLine("texte.txt", "Send('{BACKSPACE}')")
			Sleep($num)
		EndIf

		$press4 = _IsPressed(09, $dll)
		If _IsPressed(09, $dll) Then ; Tab
			FileWriteLine("texte.txt", "Send('{TAB}')")
			Sleep($num)
		EndIf

		$press5 = _IsPressed("0D", $dll)
		If _IsPressed("0D", $dll) Then ; ENTER
			FileWriteLine("texte.txt", "Send('{ENTER}')")
			Sleep($num)
		EndIf

		$press6 = _IsPressed("10", $dll)
		If _IsPressed(10, $dll) Then ; SHIFT
			FileWriteLine("texte.txt", "Send('{LSHIFT}')")
			Sleep($num)
		EndIf

		$press7 = _IsPressed("41", $dll)
		If _IsPressed(41, $dll) Then ; A key
			FileWriteLine("texte.txt", "Send('a')")
			Sleep($num)
		EndIf

		$press8 = _IsPressed("42", $dll)
		If _IsPressed(42, $dll) Then ; B key
			FileWriteLine("texte.txt", "Send('b')")
			Sleep($num)
		EndIf

		$press9 = _IsPressed("43", $dll)
		If _IsPressed(43, $dll) Then ; C key
			FileWriteLine("texte.txt", "Send('c')")
			Sleep($num)
		EndIf

		$press10 = _IsPressed("44", $dll)
		If _IsPressed(44, $dll) Then ; D key
			FileWriteLine("texte.txt", "Send('d')")
			Sleep($num)
		EndIf

		$press11 = _IsPressed("45", $dll)
		If _IsPressed(45, $dll) Then ; E key
			FileWriteLine("texte.txt", "Send('e')")
			Sleep($num)
		EndIf

		$press12 = _IsPressed("46", $dll)
		If _IsPressed(46, $dll) Then ; F key
			FileWriteLine("texte.txt", "Send('f')")
			Sleep($num)
		EndIf

		$press13 = _IsPressed("47", $dll)
		If _IsPressed(47, $dll) Then ; G key
			FileWriteLine("texte.txt", "Send('g')")
			Sleep($num)
		EndIf

		$press14 = _IsPressed("48", $dll)
		If _IsPressed(48, $dll) Then ; H key
			FileWriteLine("texte.txt", "Send('h')")
			Sleep($num)
		EndIf

		$press15 = _IsPressed("49", $dll)
		If _IsPressed(49, $dll) Then ; I key
			FileWriteLine("texte.txt", "Send('i')")
			Sleep($num)
		EndIf

		$press16 = _IsPressed("4A", $dll)
		If _IsPressed("4A", $dll) Then ; J key
			FileWriteLine("texte.txt", "Send('j')")
			Sleep($num)
		EndIf

		$press17 = _IsPressed("4B", $dll)
		If _IsPressed("4B", $dll) Then ; K key
			FileWriteLine("texte.txt", "Send('k')")
			Sleep($num)
		EndIf

		$press18 = _IsPressed("4C", $dll)
		If _IsPressed("4C", $dll) Then ; L key
			FileWriteLine("texte.txt", "Send('l')")
			Sleep($num)
		EndIf

		$press19 = _IsPressed("4D", $dll)
		If _IsPressed("4D", $dll) Then ; M key
			FileWriteLine("texte.txt", "Send('m')")
			Sleep($num)
		EndIf

		$press20 = _IsPressed("4E", $dll)
		If _IsPressed("4E", $dll) Then ; N key
			FileWriteLine("texte.txt", "Send('n')")
			Sleep($num)
		EndIf

		$press21 = _IsPressed("4F", $dll)
		If _IsPressed("4F", $dll) Then ; O key
			FileWriteLine("texte.txt", "Send('o')")
			Sleep($num)
		EndIf

		$press22 = _IsPressed("50", $dll)
		If _IsPressed(50, $dll) Then ; P key
			FileWriteLine("texte.txt", "Send('p')")
			Sleep($num)
		EndIf

		$press23 = _IsPressed("51", $dll)
		If _IsPressed(51, $dll) Then ; Q key
			FileWriteLine("texte.txt", "Send('q')")
			Sleep($num)
		EndIf

		$press24 = _IsPressed("52", $dll)
		If _IsPressed(52, $dll) Then ; R key
			FileWriteLine("texte.txt", "Send('r')")
			Sleep($num)
		EndIf

		$press25 = _IsPressed("53", $dll)
		If _IsPressed(53, $dll) Then ; S key
			FileWriteLine("texte.txt", "Send('s')")
			Sleep($num)
		EndIf

		$press26 = _IsPressed("54", $dll)
		If _IsPressed(54, $dll) Then ; T key
			FileWriteLine("texte.txt", "Send('t')")
			Sleep($num)
		EndIf

		$press27 = _IsPressed("55", $dll)
		If _IsPressed(55, $dll) Then ; U key
			FileWriteLine("texte.txt", "Send('u')")
			Sleep($num)
		EndIf

		$press28 = _IsPressed("56", $dll)
		If _IsPressed(56, $dll) Then ; V key
			FileWriteLine("texte.txt", "Send('v')")
			Sleep($num)
		EndIf

		$press29 = _IsPressed("57", $dll)
		If _IsPressed(57, $dll) Then ; W key
			FileWriteLine("texte.txt", "Send('w')")
			Sleep($num)
		EndIf

		$press30 = _IsPressed("58", $dll)
		If _IsPressed(58, $dll) Then ; X key
			FileWriteLine("texte.txt", "Send('x')")
			Sleep($num)
		EndIf

		$press31 = _IsPressed("59", $dll)
		If _IsPressed(59, $dll) Then ; Y key
			FileWriteLine("texte.txt", "Send('y')")
			Sleep($num)
		EndIf

		$press32 = _IsPressed("5A", $dll)
		If _IsPressed("5A", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('z')")
			Sleep($num)
		EndIf

		$press33 = _IsPressed("60", $dll)
		If _IsPressed("60", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('0')")
			Sleep($num)
		EndIf

		$press34 = _IsPressed("61", $dll)
		If _IsPressed("61", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('1')")
			Sleep($num)
		EndIf

		$press35 = _IsPressed("62", $dll)
		If _IsPressed("62", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('2')")
			Sleep($num)
		EndIf

		$press36 = _IsPressed("63", $dll)
		If _IsPressed("63", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('3')")
			Sleep($num)
		EndIf

		$press37 = _IsPressed("64", $dll)
		If _IsPressed("64", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('4')")
			Sleep($num)
		EndIf

		$press38 = _IsPressed("65", $dll)
		If _IsPressed("65", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('5')")
			Sleep($num)
		EndIf

		$press39 = _IsPressed("66", $dll)
		If _IsPressed("66", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('6')")
			Sleep($num)
		EndIf

		$press40 = _IsPressed("67", $dll)
		If _IsPressed("67", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('7')")
			Sleep($num)
		EndIf

		$press41 = _IsPressed("68", $dll)
		If _IsPressed("68", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('8')")
			Sleep($num)
		EndIf

		$press42 = _IsPressed("69", $dll)
		If _IsPressed("69", $dll) Then ; Z key
			FileWriteLine("texte.txt", "Send('9')")
			Sleep($num)
		EndIf

		$press43 = _IsPressed("20", $dll)
		If _IsPressed("20", $dll) Then ; Espace
			FileWrite("Keylogger.txt", "{SPACE}")
			Sleep($num)
		EndIf

		$PressTotal = 0
		For $u = 1 To 42
			$PressTotal = $press1 + $press2 + $press3 + $press4 + $press5 + $press6 + $press7 + $press8 + $press9
			$PressTotal &= $press10 + $press11 + $press12 + $press13 + $press14 + $press15 + $press16
			$PressTotal &= $press17 + $press18 + $press19 + $press20 + $press21 + $press22 + $press23 + $press24
			$PressTotal &= $press25 + $press26 + $press27 + $press28 + $press29 + $press30 + $press31
			$PressTotal &= $press32 + $press33 + $press34 + $press35 + $press36 + $press37 + $press38 + $press39 + $press40 + $press41 + $press42 + $press43
		Next
		If $PressTotal = 0 Then
			FileWriteLine("texte.txt", "sleep(1)")
		EndIf
		Sleep(1)
	WEnd
EndFunc   ;==>_restart

Func _exit()
	Exit
EndFunc   ;==>_exit

Func _Pause()
	While 1
		Sleep(300)
	WEnd
EndFunc   ;==>_Pause