// JavaScript Document

function convert_to_unicode_agra(fromctrl, toctrl)
{

var array_one = new Array( "d", "D", "[",  "x", "X", "?", "p", "P", "N", "t",	 "T", ">", "Vª","V", "B", "M+", "Mª", "M", "<+", "<", ".",  

 "r", "R", "F", "n", "/", "è", "u", "U", "iz", "i", "I", "Q", "¶", "c", "C", "H", "e", "E", ";" ,  "j",  "y", "Y", "o", "O",

			"\'",   "\"",  "l",  "L",  "g",  "J", "{", "=", "K", "}",  "#",  ":",  ")",  "Ù",  "|", "G", "Ø", "ê",

"vkS", "vks", "vk", "v", "bZ", "b", "m",  "_",  ",s", "," ,    "्k", "ks",  "kS", "k", "h", "q", "w", "`", "s", "S", "a", "¡", "%",          


"A",  "]",	 "(",  "-",   "\\",  "^",  "*", "&" ) ;  


//	"0", "1", "2", "3", "4", "5","6", "7", "8", "9" )   ( /्k/g ,"ा" "" 


var array_two = new Array( "क", "क्", "ख्", "ग",  "ग्", "घ्", "च", "च्", "छ", "ज", "ज्", "झ", "ट्र", "ट", "ठ", "ड़", "ड्र", "ड", "ढ़", "ढ", "ण्",

  		      "त", "त्", "थ्",  "द", "ध्", "ध्", "न", "न्", "प्र", "प", "प्", "फ", "फ्", "ब", "ब्", "भ्", "म", "म्", "य", "र", "ल", "ल्", "व", "व्", 

			"श्", "ष्",  "स",  "स्", "ह",   	   "श्र", "क्ष्", "त्र", "ज्ञ", "द्व", "रु", "रू", "द्ध", "त्त्", "द्य", "ळ", "क्र", "ट्ट",

        "औ", "ओ", "आ",  "अ",  "ई", "इ",  "उ",  "ऋ",   "ऐ",   "ए",       "", "ो", "ौ", "ा", "ी", "ु", "ू", "ृ", "े", "ै", "ं", "ँ", ":" ,                    

      "।", 	",",	 ";",  ".",  "?",  "\‘",  "\’",  "-"  )  ; 


 //   "०",  "१",  "२",   "३",   "४",  "५", "६",  "७",  "८",  "९" )

var array_one_length = array_one.length ;



if (  (document.getElementById("text_or_html")).selectedIndex == 0 )  // if the input is plain text

{ 

document.getElementById(toctrl).value = "You have chosen SIMPLE TEXT  in Agra font to convert into Unicode. Conversion in progress.."  ;  

var modified_substring = document.getElementById(fromctrl).value  ;

Replace_Symbols( ) ;

var processed_text = modified_substring ;

processed_text = processed_text.replace( /Sanskrit 99/g , "mangal" ) ;   

document.getElementById(toctrl).value = processed_text  ;

}


else    // if input is HTML then

{

document.getElementById(toctrl).value = "You have chosen HTML TEXT  in Agra font to convert into Unicode. Conversion in progress.."  ;  

var remaining_text = document.getElementById(fromctrl).value ;
var processed_text = "" ;  //blank initially

var position_of_current_opening_bracket = 0 ;
var position_of_next_closing_bracket = 1 ;

var idx = remaining_text.indexOf( "<p " )  // search starting from paragraphs. then search for sanskrit 99.
idx = remaining_text.indexOf( "Sanskrit 99" , idx )
var idx2 = 0  //  position_of_current_opening_bracket  ">"
var idx3 = 0  //  position of "/span"
var idx4 = 0  //  postion of "span" only , ie span without "/"

while ( idx != -1 )    // while-01 loop     ;  while "Sanskrit 99"  is found..

{  
idx2 = remaining_text.indexOf( ">" , idx )  
idx3 = remaining_text.indexOf( "/span" , idx2 )
idx4 = remaining_text.indexOf( "span" , idx2 )


while ( idx4 < idx3 )     // this loop to take care of  nested span.
{
idx4 = remaining_text.indexOf( "span" , idx3+4 ) ;
idx3 = remaining_text.indexOf( "/span" , idx3+4 ) ;
}


var modified_substring = remaining_text.substring( idx2 , idx3 ) ;
modified_substring = modified_substring.replace( />/g , ">>" ) ; 
processed_text = processed_text + remaining_text.substring( 0 , idx2 ) + modified_substring + "/span" ;   

remaining_text = remaining_text.substring( idx3 + 5 ) ;  //remaining_text excludes "/span"
idx = remaining_text.indexOf( "Sanskrit 99" ) ;

} //end of outermost while-01


processed_text = processed_text + remaining_text ;




// -----------------------------

//  This section for taking care of paragraphs marked class = MsoBodyText  or class = MsoBodyText

remaining_text = processed_text ;
processed_text = "" ;  //blank initially

var position_of_start_of_paragraph = 0 ;
var position_of_end_of_paragraph = 1 ;

position_of_start_of_paragraph = remaining_text.indexOf("<p ")   ;


while ( position_of_start_of_paragraph != -1 )  //search for <p  in the remaining_text
{

position_of_start_of_paragraph = remaining_text.indexOf("<p ")   ;
position_of_end_of_paragraph = remaining_text.indexOf("/p>")   ;

modified_substring = remaining_text.substring( position_of_start_of_paragraph + 3 ,  position_of_end_of_paragraph ) ;


if ( modified_substring.indexOf( "MsoBodyText" ) != -1 )
{ 
  modified_substring = modified_substring.replace( />/g , ">>" )  ;    // repace all ">" with ">>" in this paragraph

idx = modified_substring.indexOf("font-family")  ;  // in Mybodytext, whereever font-family is found, it means it is roman text.
idx2 = 0 ;  // position of ">>"
idx3 = 0 ;  // position of "/span"
idx4 = 0 ;  // position of "span" only without "/"

while ( idx != -1 )     // again change ">>" to ">" only those which occure immediately after font-family:"Times new Roman"
{

idx2 = modified_substring.indexOf( ">>" , idx ) ;
idx3 = modified_substring.indexOf( "/span" , idx2 ) ;
idx4 = modified_substring.indexOf( "span" , idx2 ) ;


while ( idx4 < idx3 )
 {
   idx4 = modified_substring.indexOf( "span" , idx3+4 )  ;
   idx3 = modified_substring.indexOf( "/span" , idx3+4 )  ;
 }

modified_substring = modified_substring.substring( 0, idx2 ) + (modified_substring.substring( idx2 , idx3 )).replace( />>/g , ">" ) + modified_substring.substring( idx3 ) ; 
idx = modified_substring.indexOf( "font-family" , idx3 ) ;

} // end of while inner loop
} // end of if statement

processed_text = processed_text + remaining_text.substring( 0 , position_of_start_of_paragraph + 3 ) +  modified_substring + "/p>" ;   
remaining_text = remaining_text.substring( position_of_end_of_paragraph + 3 ) ; 
position_of_start_of_paragraph = remaining_text.indexOf("<p ")   ;

} // end of outer while loop

processed_text = processed_text + remaining_text ;





// ------------------------

// Now do actual font conversion  of text occuring between  all the  pairs  >>  and  <

remaining_text = processed_text ;     processed_text = "" ; 

idx2 = remaining_text.indexOf( ">>" )  ;



while ( idx2 != -1 )    // while-01 loop (checks if ">>" is still present

{  

position_of_current_opening_bracket = remaining_text.indexOf( ">>" , idx2 )  
position_of_next_closing_bracket = remaining_text.indexOf( "<" , position_of_current_opening_bracket )

modified_substring = remaining_text.substring( position_of_current_opening_bracket + 2 , position_of_next_closing_bracket ) ;

processed_text = processed_text + remaining_text.substring( 0 , position_of_current_opening_bracket + 1 ) ;   // ">" included by using +1 here
remaining_text = remaining_text.substring( position_of_next_closing_bracket + 1 ) ;  //remaining_text excludes the closing bracket


Replace_Symbols() ;   // call the subroutine and replace the legacy symbols  with corresponding Unicode.


processed_text = processed_text + modified_substring + "<"  ;

idx2 = remaining_text.indexOf( ">>" ) ;


} //end of outermost while-01



processed_text = processed_text + remaining_text ; 



// do follwing conversions which are still left  or  were done incorrectly due to unavoidable reasons.
 
processed_text = processed_text.replace( /Agra/g , "mangal" ) ;   

processed_text = processed_text.replace( /-सजय/g , "ढ" )   ;  
processed_text = processed_text.replace( /-ुनवजय/g , "ष्" )  ;
processed_text = processed_text.replace( /-ंउचय/g , "-" )  ;
processed_text = processed_text.replace( /-हजय/g , "झ" )  ;
processed_text = processed_text.replace( /-दइेचय/g , "/&nbsp" )  ; 
processed_text = processed_text.replace( /ाॅ/g , "ॉ" )  ; 


// now put the processed text in the output box finally.

document.getElementById(toctrl).value = processed_text  


} // end of else loop for HTML case










// --------------------------------------------------


function Replace_Symbols( )

{

//substitute array_two elements in place of corresponding array_one elements

if ( modified_substring != "" )  // if stringto be converted is non-blank then no need of any processing.
{
for ( input_symbol_idx = 0;   input_symbol_idx < array_one_length;    input_symbol_idx++ )

{

idx = 0  ;  // index of the symbol being searched for replacement

while (idx != -1 ) //whie-00
{

modified_substring = modified_substring.replace( array_one[ input_symbol_idx ] , array_two[input_symbol_idx] )
idx = modified_substring.indexOf( array_one[input_symbol_idx] )

} // end of while-00 loop
} // end of for loop


// code for replacing "f" with "ि" (chhotee ee kii maatraa) and correcting its position too.(moving it one position forward)

modified_substring = modified_substring.replace( /£/g , "र्f" ) ;  // at some places  £  is  used eg  in "aarthik".

var position_of_f = modified_substring.indexOf( "f" )  ;

while ( position_of_f != -1 )  //while-02
{
var charecter_next_to_f = modified_substring.charAt( position_of_f + 1 )  ;
var charecter_to_be_replaced = "f" + charecter_next_to_f  ;
modified_substring = modified_substring.replace( charecter_to_be_replaced , charecter_next_to_f + "ि" )  ;
position_of_f = modified_substring.search( /f/ , position_of_f + 1 ) ; // search for f ahead of the current position.

} // end of while-02 loop




// following loop to eliminate 'chhotee ee kee maatraa' on half-letters as a result of above transformation.

var position_of_wrong_ee = modified_substring.indexOf( "ि्" ) 

while ( position_of_wrong_ee != -1 )  //while-03

{
var consonent_next_to_wrong_ee = modified_substring.charAt( position_of_wrong_ee + 2 )
var charecter_to_be_replaced = "ि्" + consonent_next_to_wrong_ee 
modified_substring = modified_substring.replace( charecter_to_be_replaced , "्" + consonent_next_to_wrong_ee + "ि" ) 
position_of_wrong_ee = modified_substring.search( /ि्/ , position_of_wrong_ee + 2 ) // search for 'wrong ee' ahead of the current position. 

} // end of while-03 loop




// Eliminating "Z" and putting 'half - r' at proper position for this.
set_of_matras = "ा ि ी ु ू ृ े ै ो ौ ं : ँ ॅ" 
var position_of_Z = modified_substring.indexOf( "Z" )

while ( position_of_Z > 0 )  // while-04
{
probable_position_of_half_r = position_of_Z - 1 ;
var charecter_at_probable_position_of_half_r = modified_substring.charAt( probable_position_of_half_r )


// trying to find non-maatra position left to current O (ie, half -r).

while ( set_of_matras.match( charecter_at_probable_position_of_half_r ) != null )  // while-05

{
probable_position_of_half_r = probable_position_of_half_r - 1 ;
charecter_at_probable_position_of_half_r = modified_substring.charAt( probable_position_of_half_r ) ;

} // end of while-05


charecter_to_be_replaced = modified_substring.substr ( probable_position_of_half_r , ( position_of_Z - probable_position_of_half_r ) ) ;
new_replacement_string = "र्" + charecter_to_be_replaced ; 
charecter_to_be_replaced = charecter_to_be_replaced + "Z" ;
modified_substring = modified_substring.replace( charecter_to_be_replaced , new_replacement_string ) ;
position_of_Z = modified_substring.indexOf( "Z" ) ;

} // end of while-04

} // end of IF  statement  meant to  supress processing of  blank  string.


} // end of the function  Replace_Symbols


} // end of legacy_to_unicode function