README.md

@@ -1,3 +1,7 @@
-Prototipo con AHK: flechas en letras.
+Merece la pena todo esto? 
 
-Utilizar o compilar con AHKv1.
+Puede que no, mas tampoco OW2
+
+e igualmente se hizo.
+
+	- Gato gamer

exetoso.ahk

@@ -1,90 +1,63 @@
-;		 UP	  LEFT DOWN RIGHT 
-keyboardActions := {"i" : "Up", "j" : "Left", "k" : "Down" , "l" : "Right"}
-;keyboardKeys := ["i", "j", "k", "l"]
-;actions := ["Up", "Left", "Down", "Right"]
-
-;parseKey(keyboardKey) {
-;	for key, value in keyboardActions
-;		if (value == keyboardKey)
-;			return value
-;	return 0
-;}
-/*
-
-CapsLock & i::
 CapsLock & j::
-CapsLock & k::
+	shiftState := GetKeyState("Shift", "P")
-CapsLock & l::
+	ctrlState := GetKeyState("Ctrl", "P")
-	
+	switch (shiftState + ctrlState) {
-	MsgBox % "testt"
+		case 0:
-*/
+			SendInput {Left}
-
+			return
-
+		case 1:
-CapsLock & j::
+			SendInput, % ((shiftState == 1) ? ("+{Left}") : ("^{Left}"))
-	loop {
+			return
-		ctrlState := GetKeyState("Ctrl", "P")
+		case 2:
-		shiftState := GetKeyState("Shift", "P")
+			SendInput ^+{Left}
-		switch (shiftState + ctrlState) {
+			return
-			case 0:
+		default:
-				SendInput {Left}
+			MsgBox % "menudo gilipolls"
-				return
+			return
-			case 1:
-				SendInput, % ((shiftState == 1) ? ("+{Left}") : ("^{Left}"))
-				return
-			case 2:
-				SendInput % ("^+{keyboardActions[""j""]}") 
-				return
-			default:
-				MsgBox % "Fail!"
-				return
-		}
-		return
 	}
+	return
+
 	
 CapsLock & k::
-	loop {
+	shiftState := GetKeyState("Shift", "P")
-		shiftState := GetKeyState("Shift", "P")
+	ctrlState := GetKeyState("Ctrl", "P")
-		ctrlState := GetKeyState("Ctrl", "P")
+	switch (shiftState + ctrlState) {
-		switch (shiftState + ctrlState) {
+		case 0:
-			case 0:
+			SendInput {Down}
-				SendInput {Down}
+			return
-				return
+		case 1:
-			case 1:
+			SendInput, % ((shiftState == 1) ? ("+{Down}") : ("^{Down}"))
-				SendInput, % ((shiftState == 1) ? ("+{Down}") : ("^{Down}"))
+			return
-				return
+		case 2:
-			case 2:
+			SendInput ^+{Down}
-				SendInput ^+{Down}
+			return
-				return
+		default:
-			default:
+			MsgBox % "menudo gilipolls"
-				MsgBox % "Fail!"
+			return
-				return
-		}
-		return
 	}
+	return
 	
 CapsLock & l::
-	loop {
+	shiftState := GetKeyState("Shift", "P")
-		ctrlState := GetKeyState("Ctrl", "P")
+	ctrlState := GetKeyState("Ctrl", "P")
-		shiftState := GetKeyState("Shift", "P")
+	switch (shiftState + ctrlState) {
-		switch (shiftState + ctrlState) {
+		case 0:
-			case 0:
+			SendInput {Right}
-				SendInput {Right}
+			return
-				return
+		case 1:
-			case 1:
+			SendInput, % ((shiftState == 1) ? ("+{Right}") : ("^{Right}"))
-				SendInput, % ((shiftState == 1) ? ("+{Right}") : ("^{Right}"))
+			return
-				return
+		case 2:
-			case 2:
+			SendInput ^+{Right}
-				SendInput ^+{Right}
+			return
-				return
+		default:
-			default:
+			MsgBox % "menudo gilipolls"
-				MsgBox % "Fail!"
+			return
-				return
-		}
-		return
 	}
+	return
+
 	
 CapsLock & i::
-	loop {
 		shiftState := GetKeyState("Shift", "P")
 		ctrlState := GetKeyState("Ctrl", "P")
 		switch (shiftState + ctrlState) {
@@ -98,11 +71,10 @@ CapsLock & i::
 				SendInput ^+{Up}
 				return
 			default:
-				MsgBox % "Fail!"
+				MsgBox % "menudo gilipolls"
 				return
 		}
 		return
-	}
 
 /*
 myVarWithKeystrokes := "+john+doe{Tab}+pas+sw0rd{Enter}"
@@ -123,4 +95,3 @@ case 1:
 */
 
 Esc::ExitApp
-/*Esc::ExitApp*/