cadena_base=""  // Definimos algunas variables que utilizaremos
long=0
caracter=""
cadena_final=""

cadena_base=get_string("Dime lo que quieras que yo te lo traduzco:","")
long=string_length(cadena_base)  //  Tomamos la longitud de la cadena
for(i=1;i<=long;i=i+1)  // Inspeccionamos cada caracter de la cadena
{
caracter=string_ord_at(cadena_base,i)  // Número del caracter
if caracter=32{cadena_final=cadena_final+string_char_at(cadena_base,i)}  //  Si es un espacio, nos interesa, lo añadimos
if caracter>47 and caracter<58{cadena_final=cadena_final+string_char_at(cadena_base,i)}  //  Si es un número, nos interesa, la añadimos
if caracter>64 and caracter<91{cadena_final=cadena_final+string_char_at(cadena_base,i)}  //  Si es letra mayúscula, nos interesa, lo añadimos
if caracter>96 and caracter<123{cadena_final=cadena_final+string_char_at(cadena_base,i)}  //  Si es letra minúscula, nos interesa, la añadimos
}
show_message("La cadena ya traducida es: "+cadena_final)