Ci sono dei giochi appartenenti al nostro periodo infantile che per un motivo o per l’altro ci restano nella mente.L’altro giorno mentre camminavo per strada e sentito alcune bambine esprimersi in una maniera al quanto strana; non ci ho messo molto per capire che parlavano tra loro in un particolare alfabeto detto farfallino.
Ascoltare le bambine mi ha fatto venire in mente un piccolo dubbio: è possibile creare un traduttore che mi permetta di passare dall’italiano al farfallino e dal farfallino all’italiano? Diciamo che il traduttore no l’ho creato ma mi sono preso la briga di creare due funzioni per passare da una a l’altra codifica. Ovviamente ho scelto Gambas come linguaggio per via della rapidità con la quale si può scrivere il codice.
Dopo varie prove sono arrivato alla stesura delle due funzioni che svolgessero il lavoro che avevo il bisogno che svolgesse. Il lavoro si è dimostrato molto più semplice di quanto pensassi e ora analizziamo il codice delle funzioni.
DA ITALIANO A FARFALLINO
PUBLIC FUNCTION farfallino(parola AS String) AS String
DIM temp_st AS String
DIM ritorno_st AS String
temp_st = parola
ritorno_st = Replace(temp_st, "a", "afa")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "e", "efe")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "i", "ifi")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "o", "ofo")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "u", "ufu")
RETURN ritorno_st
END
Come si può vedere il codice è molto semplice e si basa sulla sostituzione delle vocali con l’equivalente struttura farfallina. La funzione infatti accetta una parola come argomento e restituisce una stringa. La parola viene copiata in una variabile stringa nella quale viene di volta in volta cercata e sostituita la vocale. Da notare che dopo ogni sostituzione la nuova stringa viene salvata in quella in cui si cercano le vocali…questo perchè, se ciò non venisse fatto, verrebbe vista e sostituita solo la vocale u, essendo l’ultima ed essere visualizzata.
DA FARFALLINO A ITALIANO
PUBLIC FUNCTION sfarfallino(parola AS String) AS String
DIM temp_st AS String
DIM ritorno_st AS String
temp_st = parola
ritorno_st = Replace(temp_st, "afa", "a")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "efe", "e")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "ifi", "i")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "ofo", "o")
temp_st = ritorno_st
ritorno_st = Replace(temp_st, "ufu", "u")
RETURN ritorno_st
END
La funzione che svolge il lavoro inverso della funzione farfallino (fantasiosamente chiamata sfarfallino :-D) si basa sullo stesso principio della funzione precedente. Si cerca nella parola passata alla funzione la componente farfallina e la si sostituisce con la semplice vocale. Ad ogni sostituzione la parola in cui cercare viene aggiornata altrimenti si presenterebbe l’errore spiegato prima.
Da notare che a differenza della prima funzione, che è sempre corretta e non presenta mai errori, la seconda può cadere in false traduzioni. Basti pensare alla parola afa ad esempio. Essa verrà riscritta come una semplice a nonostante il suo senso sia giusto. Pertanto se si volesse rendere la funzione migliore si dovrebbero scrivere delle eccezioni, in base alla lingua in uso, sulla conversione delle parole.
Come sempre ho implementato le funzioni in una classe Gambas da poter implementare nei proprio progetti. Trovare la classe nella colonna a destra tra i Download col nome di Gambas-classe-stringa.
IMPORTARE LA CLASSE
