[Lua] Cifrado César

Iniciado por Mavis, Julio 13, 2011, 05:42:51 PM

Tema anterior - Siguiente tema

0 Miembros y 1 Visitante están viendo este tema.

Código: lua
--Cifrado César 18/11/10
function Cifrar(cadena,clave)
if tonumber(clave) and tonumber(clave)%1==0 then
local palabra = ""
local separar = {}
for i = 1,string.len(cadena) do
local letra = string.byte(string.lower(cadena),i)
table.insert(separar,letra)
end
for k = 1,#separar do
if separar[k]>=97 and separar[k]<=122 then
if separar[k]+clave>122 then
palabra = palabra..string.char(separar[k]-(26-clave))
else
palabra = palabra..string.char(separar[k]+clave)
end
else
palabra = palabra..string.char(separar[k])
end
end
return palabra
else
return false
end
end

while true do
print(">Texto a cifrar:")
texto = io.read()
print(">Clave:")
llave = io.read()
cifrado = Cifrar(texto,llave)
if cifrado then
print("\n>>"..cifrado.."\n")
else
print("Error, intente de nuevo\n")
end
end


Autor: MatU_MalO

Saludos!