function  Upperchr( pro1 )
{

        var line0=0;
        var str=pro1.value;
        var line1=str.length;
        var line2="";
        var in1=' ';
        var rez1=' ';
        for(var ee=0;ee<line1;ee++)
{

                  
            in1 = str.substring(ee,ee+1);
            rez1=in1;
            
            if (in1=='A' || in1=='a') {line0=1;rez1='A';}
            if (in1=='B' || in1=='b') {line0=1;rez1='B';}
            if (in1=='C' || in1=='c') {line0=1;rez1='C';}
            if (in1=='D' || in1=='d') {line0=1;rez1='D';}
            if (in1=='E' || in1=='e') {line0=1;rez1='E';}
            if (in1=='F' || in1=='f') {line0=1;rez1='F';}
            if (in1=='G' || in1=='g') {line0=1;rez1='G';}
            if (in1=='H' || in1=='h') {line0=1;rez1='H';}
            if (in1=='I' || in1=='i') {line0=1;rez1='I';}
            if (in1=='J' || in1=='j') {line0=1;rez1='J';}
            if (in1=='K' || in1=='k') {line0=1;rez1='K';}
            if (in1=='L' || in1=='l') {line0=1;rez1='L';}
            if (in1=='M' || in1=='m') {line0=1;rez1='M';}
            if (in1=='N' || in1=='n') {line0=1;rez1='N';}
            if (in1=='O' || in1=='o') {line0=1;rez1='O';}
            if (in1=='P' || in1=='p') {line0=1;rez1='P';}
            if (in1=='Q' || in1=='q') {line0=1;rez1='Q';}
            if (in1=='R' || in1=='r') {line0=1;rez1='R';}
            if (in1=='S' || in1=='s') {line0=1;rez1='S';}
            if (in1=='T' || in1=='t') {line0=1;rez1='T';}
            if (in1=='U' || in1=='u') {line0=1;rez1='U';}
            if (in1=='V' || in1=='v') {line0=1;rez1='V';}
	    if (in1=='W' || in1=='w') {line0=1;rez1='W';}
            if (in1=='X' || in1=='x') {line0=1;rez1='X';}
            if (in1=='Y' || in1=='y') {line0=1;rez1='Y';}
            if (in1=='Z' || in1=='z') {line0=1;rez1='Z';}


            if (in1=='α' || in1=='ά') {line0=1;rez1='Α';}
            if (in1=='β'            ) {line0=1;rez1='Β';}
            if (in1=='γ'            ) {line0=1;rez1='Γ';}
            if (in1=='δ'            ) {line0=1;rez1='Δ';}
            if (in1=='ε' || in1=='έ') {line0=1;rez1='Ε';}
            if (in1=='ζ'            ) {line0=1;rez1='Ζ';}
            if (in1=='η' || in1=='ή') {line0=1;rez1='Η';}
            if (in1=='θ'            ) {line0=1;rez1='Θ';}
            if (in1=='ι' || in1=='ί') {line0=1;rez1='Ι';}
            if (in1=='κ'            ) {line0=1;rez1='Κ';}
            if (in1=='λ'            ) {line0=1;rez1='Λ';}
            if (in1=='μ'            ) {line0=1;rez1='Μ';}
            if (in1=='ν'            ) {line0=1;rez1='Ν';}
            if (in1=='ξ'            ) {line0=1;rez1='Ξ';}
            if (in1=='ο' || in1=='ό') {line0=1;rez1='Ο';}
            if (in1=='π'            ) {line0=1;rez1='Π';}
            if (in1=='ρ'            ) {line0=1;rez1='Ρ';}
            if (in1=='σ' || in1=='ς') {line0=1;rez1='Σ';}
            if (in1=='τ'            ) {line0=1;rez1='Τ';}
            if (in1=='υ' || in1=='ύ') {line0=1;rez1='Υ';}
            if (in1=='φ'            ) {line0=1;rez1='Φ';}		    
            if (in1=='χ'            ) {line0=1;rez1='Χ';}
            if (in1=='ψ'            ) {line0=1;rez1='Ψ';}
            if (in1=='ω' || in1=='ώ') {line0=1;rez1='Ω';}






           line2=line2+rez1;
 

       };
               
         if(line0==1) pro1.value=line2;
        return;
    }