string[] numbers = Regex.Split(texto, @"\D+");
            foreach (string value in numbers)

// Esta función podría llamarse al principio, cuando se crea la clase, que alberga el código (se genera una sola vez, se invoca una sola vez).
Funcion CrearTablasDeTraduccion
    //Primero se hace una equivalencia con el ASCII. 
    Bucle K desde 0 a 255
        AlfabetoToLeetSpeak(k) = k
        AlfabetoFromLeetSpeak(k)= k
    Fin bucle

    //Luego se hacen los cambios que proceden (manualmente), yo pongo el cambio para 3 caracteres, tu completa el cambio para los 7 restantes...
    AlfabetoToLeetSpeak(111)=48 ' o =0
    AlfabetoToLeetSpeak(79)=48 ' O = 0

    AlfabetoToLeetSpeak(105)=49 ' i =1
    AlfabetoToLeetSpeak(73)=49 ' I = 1

    AlfabetoToLeetSpeak(122)=50 ' z =2
    AlfabetoToLeetSpeak(90)=50 ' Z = 2
   .... resto de letras asignarles desde 3-9

    // Y la traducción de vuelta, es intercambiar los valores previos, elegimos números por mayúsculas, es imposible regresar de números a myúsculas y minúsculas al mismo tiempo, tal como estaban en origen, hay que decantarse y lo hacemos por mayúsculas, porque se parecne más a los números que las minúsculas.
    AlfabetoFromLeetSpeak(48)=79 ' 0 =O

    AlfabetoFromLeetSpeak(49)=73 ' 1 = I

    AlfabetoFromLeetSpeak(50)=90 ' 2 =Z
   .... resto de letras asignarles desde 3-9
Fin funcion

// Una enumeración para señalar la dirección de traduccion (podría ser remplazado por un valor buleano, eso al gusto, lo dejo así por más claridad).
Enumeracion TipoDeTraduccion
    TraducirALeetSpeak = 0
    TraducirDeLeetSpeak = 1
Fin enumeracion

Funcion Traducir(Texto tipo String, Alfabeto tipo TipoDeTraduccion) Devuelve String // o un array de bytes, según se precise. 
     ArrayTexto() tipo Array
     ArrayTexto= Convertir(Texto a bytearray)

     Si Alfabeto = TraducirALeetspeak entonces
         Bucle k desde 0 a ArrayTexto.Longitud
             ArrayTexto(k)= AlfabetoToLeetSpeak(ArrayTexto(k))
         fin bucle
     si no // Tradicr desde LeetSpeak
          Bucle k desde 0 a ArrayTexto.Longitud
             ArrayTexto(k)= AlfabetoFromLeetSpeak(ArrayTexto(k))
         fin bucle
      fin si
      Devolver Convertir(ArrayTexto a String) //no es absolutamente necesario La conversión) si se va a guardar a fichero, al fichero se escriben bytes, poco le importa que tu lo consideres string, char o bytes...
fin funcion

Funcion Traducir(FicheroOrigen, otrosparametros...)
    Si ficheroOrigen no esta vacío ni presenta otros problemas.
        Abrir fichero de escritura: FileWrite
        Abrir fichero de lectura: FileRead
        Por cada Linea en FileRead: LeerLinea
             LineaWrite = Traducir(Linea, DireccionTraduccion)
             FileWrite.Append(LineaWrite) 
        fin Cada
        Cerrar FileWrite
    si no
       advertir al usuario: "el fichero introducido, tiene tal o cual problema"
    fin si
fin funcion