Rstr='';
RPL='';


function Rclick(){
 window.event.returnValue=false;
 Rmenu.innerHTML="<table cellpadding=0 cellspace=0 width=99 bgcolor='#B0C4DE' CLASS='A'><tr><td height=39><span  onmouseOver='javascript:Menu(\"M\",\"1\")' style='width:100%' id='M1'>&nbsp;&nbsp;个人服务&nbsp;&nbsp;&nbsp;<font face=webdings>4</font></span><span onmouseOver='javascript:Menu(\"M\",\"2\")' style='width:100%;' id='M2'>&nbsp;&nbsp;控制面板&nbsp;&nbsp;&nbsp;<font face=webdings>4</font></span></td></tr><tr><td  bgcolor=#cccccc width=100% height=1></td></tr><tr><td height=69><span onClick='location.reload()' onmouseOver='javascript:Menu(\"M\",\"3\")' style='width:100%;' id='M3'>&nbsp;&nbsp;刷新本页</span><a href='#top'><span onmouseOver='javascript:Menu(\"M\",\"4\")' style='width:100%;' id='M4' class='a'>&nbsp;&nbsp;返回页顶</span></a><a href='#bottom'><span onmouseOver='javascript:Menu(\"M\",\"5\")' style='width:100%;' id='M5' class='a'>&nbsp;&nbsp;转至页底</span></a><span onClick='history.go(-1)' onmouseOver='javascript:Menu(\"M\",\"6\")' style='width:100%;' id='M6'>&nbsp;&nbsp;后退一页</span></td></tr><tr><td bgcolor=#cccccc width=100% height=1></td></tr><tr><td><span onClick='javascript:RCopy()' onmouseOver='javascript:Menu(\"M\",\"7\")' style='width:100%;' id='M7'>&nbsp;&nbsp;复制</span><span onClick='javascript:Rpaste()' onmouseOver='javascript:Menu(\"M\",\"8\")' style='width:100%;' id='M8'>&nbsp;&nbsp;普通粘贴</span><span onClick='javascript:RXpaste()' onmouseOver='javascript:Menu(\"M\",\"11\")' style='width:100%;' id='M11'>&nbsp;&nbsp;转换粘贴</span></td></tr><tr><td bgcolor=#cccccc width=100% height=1></td></tr><tr><td> <a href='online.asp' class='a'><span onmouseOver='javascript:Menu(\"M\",\"9\")' style='width:100%;' id='M9'>&nbsp;&nbsp;在线列表</span></a><a href='Default.asp' class='a'><span onmouseOver='javascript:Menu(\"M\",\"10\")' style='width:100%;' id='M10'>&nbsp;&nbsp;返回首页</span></a></td></tr></table>";
 var Xloca=document.body.scrollLeft+event.clientX ;
 var Yloca=document.body.scrollTop+event.clientY ; 
 
  if ((Xloca+Rmenu.offsetWidth)>document.body.clientWidth){Xloca=document.body.scrollLeft+document.body.clientWidth-Rmenu.offsetWidth;}
 if ((event.clientY+Rmenu.offsetHeight)>document.body.clientHeight){Yloca=document.body.scrollTop+document.body.clientHeight-Rmenu.offsetHeight;}
 Rmenu.style.display="";
 Rmenu.style.left = Xloca-1;
 Rmenu.style.top = Yloca-1;
 }

document.onmouseup=Rclickhide
function Rclickhide(){
if (event.button==2){
  if(document.activeElement.tagName.toLowerCase()=="textarea" || document.activeElement.tagName.toLowerCase()=="input"  ){
  RPL=document.selection.createRange();
  }
  else {RPL='';}
   }
 else{
 Rmenu.style.display="none";
 }
 RSmenu.style.display="none";
 if (document.selection.createRange().text!='') {
var range = document.selection.createRange();
Rstr=range;
} 
 }

function Menu(menu,id){
whichMenu=eval(menu+id);
if (menu=="M"){Menulen=12}
if (menu=="A"){Menulen=8}
for (i=1;i<Menulen;i++){
eval(menu+i).style.backgroundColor="#B0C4DE";
 }
whichMenu.style.backgroundColor="#008B8B"; 
if (menu=="M"){
if (id==1){Smenu(1)}
if (id==2){Smenu(2)}
if (id>2){RSmenu.style.display="none";}
   }
} 

function Smenu(id){
RSmenu.style.display="";
var RXloca=(Rmenu.style.pixelLeft)
var Xloca=RXloca+Rmenu.offsetWidth;
if (Xloca>((document.body.clientWidth)-RSmenu.offsetWidth)){Xloca=(RXloca-RSmenu.offsetWidth);}
RSmenu.style.left = Xloca;
RSmenu.style.top = (Rmenu.style.pixelTop);
if (id==1){Smenulist()}
if (id==2){Smenulistb()}
}

function Smenulist(){
RSmenu.innerHTML="<table cellpadding=0 cellspace=0 width=99 bgcolor='#B0C4DE'><tr><td valign='middle' height=115><a href='login.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"1\")' style='width:100%' id='A1'>&nbsp;更换用户</span></a><a href='http://www.alloyo.com/gbook' class='a'><span onmouseOver='javascript:Menu(\"A\",\"2\")' style='width:100%;' id='A2'>&nbsp;留 言 本</span></a><a href='ShowBBS.asp?menu=5' v><span onmouseOver='javascript:Menu(\"A\",\"3\")' style='width:100%;' id='A3' class='a'>&nbsp;我的帖子</span></a><a href='calendar.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"4\")' style='width:100%;' id='A4'>&nbsp;查看日记</span></a><a href='vip.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"5\")' style='width:100%;' id='A5'>&nbsp;申请 VIP</span></a><span onmouseOver='javascript:Menu(\"A\",\"6\")' style='width:100%;' id='A6'>&nbsp;我的回帖</span><a href='ShowBBS.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"7\")' style='width:100%;' id='A7'>&nbsp;社区新帖</span></a></td></tr></td></tr></table>";
}

function Smenulistb(){
RSmenu.innerHTML="<table cellpadding=0 cellspace=0 width=99 bgcolor='#B0C4DE'><tr><td valign='middle' height=115><a href='usercp.asp'><span onmouseOver='javascript:Menu(\"A\",\"1\")' style='width:100%' id='A1' class='a'>&nbsp;控制面板首页</span></a><a href='EditProfile.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"2\")' style='width:100%;' id='A2'>&nbsp;基本资料修改</span></a><a href='EditProfile.asp?menu=contact' class='a'><span onmouseOver='javascript:Menu(\"A\",\"3\")' style='width:100%;' id='A3' class='a'>&nbsp;编辑论坛选项</span></a><a href='EditProfile.asp?menu=pass' class='a'><span onmouseOver='javascript:Menu(\"A\",\"4\")' style='width:100%;' id='A4'>&nbsp;用户密码修改</span></a><a href='message.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"5\")' style='width:100%;' id='A5'>&nbsp;用户短信服务</span></a><a href='friend.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"6\")' style='width:100%;' id='A6'>&nbsp;编辑好友列表</span></a><a href='help.asp' class='a'><span onmouseOver='javascript:Menu(\"A\",\"7\")' style='width:100%;' id='A7'>&nbsp;论坛帮助</span></a></td></tr></td></tr></table>";
}

function RCopy(){
if(Rstr!=''){
Rstr.execCommand("Copy");
}
Rmenu.style.display="none";
}

function Rpaste(){
if (RPL!=''){
RPL.text=clipboardData.getData("Text");
}
Rmenu.style.display="none";
}

function RXpaste(){
if (RPL!=''){
rtf.document.designMode="On";
rtf.focus();
rtf.document.body.innerHTML="";
rtf.document.execCommand("paste");
var str = rtf.document.body.innerHTML;
str=html_trans(str);

RPL.text=str;
}
Rmenu.style.display="none";
}

function html_trans(str) {
	str = str.replace(/\r/g,"");
	str = str.replace(/on(load|click|dbclick|mouseover|mousedown|mouseup)="[^"]+"/ig,"");
	str = str.replace(/<script[^>]*?>([\w\W]*?)<\/script>/ig,"");
	
	str = str.replace(/<a[^>]+href="([^"]+)"[^>]*>(.*?)<\/a>/ig,"\n[url=$1]$2[/url]\n");
	
	str = str.replace(/<font[^>]+color=([^ >]+)[^>]*>(.*?)<\/font>/ig,"\n[color=$1]$2[/color]\n");
	
	str = str.replace(/<img[^>]+src="([^"]+)"[^>]*>/ig,"\n[img]$1[/img]\n");
	
	str = str.replace(/<([\/]?)b>/ig,"[$1b]");
	str = str.replace(/<([\/]?)strong>/ig,"[$1b]");
	str = str.replace(/<([\/]?)u>/ig,"[$1u]");
	str = str.replace(/<([\/]?)i>/ig,"[$1i]");
	
	str = str.replace(/&nbsp;/g," ");
	str = str.replace(/&amp;/g,"&");
	str = str.replace(/&quot;/g,"\"");
	str = str.replace(/&lt;/g,"<");
	str = str.replace(/&gt;/g,">");
	
	str = str.replace(/<br>/ig,"\n");
	str = str.replace(/<[^>]*?>/g,"");
	str = str.replace(/\[url=([^\]]+)\]\n(\[img\]\1\[\/img\])\n\[\/url\]/g,"$2");
	str = str.replace(/\n+/g,"\n");
	
	return str;
} 

 
 
