[BATCH]Diccionario

Hola A Todos, esta vez no vengo a preguntar, solo a aportar un pequeño "diccionario" para que codifiquen sus códigos (valga la redundancia), esta desde la "a" a la "z" y del "0" al "9", no incluí mayúsculas porque no sé si batch las diferencia (voy a probar), no es gran cosa es solo por si a alguien le sirve.

Código:

Set "KingBoo=abcdefghijklmnopqrstuvwxyz1235467890"
Set "a=%KingBoo:~0,1%"
Set "b=%KingBoo:~1,1%"
Set "c=%KingBoo:~2,1%"
Set "d=%KingBoo:~3,1%"
Set "e=%KingBoo:~4,1%"
Set "f=%KingBoo:~5,1%"
Set "g=%KingBoo:~6,1%"
Set "h=%KingBoo:~7,1%"
Set "i=%KingBoo:~8,1%"
Set "j=%KingBoo:~9,1%"
Set "k=%KingBoo:~10,1%"
Set "l=%KingBoo:~11,1%"
Set "m=%KingBoo:~12,1%"
Set "n=%KingBoo:~13,1%"
Set "o=%KingBoo:~14,1%"
Set "p=%KingBoo:~15,1%"
Set "q=%KingBoo:~16,1%"
Set "r=%KingBoo:~17,1%"
Set "s=%KingBoo:~18,1%"
Set "t=%KingBoo:~19,1%"
Set "u=%KingBoo:~20,1%"
Set "v=%KingBoo:~21,1%"
Set "w=%KingBoo:~22,1%"
Set "x=%KingBoo:~23,1%"
Set "y=%KingBoo:~24,1%"
Set "z=%KingBoo:~25,1%"
Set "UNO=%KingBoo:~26,1%"
Set "DOS=%KingBoo:~27,1%"
Set "TRES=%KingBoo:~28,1%"
Set "CUATRO=%KingBoo:~29,1%"
Set "CINCO=%KingBoo:~30,1%"
Set "SEIS=%KingBoo:~31,1%"
Set "SIETE=%KingBoo:~32,1%"
Set "OCHO=%KingBoo:~33,1%"
Set "NUEVE=%KingBoo:~34,1%"
Set "CERO=%KingBoo:~35,1%"

Uso: Por Ejemplo Quiere Codificar La Palabra "Hola", sería algo así:
Por ejemplo si la palabra hola fuese una contraseña:

Código:

@Echo Off
Set "KingBoo=abcdefghijklmnopqrstuvwxyz1235467890"
Set "Pez=%KingBoo:~7,1%"
Set "Caja=%KingBoo:~14,1%"
Set "Oferta=%KingBoo:~11,1%"
Set "Cien=%KingBoo:~0,1%"

Set /p "clave= Ingrese Clave: "
If ["%clave%"]==["%Pez%%Caja%%Oferta%%Cien%"] (Echo.&Echo Bien!&Pause&Goto :Eof) Else (Echo.&Echo Mal!&Pause&Goto :Eof)

Donde Pez = h
Caja = o
Oferta = l
y Cien = a

Eso Saludos y Espero que a alguien le sea util ^^