function storeCaret(text) { 
	if (text.createTextRange) {
		text.caretPos = document.selection.createRange().duplicate();
	}
}

var imageTag = false;
var theSelection = false;
var clientPC = navigator.userAgent.toLowerCase(); // Get client info
var clientVer = parseInt(navigator.appVersion); // Get browser version

var is_ie = ((clientPC.indexOf("msie") != -1) && (clientPC.indexOf("opera") == -1));
var is_nav  = ((clientPC.indexOf('mozilla')!=-1) && (clientPC.indexOf('spoofer')==-1)
                && (clientPC.indexOf('compatible') == -1) && (clientPC.indexOf('opera')==-1)
                && (clientPC.indexOf('webtv')==-1) && (clientPC.indexOf('hotjava')==-1));

var is_win   = ((clientPC.indexOf("win")!=-1) || (agt.indexOf("16bit")!=-1));
var is_mac    = (clientPC.indexOf("mac")!=-1);

bbcode = new Array();
bbtags = new Array('[b]','[/b]','[i]','[/i]','[u]','[/u]','[quote]','[/quote]','[code]','[/code]','[list]','[/list]','[list=]','[/list]','[img]','[/img]','[url]','[/url]','[email]','[/email]','[left]','[/left]','[right]','[/right]','[center]','[/center]','[justify]','[/justify]','[size=]','[/size]','[color=]','[/color]','[spoiler]','[/spoiler]','[flipv]','[/flipv]','[fliph]','[/fliph]','[fade]','[/fade]','[blur]','[/blur]','[scroll=up]','[/scroll]','[r]','[/r]');
imageTag = false;


function getarraysize(thearray) {
	for (i = 0; i < thearray.length; i++) {
		if ((thearray[i] == "undefined") || (thearray[i] == "") || (thearray[i] == null))
			return i;
		}
	return thearray.length;
}

function arraypush(thearray,value) {
	thearray[ getarraysize(thearray) ] = value;
}

function arraypop(thearray) {
	thearraysize = getarraysize(thearray);
	retval = thearray[thearraysize - 1];
	delete thearray[thearraysize - 1];
	return retval;
}

function bbfontstyle(bbopen, bbclose) {
	if ((clientVer >= 4) && is_ie && is_win) {
		theSelection = document.selection.createRange().text;
		if (!theSelection) {
			document.REPLY.message.value += bbopen + bbclose;
			document.REPLY.message.focus();
			return;
		}
		document.selection.createRange().text = bbopen + theSelection + bbclose;
		document.REPLY.message.focus();
		return;
	} else {
		document.REPLY.message.value += bbopen + bbclose;
		document.REPLY.message.focus();
		return;
	}
}





function f(bbnumber) {
	donotinsert = false;
	theSelection = false;
	bblast = 0;

	if (bbnumber == -1) { 
		while (bbcode[0]) {
			butnumber = arraypop(bbcode) - 1;
			document.REPLY.message.value += bbtags[butnumber + 1];
		}
		document.REPLY.message.focus();
		return;
	}

	if ((clientVer >= 4) && is_ie && is_win)
		theSelection = document.selection.createRange().text; 

	if (theSelection) {
		document.selection.createRange().text = bbtags[bbnumber] + theSelection + bbtags[bbnumber+1];
		document.REPLY.message.focus();
		theSelection = '';
		return;
	}

	for (i = 0; i < bbcode.length; i++) {
		if (bbcode[i] == bbnumber+1) {
			bblast = i;
			donotinsert = true;
		}
	}

	if (donotinsert) {		
		while (bbcode[bblast]) {
				butnumber = arraypop(bbcode) - 1;
				document.REPLY.message.value += bbtags[butnumber + 1];
				imageTag = false;
			}
			document.REPLY.message.focus();
			return;
	} else { 
		if (imageTag && (bbnumber != 14)) {		
			document.REPLY.message.value += bbtags[15];
			lastValue = arraypop(bbcode) - 1;	
			document.REPLY.addbbcode14.value = "Img";	
			imageTag = false;
		}
		document.REPLY.message.value += bbtags[bbnumber];
		if ((bbnumber == 14) && (imageTag == false)) imageTag = 1; 
		arraypush(bbcode,bbnumber+1);
		document.REPLY.message.focus();
		return;
	}

}