From 23a18ef3a4ddf0924aa0f44d6059bc37123848f8 Mon Sep 17 00:00:00 2001
From: OugonNoHane <inupwd@gmail.com>
Date: Mon, 24 Oct 2022 14:43:31 +0200
Subject: [PATCH] Primer commit, primera version preliminar.

---
 exetoso.ahk | 97 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 97 insertions(+)
 create mode 100644 exetoso.ahk

diff --git a/exetoso.ahk b/exetoso.ahk
new file mode 100644
index 0000000..d55a0f6
--- /dev/null
+++ b/exetoso.ahk
@@ -0,0 +1,97 @@
+CapsLock & j::
+	shiftState := GetKeyState("Shift", "P")
+	ctrlState := GetKeyState("Ctrl", "P")
+	switch (shiftState + ctrlState) {
+		case 0:
+			SendInput {Left}
+			return
+		case 1:
+			SendInput, % ((shiftState == 1) ? ("+{Left}") : ("^{Left}"))
+			return
+		case 2:
+			SendInput ^+{Left}
+			return
+		default:
+			MsgBox % "menudo gilipolls"
+			return
+	}
+	return
+
+	
+CapsLock & k::
+	shiftState := GetKeyState("Shift", "P")
+	ctrlState := GetKeyState("Ctrl", "P")
+	switch (shiftState + ctrlState) {
+		case 0:
+			SendInput {Down}
+			return
+		case 1:
+			SendInput, % ((shiftState == 1) ? ("+{Down}") : ("^{Down}"))
+			return
+		case 2:
+			SendInput ^+{Down}
+			return
+		default:
+			MsgBox % "menudo gilipolls"
+			return
+	}
+	return
+	
+CapsLock & l::
+	shiftState := GetKeyState("Shift", "P")
+	ctrlState := GetKeyState("Ctrl", "P")
+	switch (shiftState + ctrlState) {
+		case 0:
+			SendInput {Right}
+			return
+		case 1:
+			SendInput, % ((shiftState == 1) ? ("+{Right}") : ("^{Right}"))
+			return
+		case 2:
+			SendInput ^+{Right}
+			return
+		default:
+			MsgBox % "menudo gilipolls"
+			return
+	}
+	return
+
+	
+CapsLock & i::
+		shiftState := GetKeyState("Shift", "P")
+		ctrlState := GetKeyState("Ctrl", "P")
+		switch (shiftState + ctrlState) {
+			case 0:
+				SendInput {Up}
+				return
+			case 1:
+				SendInput, % ((shiftState == 1) ? ("+{Up}") : ("^{Up}"))
+				return
+			case 2:
+				SendInput ^+{Up}
+				return
+			default:
+				MsgBox % "menudo gilipolls"
+				return
+		}
+		return
+
+/*
+myVarWithKeystrokes := "+john+doe{Tab}+pas+sw0rd{Enter}"
+
+^!j::send, %myVarWithKeystrokes%
+
+
+
+switch GetKeyState(CapsLock , P)
+{
+case 0:
+    MsgBox, You entered "%UserInput%", which is the maximum length of text.
+    return
+case 1:
+    MsgBox, You entered "%UserInput%" at which time the input timed out.
+    return
+}
+*/
+
+Esc::ExitApp
\ No newline at end of file