var HMBBS=HMSITEROOT+"bbs/",BBSGE=HMgetElement,BBSEC=encodeURIComponent,BBSRQ=HMrequestText;
function BBSRND(){return "&"+Math.random()}
function BBSAreaControl(id,e){
	var obj=HMEventElement(e),st=BBSGE(id).style;
	obj.title=="展开"?
		(obj.src="/images/bbs/close.gif",obj.title="收起",obj.alt="收起",st.display=""):
		(obj.src="/images/bbs/open.gif",obj.title="展开",obj.alt="展开",st.display="none")
}
function BBSGetUserInfo(u,e){
	var id="BBSUserInfo",obj=HMEventElement(e),uobj=BBSGE(id),st=uobj.style;
	obj.onmouseout=function(){HMcloseElement(id)}
	uobj.onmouseover=function(){st.display="block"}
	uobj.onmouseout=function(){st.display="none"}
	st.position="absolute",st.zIndex="99",st.display="block";
	st.left=HMGetLeft(obj)+"px",st.top=HMGetTop(obj)+13+"px";
	BBSRQ(HMBBS+"BbsOtherMean.asp?action=getUserInfo&user="+u+BBSRND(),null,id,0)
}
function BBSGetOnlineInfo(u,e){
	var id="BBSUserInfo",obj=HMEventElement(e),uobj=BBSGE(id),st=uobj.style;
	obj.onmouseout=function(){HMcloseElement(id)}
	uobj.onmouseover=function(){st.display="block"}
	uobj.onmouseout=function(){st.display="none"}
	st.position="absolute",st.zIndex="99",st.display="block";
	st.left=HMGetLeft(obj)+"px",st.top=HMGetTop(obj)+13+"px";
	BBSRQ(HMBBS+"BbsOtherMean.asp?action=getOnlineInfo&id="+u+BBSRND(),null,id,0)
}
function BBSAddFriend(u){
	BBSRQ(HMBBS+"BbsOtherMean.asp?action=addFriend&user="+u+BBSRND(),null,alert,1)
}
function BBSSendMessage(u){
	var r=function(t){
		if(!isNaN(t)){alert(BBSMessageAlert(parseInt(t)));return}
		var obj=BBSGE("bbs-message"),st=obj.style;
		obj.innerHTML=t;
		st.position="absolute",st.zIndex="99",st.display="block";
		st.top=document.documentElement.scrollTop+160+"px";
		st.left=(document.body.clientWidth-obj.clientWidth )/2+"px"
	}
	BBSRQ(HMBBS+"BbsOtherMean.asp?action=messageForm&user="+u+BBSRND(),null,r,1)
}
function BBSCloseMessage(){
	var obj=BBSGE("bbs-message");
	obj.innerHTML="",obj.style.display="none"
}
function BBSForm(e){
	return BBSGE(e)?BBSEC(BBSGE(e).value):""
}
function BBSSubmitMessage(){
	var text="title="+BBSForm("BBSMessageTitle")+"&content="+BBSForm("BBSMessageContent");
	if(BBSGE("BBSMessageCode"))text+="&code="+BBSForm("BBSMessageCode");
	BBSRQ(HMBBS+"BbsOtherMean.asp?action=messageDispose&user="+BBSForm("BBSMessageUser")+BBSRND(),text,BBSMessageResult,1)
}
function BBSMessageResult(t){
	isNaN(t)?(alert(t),BBSCloseMessage()):alert(t)
}
function BBSMessageAlert(n){
	return ["您还没有登录，只有登录后才能向对方发送短信！","参数错误！","不允许向自己发送短信！",
		"该用户不存在或者已被管理员删除！","无法判断您的用户组权限，操作失败！","对方短信箱已满，暂时不能向该用户发送短信！",
		"请填写短信标题！","短信标题长度超过限制！","请填写短信内容！","您填写的问题答案错误！"][n]
}
function BBSLoadOnlineUser(page){
	BBSRQ(HMBBS+"BBSOtherMean.asp?action=getOnlineUserList&page="+page+BBSRND(),null,"BBSOnlineUserList",0)
}
function BBSGetDataCount(){
	var rndNum=parseInt(Math.random()*1000),rndId="BBSCount"+rndNum;
	HMCreateDiv(rndId);
	BBSRQ(HMBBS+"BBSOtherMean.asp?action=getDataCount&"+rndNum,null,rndId,0)
}
//发帖功能 开始
function BBSPostForm(t){
	var st=BBSGE("BBSPostFormLayer").style;
	if(st.display=="block")return;
	st.display="block",st.position="absolute",st.zIndex="99";
	st.top=document.documentElement.scrollTop+11+"px";
	BBSRQ(HMBBS+"BbsPutPost.asp?area="+BBSArea+"&type="+t+BBSRND(),null,"BBSPostForm",0)
}
function BBSPostSetKind(k){
	var a="BBSPostMarkTextBox",b="BBSPostFundTextBox",c="BBSPostThewTextBox",
	d="BBSPostExpTextBox",e="BBSPostAllowUserTextBox",ce=HMcloseElement,
	oe=function(ie){BBSGE(ie).style.display=""}
	BBSGE("BBSPostKind").value=k;
	if(k==0||k==1){ce(a),ce(b),ce(c),ce(d),ce(e)}
	else if(k==2||k==3){ce(a),oe(b),ce(c),ce(d),ce(e)}
	else if(k==4){oe(a),oe(b),oe(c),oe(d),ce(e)}
	else{ce(a),ce(b),ce(c),ce(d),oe(e)}
}
function BBSSubmitPost(){
	var GF=BBSForm,e=BBSGE("HMPostMessage"),
	t="title="+GF("BBSPostTitle")+"&kind="+GF("BBSPostKind")
		+"&fund="+GF("BBSPostFund")+"&mark="+GF("BBSPostMark")
		+"&thew="+GF("BBSPostThew")+"&exp="+GF("BBSPostExp")
		+"&allowUser="+GF("BBSPostAllowUser")+"&area="+GF("BBSPostArea")
		+"&type="+GF("BBSPostType")+"&personCount="+GF("BBSPostPersonCount")
		+"&stopDate="+GF("BBSPostStopDate")+"&content="+GF("content")
		+BBSSaveQuestionList()+"&code="+GF("BBSPostCode");
	e.style.display="";
	e.innerHTML="正在提交数据...";
	BBSRQ(HMBBS+"BBSPutPost.asp?action=dispose"+BBSRND(),t,BBSSubmitPostResult,1)
}
function BBSSubmitPostResult(t){
	var o=BBSGE("HMPostMessage");
	if(isNaN(t)){
		o.innerHTML=t;
		HMLoadCode()
	}else{
		BBSRQ(HMBBS+"BBSGreeting.asp?id="+t+BBSRND(),null,function(s){o.innerHTML=s;BBSPostSuccessRedirect()},1)
	}
}
function BBSPostSuccessRedirect(){
	var obj=BBSGE("BBSPostSuccessCount"),val=parseInt(obj.value);
	if(BBSGE("BBSGreetTimeout"))BBSGE("BBSGreetTimeout").innerHTML=3-val;
	val<3?(obj.value=val+1,setTimeout("BBSPostSuccessRedirect()",1000)):window.location=BBSGE("BBSPostSuccessUrl").value
}
// <-- 问卷调查必须代码 开始 -->
function BBSCreateQuestionList(){
	var qc=BBSGE("BBSQuestionCount").value;
	if(isNaN(qc)){alert("问题数量只能为数字！");return}
	qc=parseInt(qc);
	if(qc<1){alert("问题数量至少要一个！");return false}
	if(qc>10){
		alert("最多只能设置10个为题！");
		BBSGE("BBSQuestionCount").value=10;
		return
	}
	var t="";
	for(var i=1;i<=qc;i++){
		t+="问题"+i+"：<input type='text' id='QuestionTitle"+i+"' maxlength='50' />"
			+"<select onchange='javascript:BBSSetQuestionShape(this.value,"+i+");'>"
			+"<option value='0\'>单选</option><option value='1'>多选</option><option value='2'>文</option>"
			+"</select><input type='hidden' id='QuestionShape"+i+"' value='0' />"
			+"子项数：<input type=\"text\" id='QuestionOptionCount"+i+"' maxlength='1' value='1' size='2' />"
			+"<input type='button' value='确定' onclick='javascript:BBSCreateQuestion("+i+");' />"
			+"<input type='hidden' id='BBSQuestionShape"+i+"' value='0' />"
			+"<input type='hidden' id='BBSQuestionTitle"+i+"' value='' />"
			+"<input type='hidden' id='BBSQuestionOptionCount"+i+"' value='1' />"
			+"<div id='QuestionItem"+i+"'></div>"
	}
	BBSGE("BBSPostQuestionCount").value=qc;
	BBSGE("BBSShowQuestionTop").style.display="";
	BBSGE("BBSShowQuestionList").innerHTML=t
}
function BBSSetQuestionShape(val,id){
	BBSGE("QuestionShape"+id).value=val;
	var obj=BBSGE("QuestionOptionCount"+id);
	val==2?(obj.value=1,obj.disabled=true):obj.disabled=false
}
function BBSCreateQuestion(id){
	var title=BBSGE("QuestionTitle"+id).value.replace(/^\s*(.*?)\s*$/,"$1"),
	shape=BBSGE("QuestionShape"+id).value,
	count=BBSGE("QuestionOptionCount"+id).value;
	if(title==""){alert("请填写问题！");return}
	if(isNaN(count)){alert("子项数只能为数字！");return}
	count=parseInt(count);
	if(count<1){alert("子项数至少要有一个！");return}
	var t="<ul>";
	if(shape==2){
		t+="<li><input type='text' value='答案' id='Answer-"+id+"' /></li>"
	}else{
		var head="<input type='radio' disabled='true' />";
		if(shape==1) head="<input type='checkbox' disabled='true' />";
		for(var i=1;i<=count;i++){
			t+="<li>"+head+"<input type='input' id='Answer-"+id+"-"+i+"' maxlength='50' />"
				+"得分：<input type='input' id='Mark-"+id+"-"+i+"' maxlength='1' size='2' value='0' /></li>"
		}
	}
	t+="</ul>\n";
	BBSGE("BBSQuestionTitle"+id).value=title;
	BBSGE("BBSQuestionShape"+id).value=shape;
	BBSGE("BBSQuestionOptionCount"+id).value=count;
	BBSGE("QuestionItem"+id).innerHTML=t
}
// 问卷处理
function BBSSaveQuestionList(){
	if(!BBSGE("BBSPostQuestionCount"))return "";
	var qc=parseInt(BBSGE("BBSPostQuestionCount").value);
	if(qc<1)return "";
	var data="",oc=1,shape=0,ot="",os,title,tc,ot,tt,nc=0;
	for(var i=1;i<=qc;i++){
		shape=parseInt(BBSGE("BBSQuestionShape"+i).value);
		title=BBSForm("BBSQuestionTitle"+i).replace(/^\s*(.*?)\s*$/,"$1");
		if(title=="")continue;
		if(shape==2){
			nc++;
			data+="&questionTitle"+nc+"="+title;+"&questionShape"+nc+"="+shape+"&answer_"+nc+"="+BBSForm("Answer"+i)
		}else{
			oc=parseInt(BBSGE("BBSQuestionOptionCount"+i).value);
			os=false;
			for(var j=1;j<=oc;j++){
				ot=BBSForm("Answer-"+i+"-"+j).replace(/^\s*(.*?)\s*$/,"$1");
				if(ot!=""){os=true;break}
			}
			if(os){
				nc++,tc=0,tt="";
				data+="&questionTitle"+nc+"="+title+"&questionShape"+nc+"="+shape;
				for(var j=1;j<=oc;j++){
					ot=BBSForm("Answer-"+i+"-"+j).replace(/^\s*(.*?)\s*$/,"$1");
					if(ot!=""){
						tc++;
						data+="&answer_"+nc+"_"+tc+"="+ot+"&anMark_"+nc+"_"+tc+"="+BBSForm("Mark-"+i+"-"+j)
					}
				}
				data+="&questionOptionCount"+nc+"="+tc
			}
		}
	}
	return "&questionCount="+nc+data
}
// <-- 问卷调查必须代码 结束 -->
//发帖功能 结束
//读取列表
function BBSGetPostList(p){
	HMBackTop();
	BBSRQ(HMBBS+"BBSGetList.asp?"+"area="+BBSArea+"&page="+p+"&special="+BBSEC(HMGetQuery("special"))+"&order="+BBSEC(HMGetQuery("order"))+"&type="+BBSEC(HMGetQuery("type"))+BBSRND(),null,"BBSPostListMain",0)
}
function BBSGetPostView(p){
	HMBackTop();
	BBSRQ(HMBBS+"Post.asp?"+"id="+BBSPost+"&page="+p+"&only_author="+BBSEC(HMGetQuery("only_author"))+BBSRND(),null,"BBSPostViewMain",0)
}
function BBSAddMsnFriend(msn){
	document.all?window.open("msnim:chat?contact="+msn):alert("该用户MSN帐号为“"+msn+"”，请手动添加对方为好友！")
}
function BBSSetFontSize(s,i){
	BBSGE("content"+i).style.fontSize=s+"px"
}
// 回帖功能开始
function BBSRevertPost(){
	var st=BBSGE("BBSPostFormLayer").style;
	if(st.display=="block")return;
	st.display="block",st.position="absolute",st.zIndex="99";
	st.top=document.documentElement.scrollTop+"px";
	BBSRQ(HMBBS+"BBSPostRevert.asp?id="+BBSPost+BBSRND(),null,"BBSPostForm",0)
}
function BBSSubmitRevert(){
	var k=0,e=BBSGE("HMPostMessage");
	if(document.getElementsByName("BBSPostKind")){
		var ele=document.getElementsByName("BBSPostKind");
		for(var i=0;i<ele.length;i++)if(ele[i].checked){k=ele[i].value;break}
	}
	var t="title="+BBSForm("BBSPostTitle")+"&kind="+BBSEC(k)+"&content="+BBSForm("content")+"&code="+BBSForm("BBSPostCode");
	e.style.display="";
	e.innerHTML="正在提交数据...";
	BBSRQ(HMBBS+"BBSPostRevert.asp?action=dispose&id="+BBSPost+BBSRND(),t,BBSSubmitPostResult,1)
}
// 回帖功能结束
function BBSGetPostIp(p){
	var r=function(t){
		if(isNaN(t)){
			if(confirm("发布该帖的IP是："+t+"，\n"+"是否要阻止该IP访问本站？"))BBSRQ(HMBBS+"BBSOtherMean.asp?action=holdIp&"+BBSRND(),null,alert,1)
		}else{
			switch(parseInt(t)){
				case 0:alert("您没有权限执行该操作！");break;
				case 1:alert("参数错误！");break;
				case 2:alert("该帖可能已经被管理员删除！");break;
			}
		}
	}
	BBSRQ(HMBBS+"BBSOtherMean.asp?action=getPostIp&post="+p+BBSRND(),null,r,1)
}
function BBSSubmitVote(){
	var sl=BBSGE("BBSVoteShapeList").value;
	if(sl=="")return;
	var s=sl.split(","),t="",GV=(new HMForm("BBSVote",true)).getValue;
	for(var i=0;i<s.length;i++){
		if(isNaN(s[i]))continue;
		t+="&vote"+(i+1)+"="+GV("BBSVote"+(i+1))
	}
	BBSRQ(HMBBS+"BBSVote.asp?action=dispose&id="+BBSPost,t.substr(1,t.length-1),"BBSVoteMessage",0)
}
function BBSBuyPost(){
	if(confirm("您确定要购买该帖子吗？"))BBSRQ(HMBBS+"BBSPostOther.asp?action=buyPost&id="+BBSPost+BBSRND(),null,function(t){HMisNone(t)?BBSGetPostView(1):alert(t)},1)
}
function BBSGetPostControlMenu(id,e){
	var eObj=HMEventElement(e),obj=BBSGE("PostControlMenu"),st=obj.style,t,_r;
	obj.onmouseover=function(){st.display="block"}
	obj.onmouseout=function(){st.display="none"}
	st.position="absolute",st.zIndex="99";
	_r=function(t){
		obj.innerHTML=t;
		st.display="block";
		st.top=HMGetTop(eObj)-obj.clientHeight+"px"
		st.left=HMGetLeft(eObj)+"px";
	}
	BBSRQ(HMBBS+"BbsControl.asp?action=getMenu&id="+id+BBSRND(),null,_r,1)
}
function BBSReadControlForm(a,id){
	var r=function(t){
		var obj=BBSGE("bbs-control"),st=obj.style;
		obj.innerHTML=t,st.position="absolute",st.zIndex="99",st.display="block";
		st.top=document.documentElement.scrollTop+160+"px";
		st.left=(document.body.clientWidth-obj.clientWidth)/2+"px"
	}
	BBSRQ(HMBBS+"BBSControl.asp?action="+a+"&id="+id+BBSRND(),null,r,1)
}
function BBSSubmitControl(){
	var GV=(new HMForm("BbsEvent",true)).getValue;
	var data="mark="+GV("EventMark")+"&fund="+GV("EventFund")
		+"&thew="+GV("EventThew")+"&exp="+GV("EventExp")
		+"&mana="+GV("EventMana")+"&spell="+GV("EventTspell")
		+"&matter="+GV("EventMatter")+"&special="+GV("EventSpecial")
		+"&area="+GV("BbsArea")+"&bold="+GV("EventBold")
		+"&color="+GV("EventColor");
	BBSGE("EventMessage").style.display="";
	BBSRQ(HMBBS+"BBSControl.asp?do=dispose"+"&id="+GV("EventObject")+"&action="+GV("EventAction")+BBSRND(),data,"EventMessage",0)
}
function BBSEditPostForm(id){
	BBSGE("postTypeName").innerHTML="编辑帖子";
	var st=BBSGE("BBSPostFormLayer").style;
	if(st.display=="block")return;
	st.display="block",st.position="absolute",st.zIndex="99";
	st.top=document.documentElement.scrollTop+11+"px";
	BBSRQ(HMBBS+"BbsEditPost.asp?id="+id+BBSRND(),null,"BBSPostForm",0)
}
function BBSEditPostSubmit(){
	var GV=(new HMForm("EditPost",true)).getValue,e=BBSGE("HMPostMessage"),
	data="title="+GV("PostTitle")+"&content="+GV("PostContent")+"&code="+GV("PostCode");
	e.style.display="";
	e.innerHTML="正在提交数据...";
	BBSRQ(HMBBS+"BBSEditPost.asp?action=dispose"+"&id="+GV("PostId")+BBSRND(),data,BBSSubmitPostResult,1)
}