Traduttore Italiano->Pugliese v.1
Zortek
Tradurre in pugliese non e' mai stato cosi' semplice ;)
da "nel mezzo del cammin di nostra vita"
a "nil mezz dal cimmin di nustr vit"
oppure
da "madonna mia di canosa fai che mi vada bene ogni cosa"
a "mudnn mu di conos fai ch mi vad bena ugn cosa"
;))))))))))
Ed ecco il sorgente!
function Italian2Puglies(s:string):string;
var p:integer;
function TraduciParola(s:string):string;
var i,a:integer; c:char;
begin
Result:='';
for i:=1 to length(s) do begin
c:=s[i];
if (c in ['a','A','e','E','i','I','o','O','u','U']) then begin
a:=random(10);
if ((a<4) and (i<>length(s))) or
((a<8) and (length(s)<3))
then Result:=Result+c else
if (a>7) or (i=2) then case random(5) of
0:Result:=Result+'a';
1:Result:=Result+'e';
2:Result:=Result+'i';
3:Result:=Result+'o';
4:Result:=Result+'u';
end;
end else Result:=Result+c;
end;
end;
begin
randomize;
Result:='';
repeat
p:=pos(' ',s);
if p=0 then Result:=Result+TraduciParola(s) else begin
Result:=Result+TraduciParola(copy(s,1,p-1))+' ';
s:=copy(s,p+1,length(s))
end;
until p=0;
end;
Simone P
Simo
"Zortek" <saratog...@ngi.it> ha scritto nel messaggio
news:ba5jbi$plfmu$1...@ID-43509.news.dfncis.de...
Zortek
ahahah!! sarebbe spassosissimo!!! il dialetto veneto mi fa morire!
(trad.in pugliese: "ahhah!! sarebb spassosissm!!! il daalett vant mi fa
moraru!" :DDD)
Ciao, Sandro
schumi83
"Zortek" <saratog...@ngi.it> ha scritto nel messaggio
news:ba5jbi$plfmu$1...@ID-43509.news.dfncis.de...
> Tradurre in pugliese non e' mai stato cosi' semplice ;)
>
> da "nel mezzo del cammin di nostra vita"
> a "nil mezz dal cimmin di nustr vit"
voglio la versione napoletana!!! ;-))
ciao!
Simone P
meglio dell'italiano, completo di accenti vari!!!
per fare una sorta di traduttore di testi come si potrebbe partire??? dai
intavoliamo un bel quesito su questo forum
Simo
"Zortek" <saratog...@ngi.it> ha scritto nel messaggio
news:ba5vub$pu0vf$1...@ID-43509.news.dfncis.de...
maz
news:ciyxa.191857$K35.4...@news2.tin.it...
> we tu riderai, però con gli amici in chat digitiamo in veronese/veneto
> meglio dell'italiano, completo di accenti vari!!!
>
> per fare una sorta di traduttore di testi come si potrebbe partire??? dai
> intavoliamo un bel quesito su questo forum
Oh... non gheto niente da far anco'?!?
laora!!! :-))
maz
al
"Zortek" <saratog...@ngi.it> ha scritto nel messaggio
news:ba5jbi$plfmu$1...@ID-43509.news.dfncis.de...
> Freeware!!
> Tradurre in pugliese non e' mai stato cosi' semplice ;)
>
> da "nel mezzo del cammin di nostra vita"
> a "nil mezz dal cimmin di nustr vit"
>
> oppure
>
> da "madonna mia di canosa fai che mi vada bene ogni cosa"
> a "mudnn mu di conos fai ch mi vad bena ugn cosa"
>
Ancora non l'ho provato, ma soltanto l'idea è stupenda....adesso lo provo (e
lo faccio provare anche a chi lavora con me!)
Gabriele Boccone
"Zortek" <saratog...@ngi.it> ha scritto nel messaggio
news:ba5jbi$plfmu$1...@ID-43509.news.dfncis.de...
> Tradurre in pugliese non e' mai stato cosi' semplice ;)
Vediamo come si potrebbe fare per il genovese...
function Italian2Zeneis(s:string):string;
var p:integer;
function TraduciParola(s:string):string;
var i,a:integer; c:char;
begin
Result:= 'belin ' + s;
end;
begin
randomize;
Result:='';
repeat
p:=pos(' ',s);
if p=0 then Result:=Result+TraduciParola(s) else begin
Result:=Result+TraduciParola(copy(s,1,p-1))+' ';
s:=copy(s,p+1,length(s))
end;
until p=0;
end;
Dovrebbe funzionare:
input - "buongiorno"
output - "belin buongiorno"
input - "cosa stai facendo?"
output - "belin cosa belin stai belin facendo?"
Zortek
> input - "cosa stai facendo?"
> output - "belin cosa belin stai belin facendo?"
LOL!!!!!!
[..]
> Result:=Result+TraduciParola(copy(s,1,p-1))+' ';
> s:=copy(s,p+1,length(s))
> end;
> until p=0;
(*)
> end;
(*) suggerisco di aggiungere un: Result:=Result+'. Ti spacco la faccia!'
LOL!
Ciao, Sandro
antonioc...@gmail.com
Quand parl di cristien ca stann i na vita mia, nn pozz dimenticà du cristien de naplè, ernesti'.
Quedd tin a cape malet, ma quant iev bn e tin nu cor gran u sa sol gesu' crist.
Quann o vist piagn, ma sinti piagn i risat e i mument di incazz propri
sempr a u fian cm nisciun mai.
Quant t voj ben e quant nervus ma fa far, m tutt i vort sta sempre annanz me.
Perché quand na mic tiej o cor bell fatt, edd je da razz bon.. se vid da luntan
Che anam a truvann da a vit Ernesti'? a crianz da felicità.
ca prima o poi ritorn, e nuatr stimm adda,
ad aspettar.
agg' accatet nu diamant e mo su purtet in to cor'.
