var m_isIE=false;
if (navigator.appName.substring(0,2)=='Mi') {m_isIE=true}
var m_d=document;
var m_remb;
var m_remi;
var m_remu;
var m_remquote;
var m_remcode;
var m_remimg;
var m_remurl;
var m_tagstack=new Array();
var m_codesopened=false;
var m_smilesopened=false;
var m_wcodes;
var m_wsmiles;

function m_fsent() {if (m_d.mainform.b1 && m_d.mainform.target!='PreviewWin') {m_d.mainform.b1.disabled=true}}
function m_fadd (addtxt) {
if (m_d.mainform.message) {
 var txt=m_d.mainform.message;
	if (txt.createTextRange && txt.caretPos) {
		var cp=txt.caretPos;
		cp.text=cp.text.charAt(cp.text.length-1)==' '?cp.text+addtxt+' ':cp.text+addtxt;
	} else {txt.value+=addtxt}
	txt.focus();
	}
}

function m_fsm(txt) {
m_fadd(' '+txt+' ');
}

function m_fclear() {
if (m_d.mainform.name) {m_d.mainform.name.value=''}
if (m_d.mainform.email) {m_d.mainform.email.value=''}
if (m_d.mainform.url) {m_d.mainform.url.value=''}
if (m_d.mainform.city) {m_d.mainform.city.value=''}
if (m_d.mainform.icq) {m_d.mainform.icq.value=''}
if (m_d.mainform.message) {m_d.mainform.message.value=''}
if (m_d.mainform.f1) {m_d.mainform.f1.value=''}
if (m_d.mainform.f2) {m_d.mainform.f2.value=''}
if (m_d.mainform.f3) {m_d.mainform.f3.value=''}
}
function m_fpreview() {
var w=600;
var h=400;
var ww=window.open('','PreviewWin','width='+w+',height='+h+',toolbar=0,resizable=1,directories=0,status=0,menubar=0,scrollbars=1,top='+(screen.height-h)/2+',left='+(screen.width-w)/2);
m_d.mainform.target='PreviewWin';
m_d.mainform.a.value='preview';
m_d.mainform.submit();
m_d.mainform.a.value='add';
m_d.mainform.target='_top';
ww.focus();
}
function m_fefb(inp) {
if (m_isIE && m_d.mainform.elements[inp] && m_d.mainform.b1) {
 m_d.mainform.elements[inp].onmouseover=m_d.mainform.b1.onmouseover;
 m_d.mainform.elements[inp].onmouseout=m_d.mainform.b1.onmouseout;
 }
} 
function m_fstore(El) {
 if (El.createTextRange) {El.caretPos=m_d.selection.createRange().duplicate()}
 m_fchkmlc();
 }
function m_fchkmlc() {
 if (m_d.mainform.message && m_d.all && m_d.all.len1) { 
 	m_d.all.len1.innerHTML=(m_mlc-m_d.mainform.message.value.length);
  m_d.mainform.message.focus();
 	}
 if (m_d.mainform.message && m_d.mainform.message.value.length>m_mlc) {
  m_d.mainform.message.value=m_d.mainform.message.value.substring(0,m_mlc);
  }
	}
function m_fcd(tag) {
var txt=m_d.mainform.message;
if (m_d.selection){
	var sel=m_d.selection.createRange().text;
 if (sel) {
		m_d.selection.createRange().text ='['+tag+']'+sel+'[/'+tag+']';
		txt.focus();
		return;
 	}
	}
var chk;
eval('chk=m_rem'+tag);
if (chk) {
 m_fcloseto(tag);
	chk='';
 }
else {
 eval('m_d.mainform.b'+tag+'.value="'+tag+'*"');
 chk='1';
	m_fadd('['+tag+']');
	m_pushstack(m_tagstack,tag);
 }
eval('m_rem'+tag+'=chk');	
txt.focus();
}

function m_fcd2(add1,add2) {
if (m_d.mainform.message) {
 m_d.mainform.message.focus();
 m_d.mainform.message.click();
 var txt=m_d.mainform.message;
	if (m_d.selection){
	 var sel=m_d.selection.createRange().text;
  if (sel) {
	 	m_d.selection.createRange().text=add1+sel+add2;
	 	txt.focus();
	 	return;
  	}
	 }
 if (txt.createTextRange && txt.caretPos) {
		var cp=txt.caretPos;
  if (cp.text.charAt(cp.text.length-1)==' ') {
  	cp.text=cp.text+add1+add2+' ';
  	cp.move('character',-add2.length-1);
  	cp.select();
  	}
  else {
   cp.text=cp.text+add1+add2;
  	cp.move('character',-add2.length);
  	cp.select();
   }
	} else {m_fadd(add1+add2);}
	txt.focus();
	}
}

function m_fcodes() {
 var w=750;
 var h=450;
 if (m_codesopened && !m_wcodes.closed) { m_wcodes.focus(); }
 else { m_wcodes=window.open('/cgi-bin/gb/gb.cgi?a=codes','Codes','scrollbars=1,width='+w+',height='+h+',resizable=1,top='+(screen.height-h)/2+',left='+(screen.width-w)/2); m_codesopened=true;}
}

function m_fsmiles() {
 var w=650;
 var h=450;
 if (m_smilesopened && !m_wsmiles.closed) { m_wsmiles.focus(); }
 else { m_wsmiles=window.open('/cgi-bin/gb/gb.cgi?a=smiles','Smiles','scrollbars=1,width='+w+',height='+h+',resizable=1,top='+(screen.height-h)/2+',left='+(screen.width-w)/2); m_smilesopened=true;}
}


function m_stacksize(ar){
 for (i=0;i<ar.length;+ i++ ) {
  if ((ar[i]=='')||(ar[i]==null)){return i;}
  }
 return ar.length;
 }

function m_pushstack(ar,val){
 arraysize=m_stacksize(ar);
 ar[arraysize]=val;
 }

function m_popstack(ar){
 var arraysize=m_stacksize(ar);
	var val='';
	if (arraysize>0) {
  val=ar[arraysize-1];
  delete ar[arraysize-1];
		}
 return val;
 }

function m_fcloseto(tag){
var txt=m_d.mainform.message;
var ltag=m_popstack(m_tagstack);
var done=false;
while (ltag>'' && !done) {
 eval('m_d.mainform.b'+ltag+'.value="'+ltag+'"');
	m_fadd('[/'+ltag+']');
	eval('m_rem'+ltag+'=""');
	if (ltag==tag) {done=true} else {ltag=m_popstack(m_tagstack)};
 }
txt.focus();
}

function m_fquote(name,date) {
var sel;
var txt=m_d.mainform.message;
if (m_d.getSelection) {sel=m_d.getSelection()} else {sel=m_d.selection.createRange().text}
if (sel>'') {
 if (name>'') {m_fadd('[quote='+name+date+']'+sel+'[/quote]')}	else {m_fadd('[quote]'+sel+'[/quote]')}
	txt.focus();
 }
else {
 m_fadd('[b]'+name+'[/b]'+" \n");
	txt.focus();
 }
}