function LetChange( Obj )
    {
        var change=0;
        var Str=Obj.value;
        var StrL=Str.length;
        var StrOut="";

        var c=' ';
        var cOut=' ';
        
        for(var i=0;i<StrL;i++)
        {                  
            c = Str.substring(i,i+1);
            cOut=c;
            
            if (c=='A' || c=='a' || c=='α' || c=='ά') {change=1;cOut='Α';}
            if (c=='B' || c=='b' || c=='β'          ) {change=1;cOut='Β';}
            if (c=='G' || c=='g' || c=='γ'          ) {change=1;cOut='Γ';}
            if (c=='D' || c=='d' || c=='δ'          ) {change=1;cOut='Δ';}
            if (c=='E' || c=='e' || c=='ε' || c=='έ') {change=1;cOut='Ε';}
            if (c=='Z' || c=='z' || c=='ζ'          ) {change=1;cOut='Ζ';}
            if (c=='H' || c=='h' || c=='η' || c=='ή') {change=1;cOut='Η';}
            if (c=='U' || c=='u' || c=='θ'          ) {change=1;cOut='Θ';}
            if (c=='I' || c=='i' || c=='ι' || c=='ί') {change=1;cOut='Ι';}
            if (c=='K' || c=='k' || c=='κ'          ) {change=1;cOut='Κ';}
            if (c=='L' || c=='l' || c=='λ'          ) {change=1;cOut='Λ';}
            if (c=='M' || c=='m' || c=='μ'          ) {change=1;cOut='Μ';}
            if (c=='N' || c=='n' || c=='ν'          ) {change=1;cOut='Ν';}
            if (c=='J' || c=='j' || c=='ξ'          ) {change=1;cOut='Ξ';}
            if (c=='O' || c=='o' || c=='ο' || c=='ό') {change=1;cOut='Ο';}
            if (c=='P' || c=='p' || c=='π'          ) {change=1;cOut='Π';}
            if (c=='R' || c=='r' || c=='ρ'          ) {change=1;cOut='Ρ';}
            if (c=='S' || c=='s' || c=='σ' || c=='ς') {change=1;cOut='Σ';}
            if (c=='W' || c=='w' || c=='σ' || c=='ς') {change=1;cOut='Σ';}
            if (c=='T' || c=='t' || c=='τ'          ) {change=1;cOut='Τ';}
            if (c=='Y' || c=='y' || c=='υ' || c=='ύ') {change=1;cOut='Υ';}
            if (c=='F' || c=='f' || c=='φ'          ) {change=1;cOut='Φ';}
            if (c=='X' || c=='x' || c=='χ'          ) {change=1;cOut='Χ';}
            if (c=='C' || c=='c' || c=='ψ'          ) {change=1;cOut='Ψ';}
            if (c=='V' || c=='v' || c=='ω' || c=='ώ') {change=1;cOut='Ω';}

           StrOut=StrOut+cOut;
        };
               
         if(change==1) Obj.value=StrOut;
        return;
    }