<html>
<head> <B><Font color = darkblue><CENTER> सहारा <=> यूनिकोड <=> सहारा फ़ोण्ट परिवर्तित्र (09-11-2009 11:30) </font></B></title><br>
<Font color = blue>Last update: 13-11-2009 22:45</font>

<script type="text/javascript">

function convert_to_unicode()
{

var array_one = new Array("·",
"Q","`","ä",

"A","•","H","Y","†","‹","—","°","Î","Õ","Ú","Û","æ","ó",
"ú","ü","ÿ",
"E","G","]","‡","‰","£","¤","§","¨","®","¿","Ê","Ë","Ù",
"á","â","è","ô","õ","ù","û","Œ",

"„","s","S","î","x","È","X","Z",
"…","v","V","©","c","C","|",
"U","I","O","P","Ç","J",
"¬","f","Ò","F","r","ø","R","ï","e",
"Ø","w","Ó","W","¥","q","Á","z","ç","a",

"÷","u","j","Ï","M","ñ","m","“","‚","y","˜","«","K","›","L","µ",
"t","ë","o",
"´","Ü",">",

"[","T","$","B","N","^","<",

"ß","å","ò","k","h","Ì","b","ˆ","n","{","Ã","l","p","¸","i","}","~",":","\"","&","d","p",
"D","\\",

"Ö","¯","ì","Ä","É","–","Æ","Ÿ","‘","±",

"#","@","{","ƒ","¢","ª","¶","À","Ô",
"»","œ",
"्ा","्ो","्ौ","अो","अा","आै","आे","ाो","ाॅ","ॅा","ाे","एे",
"ंु","ेे","अै","ाे","अे","ंा","अॅ","ाै","ैा","ंृ",
"ँा","ँू","ेा","ंे","ाें","ॅं","ंॅ"," ः","ंू","््","ý",
"क़","ख़","ग़","ज़","ड़","ढ़","फ़")  // two-byte varnas     //  Remove typing mistakes in the original file

var array_two = new Array("ý",
"ॐ","।","Rs",

"ज्ञ","क्ष्","क्ष","त्त","द्य","ष्ठ","त्त्","द्म","ह्म","द्व","श्न","द्ध","ट्ठ","द्द",
"द्भ","ज्ञ्","द्ब",
"श्र","त्र","्र", "क्र","हृ","स्र","ब्र","फ्र","रू","त्र्","ध्र","व्र","ज्र","रु",
"क्र","ख्र","ह्र","त्र","भ्र","द्र","म्र","थ्र",

"क्","क","ख","ग्","ग","घ्","घ","ङ",
"च्","च","छ","ज्","ज","झ","ञ्",
"ट","ठ","ड","ढ","ण्","ण",
"त्","त","थ्","थ","द","ध्","ध","न्","न",
"प्","प","फ्","फ","ब्","ब","भ्","भ","म्","म",

"य्","य","र","ळ्","ळ","ल्","ल","ल","व्","व","श्","श्","श","ष्","ष","स्",
"स","ह्","ह",
"ड़","ढ़","्य",

"अ","इ","ई","उ","ऊ","ऋ","ए",

"ीं","ें","ैं","ा","ी","ु","ु","ू","ू","ृ","े","े","ै","ै","ं","ऽ",":","ः","ॅ","ँ","्","ै",
"्","़",

"०","१","२","३","४","५","६","७","८","९",

"’","‘","ऽ","]","[","-","-","÷","्र",
"'ं","'े",
"","े","ै","ओ","आ","औ","ओ","ो","ॉ","ॉ","ो","ऐ",
"ुं","े","अ‍ै","ो","अ‍े","ां","अ‍ॅ","ौ","ौ","ृं",
"ाँ","ूँ","ो","ें","ों","ँ","ँ"," :","ूं","्","ख्",
"क़","ख़","ग़","ज़","ड़","ढ़","फ़")  //one-byte varnas     // Remove typing mistakes in the original file 

//**************************************************************************************
//
// Punctuation marks incorporated at the end
//
//**************************************************************************************
// The following two characters are to be replaced through proper checking of locations:
//**************************************************************************************
//   "g",
//   "ि",
//
//   "'",
// "र्" (reph) 
//**************************************************************************************

    var array_one_length = array_one.length ;

    var modified_substring = document.getElementById("legacy_text").value  ;
   // alert(" array_one_length = "+array_one_length);
   // alert("1. modified_substring = "+modified_substring );


    Replace_Symbols( ) ;

    processed_text = modified_substring ;
     
    document.getElementById("unicode_text").value = processed_text  ;

// --------------------------------------------------


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++ )

{ 

//  alert(" modified substring = "+modified_substring)

//***********************************************************
// if (input_symbol_idx==106) 
//  { alert(" input_symbol_idx = "+input_symbol_idx);
//    alert(" input_symbol_idx = "+input_symbol_idx)
//; alert(" character =" + modified_substring.CharCodeAt(input_symbol_idx))
//     alert(" character = "+modified_string.fromCharCode(input_symbol_idx)) 
//   }
// if (input_symbol_idx == 107) 
//   { alert(" input_symbol_idx = "+input_symbol_idx);
//    alert(" character = ",+string.fromCharCode(input_symbol_idx)) 
//   }
//***********************************************************
idx = 0  ;  // index of the symbol being searched for replacement

while (idx != -1 ) //while-00
{

modified_substring = modified_substring.replace( array_one[ input_symbol_idx ] , array_two[input_symbol_idx] )
 //  alert("16. modified_substring = "+modified_substring );

idx = modified_substring.indexOf( array_one[input_symbol_idx] )

} // end of while-00 loop
// alert(" end of while loop")
} // end of for loop
// alert(" end of for loop")

// alert(" modified substring2 = "+modified_substring)
//*******************************************************
var position_of_i = modified_substring.indexOf( "g" )

while ( position_of_i != -1 )  //while-02
{
var charecter_next_to_i = modified_substring.charAt( position_of_i + 1 )
var charecter_to_be_replaced = "g" + charecter_next_to_i
modified_substring = modified_substring.replace( charecter_to_be_replaced , charecter_next_to_i + "ि" ) 
position_of_i = modified_substring.search( /g/ , position_of_i + 1 ) // search for i ahead of the current position.

} // end of while-02 loop

//**********************************************************************************
// End of Code for Replacing four Special glyphs
//**********************************************************************************

// 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

// 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 + 3 )
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 + 3 ) // search for 'wrong ee' ahead of the current position. 

} // end of while-03 loop


// Eliminating reph (straight single quote)and putting 'half - r' at proper position for this.
set_of_matras = "ा ि ी ु ू ृ े ै ो ौ ं : ँ ॅ" 
var position_of_R = modified_substring.indexOf( "'" )

while ( position_of_R > 0 )  // while-04
{
probable_position_of_half_r = position_of_R - 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_R - probable_position_of_half_r ) ) ;
new_replacement_string = "र्" + charecter_to_be_replaced ; 
charecter_to_be_replaced = charecter_to_be_replaced + "'" ;
modified_substring = modified_substring.replace( charecter_to_be_replaced , new_replacement_string ) ;
position_of_R = modified_substring.indexOf( "'" ) ;

} // end of while-04

//**********punctuation marks ****************
//    "¡","£","¤","¥","²","³","´","µ","¹","À","Á","Â","Ã","Ä","Å","Æ","Ç","È","Ê","Ñ","Ò","Õ",
// "{","}","[","]","!","(",")","*","-","/",":",";","<","=",">","?","@","|",",","!","\\","√","-",

//modified_substring = modified_substring.replace( /¡/g , "{" )   ;  
//modified_substring = modified_substring.replace( /£/g , "}" )   ;  
//modified_substring = modified_substring.replace( /¤/g , "[" )   ;  
//modified_substring = modified_substring.replace( /¥/g , "]" )   ;  
//modified_substring = modified_substring.replace( /²/g , "!" )   ;  
//modified_substring = modified_substring.replace( /³/g , "(" )   ;  
//modified_substring = modified_substring.replace( /´/g , ")" )   ;  
//modified_substring = modified_substring.replace( /µ/g , "*" )   ;  
//modified_substring = modified_substring.replace( /Æ/g , "?" )   ;  

} // end of IF  statement  meant to  supress processing of  blank  string.

} // end of the function  Replace_Symbols

} // end of convert_to_unicode function


//*******************************************************************************
function convert_to_Sahara()
{
var array_one = new Array(
"क़","ख़","ग़","ज़","ड़","ढ़","फ़",  // two-byte varnas
"ॐ","।","Rs",

"ज्ञ","क्ष्","क्ष","त्त","द्य","ष्ठ","त्त्","द्म","ह्म","द्व","श्न","द्ध","ट्ठ","द्द",
"द्भ","ज्ञ्","द्ब",
"श्र","त्र","क्र","हृ","स्र","ब्र","फ्र","रू","त्र्","ध्र","व्र","ज्र","रु",
"क्र","ख्र","ह्र","त्र","भ्र","द्र","म्र","थ्र",
"छ्र","ट्र","ठ्र","ड्र","ढ्र","्र",

"क्","क","ख","ग्","ग","घ्","घ","ङ",
"च्","च","छ","ज्","ज","झ","ञ्",
"ट","ठ","ड","ढ","ण्","ण",
"त्","त","थ्","थ","द","ध्","ध","न्","न",
"प्","प","फ्","फ","ब्","ब","भ्","भ","म्","म",

"य्","य","र","ळ्","ळ","ल्","ल","ल","व्","व","श्","श्","श","ष्","ष","स्",
"स","ह्","ह",
"ड़","ढ़","्य",

"औ","ओ","ऑ","आ","अ","इ","ई","उ","ऊ","ऋ","ऐ","ए",

"ॉ","ीं","ें","ैं","ौ","ो","ा","ी","ु","ु","ू","ू","ृ","े","े","ै","ै","ं","ऽ","ः","ॅ","ँ","्","ै",
"्","़",

"०","१","२","३","४","५","६","७","८","९")


//"ौ","ो","ॉ","ा","ी","ु","ू","ृ","े","ै","ँ","ं",":","ः","्","ॅ","ऽ","़")

var array_two = new Array( 
"क़","ख़","ग़","ज़","ड़","ढ़","फ़",  //one-byte varnas
"Q","`","ä",

"A","•","H","Y","†","‹","—","°","Î","Õ","Ú","Û","æ","ó",
"ú","ü","ÿ",
"E","G","‡","‰","£","¤","§","¨","®","¿","Ê","Ë","Ù", 
"á","â","è","ô","õ","ù","û","Œ",
"V]","U]","I]","O]","P]","्Ô",

"„","s","S","î","x","È","X","Z",
"…","v","V","©","c","C","|",
"U","I","O","P","Ç","J",
"¬","f","Ò","F","r","ø","R","ï","e",
"Ø","w","Ó","W","¥","q","Á","z","ç","a",

"÷","u","j","Ï","M","ñ","m","“","‚","y","˜","«","K","›","L","µ",  //"]","Ô",
"t","ë","o",
"´","Ü",">",

"[kp","[kl","[k\"","[k","[","T","$","B","N","^","<l","<",

"k\"","ß","å","ò","kp","kl","k","h","b","Ì","n","ˆ","{","l","Ã","p","¸","i","}",":","\"","&","d","p",
"D","\\",

"Ö","¯","ì","Ä","É","–","Æ","Ÿ","‘","±")

//"AaO","Aao","Aa^","Aa","A","š","[-","[","]","}","?",";","eo", "e",     

//"aO","ao","a^","a","I","u","U","R","o","O","Ð","M","Á",":","\\","^","|",",")
  
//************************************************************
//Put "Enter chunk size:" line before "<textarea name= ..." if required to be used.    
//************************************************************
//Enter chunk size: <input type="text" name="chunksize" value="6000" size="7" maxsize="7" style="text-align:right"><br/><br/>
//************************************************************
// The following two characters are to be replaced through proper checking of locations:

//   "g",
//   "ि",
//
//   "'",
// "र्" (reph) 


    var array_one_length = array_one.length ;

    var modified_substring = document.getElementById("unicode_text").value  ;

    Replace_Symbols( ) ;

    processed_text = modified_substring ;

    document.getElementById("legacy_text").value = processed_text  ;


//**************************************************

function Replace_Symbols( )
   {

    // if string to be converted is non-blank then no need of any processing.
    if (modified_substring != "" )  
       {

// first replace the two-byte nukta_varNa with corresponding one-byte nukta varNas.

// modified_substring = modified_substring.replace ( /क़/ , "क़" )  ; 
// modified_substring = modified_substring.replace ( /ख़‌/g , "ख़" )  ;
// modified_substring = modified_substring.replace ( /ग़/g , "ग़" )  ;
// modified_substring = modified_substring.replace ( /ज़/g , "ज़" )  ;
// modified_substring = modified_substring.replace ( /ड़/g , "ड़" )  ;
// modified_substring = modified_substring.replace ( /ढ़/g , "ढ़" )  ;
// modified_substring = modified_substring.replace ( /ऩ/g , "ऩ" )  ;
// modified_substring = modified_substring.replace ( /फ़/g , "फ़" )  ;
// modified_substring = modified_substring.replace ( /य़/g , "य़" )  ;
// modified_substring = modified_substring.replace ( /ऱ/g , "ऱ" )  ;


        // code for replacing "ि" (chhotee ee kii maatraa) with "g"  and correcting its position too.
        
        var position_of_f = modified_substring.indexOf( "ि" )  ;
         while ( position_of_f != -1 )  //while-02
           {
            var character_left_to_f = modified_substring.charAt( position_of_f - 1 )  ;
            modified_substring = modified_substring.replace( character_left_to_f + "ि" ,  "g" + character_left_to_f )  ;

            position_of_f = position_of_f - 1  ;

            while (( modified_substring.charAt( position_of_f - 1 ) == "्" )  &  ( position_of_f != 0  ) )
               {
                var string_to_be_replaced = modified_substring.charAt( position_of_f - 2 ) + "्"  ;
                  modified_substring = modified_substring.replace( string_to_be_replaced + "g", "g" + string_to_be_replaced ) ;

                position_of_f = position_of_f - 2  ;
               }
            position_of_f = modified_substring.search( /ि/ , position_of_f + 1 ) ; // search for f ahead of the current position.

           } // end of while-02 loop
   //************************************************************     
   //     modified_substring = modified_substring.replace( /fर्/g , "£"  )  ;
   //************************************************************     
        // Eliminating "र्" and putting  '  at proper position for this.

       set_of_matras = "ािीुूृेैोौं:ँॅ" 

modified_substring += '  '    ;  // add two spaces after the string to avoid UNDEFINED char in the following code.
//       modified_substring = modified_substring.replace ( /-/g , "¹" )  ; 
//       modified_substring = modified_substring.replace ( /श्र्/g , "E" )  ; 
       var space = " "
       var position_of_half_R = modified_substring.indexOf( "र्" ) ;

//************************************************************************************
   while ( position_of_half_R > 0  )  // while-03
   {
    // "र्"  is two bytes long
    var probable_position_of_Z = position_of_half_R + 2   ;  
    var character_at_probable_position_of_Z = modified_substring.charAt( probable_position_of_Z )

//  alert(" 3. probable_position_of_Z = "+probable_position_of_Z );
//  alert(" 4. character_at_probable_position_of_Z = "+character_at_probable_position_of_Z );

    // trying to find non-maatra position right to probable_position_of_Z .

    while( set_of_matras.match( character_at_probable_position_of_Z ) != null ) // while-04 
    {
     probable_position_of_Z = probable_position_of_Z + 1 ;
     character_at_probable_position_of_Z = modified_substring.charAt( probable_position_of_Z ) ;

//   alert(" 5. probable_position_of_Z = "+probable_position_of_Z );
//   alert(" 6. character_at_probable_position_of_Z = "+character_at_probable_position_of_Z );
    } // end of while-04
//************************************************************
// check if the next character is a halant
//************************************************************
    var right_to_position_of_Z = probable_position_of_Z + 1 ;
//  alert(" 7. right_to_position_of_Z = "+right_to_position_of_Z );

    if (right_to_position_of_Z > 0)  // if-03
    { var character_right_to_position_of_Z = modified_substring.charAt( right_to_position_of_Z )
//    alert(" 8. character_right_to_position_of_Z = "+character_right_to_position_of_Z );

      while ("्".match( character_right_to_position_of_Z ) != null ) // while-05
      {  
//       halant found, move to next character
         probable_position_of_Z = right_to_position_of_Z + 1 ;
         character_at_probable_position_of_Z = modified_substring.charAt( probable_position_of_Z ) ;

//       alert(" 9. probable_position_of_Z = "+probable_position_of_Z );
//       alert("10. character_at_probable_position_of_Z = "+character_at_probable_position_of_Z );
       
         right_to_position_of_Z = probable_position_of_Z + 1 ;
         character_right_to_position_of_Z = modified_substring.charAt( right_to_position_of_Z )

//       alert("11. right_to_position_of_Z = "+right_to_position_of_Z );
//       alert("12. character_right_to_position_of_Z = "+character_right_to_position_of_Z );
      } // end of while-05
   } // end of if-03
//************************************************************

       string_to_be_replaced = modified_substring.substr ( position_of_half_R + 2,(probable_position_of_Z - position_of_half_R)-1) ;
//************************************************************
//     check if character_right_to_position_of_Z is a space
//       if (space.match(character_right_to_position_of_Z) != null) 
//       {
//          string_to_be_replaced = string_to_be_replaced.substr(0,string_to_be_replaced.length - 1)
//        alert("13. string_to_be_replaced = "+string_to_be_replaced );
//        alert("14. string_to_be_replaced.length ="+string_to_be_replaced.length);
//       }
       modified_substring = modified_substring.replace( "र्" + string_to_be_replaced, string_to_be_replaced + "'" ) ;

//     alert("15. string_to_be_replaced = "+string_to_be_replaced );
//     alert("16. modified_substring = "+modified_substring );
       position_of_half_R = modified_substring.indexOf( "र्" ) ;
//      alert("17. position_of_half_R = "+position_of_half_R )

   } // end of while-03
//***********************************************************

modified_substring = modified_substring.substr ( 0 , modified_substring.length - 2 )  ;


        //substitute array_two elements in place of corresponding array_one elements

        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

        } // end of IF  statement  meant to  supress processing of  blank  string.
         modified_substring = modified_substring.replace ( /'h/g , "h'" ) 
//       modified_substring = modified_substring.replace ( /-a/g , "a-" )  
//       modified_substring = modified_substring.replace ( /-I/g , "I-" )  
//       modified_substring = modified_substring.replace ( /\ -/g , "\-" )
//       modified_substring = modified_substring.replace ( /ki,/g , "ik," ) 
//       modified_substring = modified_substring.replace ( /Ki,/g , "iÓ" ) 
//       modified_substring = modified_substring.replace ( /gai,/g , "iga," ) 
//       modified_substring = modified_substring.replace ( /fi,/g , "iÔ" ) 
//       modified_substring = modified_substring.replace ( /Di,/g , "iD," ) 
//       modified_substring = modified_substring.replace ( /Zi,/g , "iZ," ) 
//       modified_substring = modified_substring.replace ( /jai,/g , "ija," ) 
//       modified_substring = modified_substring.replace ( /nai,/g , "ina," ) 
//       modified_substring = modified_substring.replace ( /ri,/g , "ir," ) 
//       modified_substring = modified_substring.replace ( /Li,/g , "iL," ) 


    } // end of the function  Replace_Symbols( )

  } // end of convert_to_Sahara function


</script>
</head>

<!-- ----------------------------------------------------------------------------------
      body of the HTML starts here. one text box is provided each for input and output. 
-->


<body>
<form name="form1">
<b>Sahara font text-box </b><br/>
<HTML><BODY bgColor='yellow'><CENTER>

<textarea name="TextToConvert" id="legacy_text" cols="92" rows="6"></textarea> <br>

<div align="middle">
<CENTER><input  type="button" name="converter" id="converter" value=" Convert to Unicode >> " onClick="convert_to_unicode();" accesskey="c" title="शॉर्टकट alt+c"> 
</div>  <br>

<b><CENTER>Unicode text-box</b> <br/>
<textarea name="ConvertedText" id="unicode_text" cols="92" rows="6"></textarea>
<br />

<div align="middle">
<input  type="button" id="converter" name="converter" value=" Convert to Sahara >> " onClick="convert_to_Sahara();" accesskey="c" 
</div>

</form>
</body>

</html>