<HTML>
<HEAD><TITLE>MS Mongolian Html Writer</TITLE>
<STYLE TYPE="text/css">
<!--
TEXTAREA {	FONT-SIZE: 14pt; FONT-FAMILY: Mongolian baiti; TEXT-DECORATION: none}	
-->
</STYLE>
</HEAD>
<BODY>
<SCRIPT LANGUAGE="JavaScript">
function fnEnter(textEl)
{
	var pos, preEnt, nextEnt, strMove;
	
  if( window.event.keyCode==13 )
  {
			if (textEl.createTextRange && textEl.caretPos)
			{
				var caretPos = textEl.caretPos;
				caretPos.text += "!@#$%";
			} else if(textEl) 
			{
				textEl.value += "!@#$%";
			} else 
			{
				textEl.value = "!@#$%";
			}
			
			pos = input.message.value.indexOf( "!@#$%" );
			//alert( pos );
			//找到当前pos 往前找到第一个回车或到头了。在这里添加一个回车
			//然后把当前pos往后找到下一个回车，把这些内容添加到第一个回车与添加的回车的之间。
			//然后去掉"!@#$%"
			input.message.value = input.message.value.substr( 0, pos ) + input.message.value.substr( pos + 5 );
			for( preEnt = pos ; preEnt > 0 ; preEnt-- )
			{
				if( input.message.value.charAt(preEnt) == '\n' ) break;
			}
			for( nextEnt = pos + 1 ; nextEnt < input.message.value.length ; nextEnt++ )
			{
				if( input.message.value.charAt(nextEnt) == '\n' ) break;
			}
			// pos 在行首
			if( pos == (preEnt + 1) )
			{
				if( input.message.value.charAt(preEnt) == '\n' ) strMove = "";
				else strMove = input.message.value.substr( pos, nextEnt - pos );
			}
			else			
			{
				if( input.message.value.charAt(nextEnt) == '\n' )	//// 第二行行首
							strMove = input.message.value.substr( pos, nextEnt - pos );
				else
				{
					strMove = input.message.value.substr( pos, nextEnt - pos );
				}
			}
			
			if( pos == preEnt ) 
			{
				input.message.value = input.message.value.substr( 0, preEnt ) + "\n" + strMove
					+ input.message.value.substr( preEnt, pos ) + input.message.value.substr( nextEnt );
			}
			else
			{
				if( input.message.value.charAt(preEnt) == '\n' )	////去掉回车
				{
					if( pos == (preEnt + 1) )
					{
						input.message.value = input.message.value.substr( 0, preEnt )+ "\n\n" + input.message.value.substr( pos);
					}
					else
					{
						input.message.value = input.message.value.substr( 0, preEnt )+ strMove + "\n" 
							+ input.message.value.substr( preEnt + 1, pos - preEnt -1 ) + input.message.value.substr( nextEnt );
					}
				}
				else
				{
					input.message.value = input.message.value.substr( 0, preEnt )+ strMove + "\n" 
						+ input.message.value.substr( preEnt, pos - preEnt ) + input.message.value.substr( nextEnt );
				}
			}
	}
	
	{
	  var i;
	  var str;
	  var Rtn;
	    str = "";
			for( i = 0 ; i < input.message.value.length ; i++ )
			{
			  Rtn = AscToMsMongol(input.message.value.charAt(i));
			  if( Rtn == '\n' ) str = str + "<br>";
			  else str = str + Rtn;
			}
  		showlang.innerHTML = "<DIV style=\"font-size: 20pt;width:480px;height:240px;writing-mode:tb-rl;overflow:auto\"><FONT FACE=\"Mongolian baiti\">" + str + "</FONT><DIV>";
	}
}

function storeCaret(textEl)
{
	if(textEl.createTextRange)
	{
		textEl.caretPos = document.selection.createRange().duplicate();
	}
}
function AscToMsMongol(iKey)
{
  var iRtn;
  switch( iKey )
  {
	case '`': iRtn = '᠍';  break;
	case '-': iRtn = ' ';  break;
	case 'q': iRtn = 'ᠴ';  break;
	case 'w':  iRtn = 'ᠣ';    break;
	case 'e':  iRtn = 'ᠡ';    break;
	case 'r':  iRtn = 'ᠷ';    	break;
	case 't':  iRtn = 'ᠲ';    break;
	case 'y':  iRtn = 'ᠶ';    break;
	case 'u':  iRtn = 'ᠦ';    break;
	case 'i':  iRtn = 'ᠢ';    break;
	case 'o':  iRtn = 'ᠥ';    break;
	case 'p':  iRtn = 'ᠫ';    break;
	case '{':  iRtn = '〈';    break;
	case '}':  iRtn = '〉';    break;
	case '\\':  iRtn = '᠁';    break;
	case 'a':  iRtn = 'ᠠ';    break;
	case 's':  iRtn = 'ᠰ';    break;
	case 'd':  iRtn = 'ᠳ';    break;
	case 'f':  iRtn = 'ᠹ';    break;
	case 'g':  iRtn = 'ᠭ';    break;
	case 'h':  iRtn = 'ᠬ';    break;
	case 'j':  iRtn = 'ᠵ';    	break;
	case 'k':  iRtn = 'ᠺ';    break;
	case 'l':  iRtn = 'ᠯ';    	break;
	case ';':  iRtn = ';';    	break;
	case '\'':  iRtn = '᠋';    	break;
	case 'z':  iRtn = 'ᠽ';    break;
	case 'x':  iRtn = 'ᠱ';    break;
	case 'c':  iRtn = 'ᠼ';    break;
	case 'v':  iRtn = 'ᠤ';    break;
	case 'b':  iRtn = 'ᠪ';    break;
	case 'n':  iRtn = 'ᠨ';    break;
	case 'm':  iRtn = 'ᠮ';    break;
	case ',':  iRtn = '᠂';    break;
	case '.':  iRtn = '᠃';    break;
	case '/':  iRtn = '.';    break;
	case '@': iRtn = '⁈';  break;
	case '#': iRtn = '⁉';  break;
	case '$': iRtn = '—';  break;
	case '&': iRtn = '᠊';  break;
	case '_': iRtn = '᠎';  break;
	case 'W': iRtn = 'ᠸ';  break;
	case 'E': iRtn = 'ᠧ';  break;
	case 'R': iRtn = 'ᠿ';  break;
	case '{': iRtn = '〈';  break;
	case '}': iRtn = '〉';  break;
	case 'H': iRtn = 'ᠾ';  break;
	case 'K': iRtn = 'ᠻ';  break;
	case 'L': iRtn = 'ᡀ';  break;
	case '\"': iRtn = '᠌';  break;
	case 'Z': iRtn = 'ᡁ';  break;
	case 'C': iRtn = 'ᡂ';  break;
	case 'N': iRtn = 'ᠩ';  break;
	case '<': iRtn = '《';  break;
	case '>': iRtn = '》';  break;
	default:  iRtn = iKey;    break;
  }
  return iRtn;
} 

</SCRIPT>	
<form name="input">
<table>
<tr>
<td >
<textarea rows="40" name="message" style="WIDTH: 300px;HEIGHT:240px; word-break: break-all; writing-mode:tb-rl;" tabindex="4" 
	onSelect="javascript: storeCaret(this);" 
	onClick="javascript: storeCaret(this);" 
	onKeyUp="javascript: fnEnter(this);"
	onKeyDown="javascript: storeCaret(this);">mwNg'wl usog biqijo bwlon"e' </textarea>
</td>
<td>
<Div id=showlang style="font-size: 20pt;width:480px;height:240px;">
</Div>
</td>
</tr>
<tr>
	<td colspan="2" align="center">
	<image src=msmkb.jpg></image>
</td>
</tr>
</table>
</FORM>
请在文本框中输入按键，右边将产生竖体蒙文,本软件需要vista 中的蒙文支持.<br>
请到 <a href="http://ganjike.spaces.live.com">BornKing LAB</a> 下载,有问题请到<a href="http://bbs.mglzaluus.com">蒙古家园</a> 电脑版 提出。
</BODY>
</HTML>