/* logo: CViet 8/20/03: mViet10 by SPham [mviet@socal.rr.com]
* Copyright (c) 1999, 2000-2005 MDSS. Inc All Rights Reserved.
* This code is free on noncommercial.
* This copyright notice must remain intact within this code.
*/
var noMViet='email|BoDau'
var MVhnVal=31,iHN=new Array(1,1,1,1,1),hnNew=0
var BoDauMV='1|2|3|4|5|6|7|8|9|'
var MVOff=true,eT=0,i,j,s,S,S2,S3,u,v,tI,tO,vt=0,currElm=null,mvHTML=false;
var Fonoff=123,Ftcc=121,Ftcc1=120;var f=document.all?true:false
var D0='dz|f|mv|',D1='ch|c|b|d|đ|gh|gi|g|h|kh|k|l|m|ngh|ng|nh|n|ph|qu|r|s|th|tr|t|v|x',D2=''
var D=(D0+D1+D2).split('|')
var C='|ng|nh|ch|c|o|u|i|y|m|n|p|t|a'.split('|')
var A='oă|oắ|oằ|oẳ|oẵ|oặ*oa|oá|oà|oả|oã|oạ*uâ|uấ|uầ|uẩ|uẫ|uậ*ua|úa|ùa|ủa|ũa|ụa*oe|oé|oè|oẻ|oẽ|oẹ*uyê|uyế|uyề|uyể|uyễ|uyệ*uye|uyé|uyè|uyẻ|uyẽ|uyẹ*uy|uý|uỳ|uỷ|uỹ|uỵ*uê|uế|uề|uể|uễ|uệ*ue|ué|uè|uẻ|uẽ|uẹ*iê|iế|iề|iể|iễ|iệ*ie|ié|iè|iẻ|iẽ|iẹ*yê|yế|yề|yể|yễ|yệ*ye|yé|yè|yẻ|yẽ|yẹ*ưa|ứa|ừa|ửa|ữa|ựa*ươ|ướ|ườ|ưở|ưỡ|ượ*ưo|ứo|ừo|ửo|ữo|ựo*uơ|uớ|uờ|uở|uỡ|uợ*uô|uố|uồ|uổ|uỗ|uộ*uo|uó|uò|uỏ|uõ|uọ*ă|ắ|ằ|ẳ|ẵ|ặ*â|ấ|ầ|ẩ|ẫ|ậ*a|á|à|ả|ã|ạ*ư|ứ|ừ|ử|ữ|ự*u|ú|ù|ủ|ũ|ụ*ê|ế|ề|ể|ễ|ệ*e|é|è|ẻ|ẽ|ẹ*oo|oó|oò|oỏ|oõ|oọ*ơ|ớ|ờ|ở|ỡ|ợ*ô|ố|ồ|ổ|ỗ|ộ*o|ó|ò|ỏ|õ|ọ*i|í|ì|ỉ|ĩ|ị*y|ý|ỳ|ỷ|ỹ|ỵ*ơ|ớ|ờ|ở|ỡ|ợ'.split('*');
for(i=0;i<A.length; i++) A[i]=A[i].split('|');

var oB= document.getElementsByTagName('textarea'); evB(oB,0)
oB= document.getElementsByTagName('input'); evB(oB,1)
function evB(oB,mtype){if (mtype==0) for( var i=0; i<oB.length ;i++) evBX(oB[i]);
else for( var i=0; i<oB.length ;i++) if((noMViet.indexOf(oB[i].name)==-1||!oB[i].name) && oB[i].type=='text') evBX(oB[i])}
function evBX(X) {if(f){X.onclick=mvCK;X.onkeydown=mvKD; X.onkeypress=mvKP}else{X.addEventListener('keydown', mvKD, false);X.addEventListener('keypress', mvKP, false);}}
function mvCK(e){elm= f?event.srcElement:e.target;key=f?event.keyCode:(e&&e.which)?e.which:0;V(elm)}

function V(x){ready=x.type=='textarea'||x.type=='text';if (ready) {currElm = x;mvHTML=false}}
function mvKP(e){if(MVOff) return;key=f?String.fromCharCode(event.keyCode):String.fromCharCode(e.which);f?pL(event):pLZ(e)}
function mvKD(e){mvCK(e)
checknoTCC(key);elm.focus();}

function checknoTCC(K){ 
	var msg= 'Bộ Dấu '
if(K==Fonoff)MVietOnOffButton()
else if(K==Ftcc && document.getElementById('showpopup')){
   if (document.getElementById('mvframe')){if(f)showpopup.innerHTML='';else document.getElementById('showpopup').innerHTML=''; }
   else {showbox();if(f)showpopup.innerHTML=Kh1+iFr1+mvCC+iFr2+Kh2; else document.getElementById('showpopup').innerHTML=Kh1+iFr1+mvCC+iFr2+Kh2;}}
else if(K==Ftcc1){MVOff=false
var B3=new Array('\'|`|?|~|.|^|+*|(|d|', 's|f|r|x|j|aeo|w|w|d|', '1|2|3|4|5|6|7|8|9|','\'1|`2|?/3|~4|.5j|^6|+*=87|89(|-d|');
if(BoDauMV==B3[0]) {BoDauMV=B3[1];msg+='Telex: '} 
else if(BoDauMV==B3[1]){BoDauMV=B3[2];msg+='VNI: '} 
else if(BoDauMV==B3[2]){BoDauMV=B3[3];msg+='mviệt: '} 
else if (BoDauMV==B3[3]) {BoDauMV=getMV('BoDau','\'1s|`2f|?3r|~4x|5.j|^6aeo|+*7=w|(8w|d9-|');msg+='Sáng Tạo: ' } 
else {BoDauMV=B3[0];msg+='VIQR: '}
window.status= msg+BoDauMV+'      ' + 'Chọn Kiểu Gỏ: F9;  TCC: F10;  On/Off: F12'
}}
var B3=new Array('\'|`|?|~|.|^|+*|(|d|', 's|f|r|x|j|aeo|w|w|d|', '1|2|3|4|5|6|7|8|9|','\'1|`2|?/3|~4|.5j|^6|+*=87|89(|-d|');
var cD=new Array(0,0,0,0),ds=false,mct=5
	
function sD(kL){if(!ds) {for(i=0;i<4;i++) if(B3[i].indexOf(kL)>-1)cD[i]++
for(i=0;i<4;i++)if(cD[i]>mct){BoDauMV=B3[i]; setMV(BoDauMV,'BoDau') 
if (document.getElementById('showpopup'))
	{showbox();if(f)showpopup.innerHTML=Kh1+iFr1+mvCC+iFr2+Kh2;
else document.getElementById('showpopup').innerHTML=Kh1+iFr1+mvCC+iFr2+Kh2}
else if (document.getElementById('showBD'))DisplayTCC()
window.status = "F12=mviet On/Off;  Bộ Dấu: "+BoDauMV+'      ' + 'Chọn Kiểu Gỏ: F9;  TCC: F10'
ds=true;break}}}

function VB(tI,n,value,ord){
var tO='';
if(tI.length>0){tIL=tI.toLowerCase();s=Parsing(tIL,ord)
if(ck(tIL,s,n,ord)==0){
tO=ModifyWord(s,n,value,ord);if(tO!=null){tO=match(tI,tO);if(n==4)eT=0}}
}return tO}


function Parsing(W,ord){
if(W=='gi')return 'g|31,0,i||';else if(W=='gin')return 'g|31,0,i|n|'
var L0='',L1='',L2='',xD=-1
for(i=0;i<D.length;i++)if(W.indexOf(D[i])==0){xD=i;break}
if(xD!=-1){L0=D[xD];W=W.substring(D[xD].length)}
if(W.length!=0)
if (W=='oa'&&vt==1&&ord<6&&ord>0) return L0+'|'+'30,0,o'+'|a|'
else if(W=='uy'&&vt==1&&ord<6&&ord>0){return L0+'|'+'24,0,u'+'|y|'}
else {u=-1;v=-1
for(i=0;i<A.length;i++){for(j=0;j<A[i].length;j++){var iT=W.indexOf(A[i][j])
if(iT==0){u=i;v=j;if(iT>0){if(L0=='')L0=W.substring(0,iT);W=W.substring(iT)}break}}
if(u!=-1)break}if(u!=-1){var base=A[u][0]
W=W.substring(base.length)
if(base=='o'&&vt==1&&W.charAt(0)=='a' && W.length>1) {u=0;W=W.substring(1);base='oa'}
L1=u+','+v+','+base}
if(W.length!=0){xD=-1
for(i=1;i<C.length;i++)if(W.indexOf(C[i])==0){xD=i;break}if(xD!=-1){L2=W.substring(0,C[xD].length);W=W.substring(L2.length)}
}}return L0+'|'+L1+'|'+L2+'|'+W	}



function ModifyWord(s,n,value,ord){eT=0;if(n==4)eT=1
var nW='';s=s.split('|'),c=s[1].split(','),z=parseInt(c[0]),y=c[2]
var c1=parseInt(c[1])
if(s[1]=='') {c=null; y=null}
if (n==5){
if (value=='d'){if(s[0]=='d')s[0]='đ';else if(s[0]=='đ'){s[0]='d',eT=1}else eT=1}
else {var L="0ưu|xuu|1êe|xee|2ơo|xôo|xoo|2ăa|xâa|xaa|1oăa|xoaa|1uâa|xuaa|1yêe|xyee|1uyêe|xuyee|1uêe|xuee|1iêe|xiee|1ươo|xưoo|2uơo|xuôo|xuoo|"
var iL=L.indexOf(y+value+'|'); eT=1;if (iL>-1){if(L.charAt(iL-1)=='x') {z--;eT=0} else z=z+parseInt(L.charAt(iL-1));} 
}
}
else 
switch(n){
case 0:s[0]=value;break
case 3:var id2='aeiouy'.indexOf(value);if(id2>-1)
if(y==null){ord=-1;eT=1}
else if(y.indexOf(value)==-1)if((id2==0&&y.indexOf('ă')==-1&&y.indexOf('â')==-1)
||(id2==1&&y.indexOf('ê')==-1)||(id2==3&&y.indexOf('ơ')==-1&&y.indexOf('ô')==-1)
||(id2==4&&y.indexOf('ư')==-1)||(id2==2||id2==5)){ord=-1;eT=1}
if(ord==8){if(z==0||z==1||z==2||z==20||z==21||z==22)ord=8;
else if(z==3||(z>13&& z<20)||z==21|(z>22&&z<25)||z==30||z==32)ord=7 
else{ord=-1;eT=1}
}
switch(ord){
case 1:case 2:case 3:case 4:case 5:if(ord==parseInt(c[1])){c[1]=0;eT=1}else c[1]=ord;if(ord==2&&z==17)z=15;break
case 9:if(s[0]=='d')s[0]='đ';else if(s[0]=='đ'){s[0]='d',eT=1}else eT=1;break
case 6:
if(z==2){z=3;eT=1}
else if(z==6)z=5;else if(z==8){z=9;eT=1}else if(z==9)z=8
else if(z==10){z=11;eT=1}else if(z==11)z=10
else if(z==12){z=13;eT=1}else if(z==13)z=12;else if(z==3)z=2
else if(z==18){z=19;eT=1}
else if(z==15||z==17||z==19)z=18 
else if(z==20)z=21
else if(z==21){z=22;eT=1}
else if(z==22)z=21;else if(z==25){z=26;eT=1}
else if(z==29){z=30;eT=1}else if(z==28)z=29
else if(z==26){z=25}else if(z==30){z=29}else if(z==33){z=29;eT=1}
else eT=1
break
case 7:
if(z==3)z=14
else if(z==18)z=17;else if(z==15)z=19
else if(z==16||z==17)z=15;else if(z==14){z=3;eT=1}
else if(z==19){if((s[0]=='th'||s[0]=='qu'||s[0]=='kh')&&s[2].length==0&&(c[1]==3||c[1]==4||c[1]==0))z=17;else z=15}
else if(z==23){z=24;eT=1}else if(z==24)z=23;else if(z==29)z=28
else if(z==28){z=30;eT=1}else if(z==30)z=28
else if(z==33){z=30;eT=1}
else eT=1
break
case 8:if(z==1)z=0;else if(z==0){z=1;eT=1}else if(z==20){z=22;eT=1}
else if(z==21)z=20;else if(z==22){z=20}else eT=1;break	
}
break
}

if(s[0]!='c'&&y=='o'&&s[2]=='o')return null
if(n==4&&s[2].length>0&&(z==16||z==17)){z=15}
for(i=0;i<3;i++){if(s[i]!='') 
	if(i!=1) {nW+=s[i]}
    else{u=parseInt(z);v=parseInt(c[1]);
if(nW=='qu'&&A[u][v].substring(0,1)=='u') {nW='q'}
else {
if(nW=='c'&&(A[u][0]=='oa'||A[u][0]=='oă'||A[u][0]=='uâ'||A[u][0]=='oe')) {nW='qu'+A[u][v].substring(1)}
else if(nW=='r'&&(A[u][0]=='oa'||A[u][0]=='oă'||A[u][0]=='uâ'||A[u][0]=='oe')){nW+=A[u][v].substring(1)}
else if(nW=='r'&&(A[u][0]=='uyê'||A[u][0]=='uy'||A[u][0]=='uê')){nW='d'+A[u][v]}
else if((nW=='th'||nW=='q'||nW=='kh')&&s[2]==''&&A[u][0]=='ưo'){nW+=A[u+1][v]}
else nW+=A[u][v]	
}
}}
return nW}


function match( O, N ){
var r=''; var n= O.length;
if (n==0) r=N;
else if (n==1) {if (O==O.toUpperCase()) r=N.toUpperCase(); else r=N;}
else if (n!=N.length){
if (O.charAt(0)==O.toLowerCase().charAt(0)) r=N
else {if (O.charAt(1)==O.toLowerCase().charAt(1)) r=N.toUpperCase().charAt(0)+N.substring(1)
else r=N.toUpperCase();}
}else for (var i=0; i<n; i++)
if (O.charAt(i)==O.toLowerCase().charAt(i)) r += N.charAt(i);
else r += N.toUpperCase().charAt(i);
return r;
}

function ck(tIL,s,n,o){var iR=0
s=s.split('|'),c=s[1].split(',')
c4= f?s[3].length>0:s.length>3
if(c4||(s[1].length==0&& ((s[0]!='d'&& s[0]!='đ')||(o!=9&&key!='d'&&key!='D')))){iR=33;eT=1 
}else if (n==5 && s[2].length>0)  {iR=35;eT=1} // do not let the accross to add accent
else if(n==3&&s[0].length>0&&s[2].length>0&&'tcp'.indexOf(s[2].charAt(0))>-1&&(o==2||o==3||o==4)){iR=34;eT=1}
else { var p=c[2], q=s[2]; var ip="aiouy".indexOf(p), iq="aiouy".indexOf(q);
if (ip>-1 && iq>-1) if ("ai|ao|au|ay|ia|oa|oi|ua|ui|uo|uu|uy|iu|".indexOf(p+q+'|')==-1){iR=34;eT=1} 
}
return iR}

window.status = "F12=mviet On/Off;  Bộ Dấu: "+BoDauMV+'      ' + 'Chọn Kiểu Gỏ: F9;  TCC: F10'