Primer commit, primera version preliminar.

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