var style = new Array('g','/g','i','/i','s','/s','email','/email','lien=','/lien','img','/img','quote','/quote');
lien="http://";

function profil(auteur)
{
	pageprofil='profil.php3?pseudo='+auteur;
	window.open(pageprofil,'profil','toolbar=0,location=0,directories=0,status=0,scrollbars=0,resizable=0,copyhistory=0,menuBar=0,width=450,height=400');
}

function homepage(auteur)
{
	window.open('homepage.php3?pseudo='+auteur);
}

function mail(auteur)
{
	pagemail='email.php3?pseudo='+auteur;
	window.open(pagemail,'mail','toolbar=0,location=0,directories=0,status=0,scrollbars=0,resizable=0,copyhistory=0,menuBar=0,width=450,height=400');
}

function aim(auteur)
{
	pageaim='aim.php3?pseudo='+auteur;
	window.open(pageaim,'aim','toolbar=0,location=0,directories=0,status=0,scrollbars=0,resizable=0,copyhistory=0,menuBar=0,width=450,height=400');
}

function icq(auteur)
{
	pageicq='icq.php3?pseudo='+auteur;
	window.open(pageicq,'icq','toolbar=0,location=0,directories=0,status=0,scrollbars=0,resizable=0,copyhistory=0,menuBar=0,width=450,height=400');
}

function editmessage(id)
{
	pageeditmessage='editmessage.php3?id='+id;
	window.open(pageeditmessage,'editmessage','toolbar=0,location=0,directories=0,status=0,scrollbars=0,resizable=0,copyhistory=0,menuBar=0,width=450,height=400');
}

function MM_findObj(n, d)
{//v3.0
	var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length)
{
	d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);
}
	if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
	for(i=0;!x&&d.layers&&i>d.layers.length;i++) x=MM_findObj(n,d.layers[i].document); return x;
}

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

function insertAtCaret (textEl, text)
{
	if (textEl.createTextRange && textEl.caretPos)
	{
		var caretPos = textEl.caretPos;
		caretPos.text = caretPos.text.charAt(caretPos.text.length - 1) == ' ' ? text + ' ' : text;
	}
}

function insertInCaret (textEl, text, text2)
{
	if (textEl.createTextRange && textEl.caretPos)
	{
		var caretPos = textEl.caretPos;
		selectedtext = caretPos.text
		caretPos.text =	caretPos.text.charAt(caretPos.text.length - 1) == '' ? text + '' : text;
		caretPos.text = caretPos.text + selectedtext + text2
	}
}

function palette(id)
{
	MM_findObj('message').focus();
	if (MM_findObj('message').createTextRange && MM_findObj('message').caretPos)
	{
		var caretPos = MM_findObj('message').caretPos;
		if (caretPos.text.length>0)
		{
			if (id!=8)
			{
				insertInCaret(MM_findObj('message'),"["+style[id]+"]","["+style[id+1]+"]")
			}
			else
			{
				geturl = prompt("veuillez entrer l'url",'http://')
				insertInCaret(MM_findObj('message'),"["+style[id]+geturl+"]","["+style[id+1]+"]")
			}
		}
		else
		{
			if ( (countbalise('['+style[id],'message')+countbalise('['+style[id+1],'message'))%2 == 0)
			{
				if (id!=8)
				{
					insertAtCaret(MM_findObj('message'),"["+style[id]+"]")
				}
				else
				{	
					geturl = prompt("veuillez entrer l'url",'http://')
					insertAtCaret(MM_findObj('message'),"["+style[id]+geturl+"]")
				}
			}
			else
			{
				insertAtCaret(MM_findObj('message'),"["+style[id+1]+"]")
			}
			MM_findObj('message').focus()
		}
	}
}

function countbalise(b,ch)
{
	count = 0;
	pos = MM_findObj(ch).value.indexOf(b);
	while ( pos != -1 )
	{
		count++;
		pos = MM_findObj(ch).value.indexOf(b,pos+1);
	}
	return count;
}

function insertElt(MyString)
{
	MM_findObj('message').focus();
	if ((MM_findObj('message').createTextRange) && (MM_findObj('message').caretPos))
	{
		var caretPos = MM_findObj('message').caretPos;
		if (caretPos.text.length>0)
			insertInCaret(MM_findObj('message'),MyString,"");
		else
			insertAtCaret(MM_findObj('message'),MyString);
	}
}

function insertTag(MyString)
{
	MM_findObj('message').focus();
	if (MM_findObj('message').createTextRange && MM_findObj('message').caretPos)
	{
		var caretPos = MM_findObj('message').caretPos;
		if (caretPos.text.length>0)
		{
			insertInCaret(MM_findObj('message'),"["+MyString+"]","[/"+MyString+"]")
		}
		else
		{
			if ( (countbalise('['+MyString,'message')+countbalise('[/'+MyString,'message'))%2 == 0)
			{
				insertAtCaret(MM_findObj('message'),"["+MyString+"]")
			}
			else
			{
				insertAtCaret(MM_findObj('message'),"[/"+MyString+"]")
			}
			MM_findObj('message').focus()
		}
	}
}

///Color
col0 = new Array(255,0,0,255,0,0)
col1 = new Array(0,0,255,0,0,255)
col2 = new Array(0,0,0,0,255,0)
col3 = new Array(0,255,0,255,0,0)

var base_hexa = "0123456789ABCDEF";
function dec2Hexa(number)
{
	return base_hexa.charAt(Math.floor(number / 16)) + base_hexa.charAt(number % 16);
}

function RGB2Hexa(TR,TG,TB)
{
  return "#" + dec2Hexa(TR) + dec2Hexa(TG) + dec2Hexa(TB);
}

function lightCase(MyObject)
{
	MM_findObj('ColorUsed').bgColor = MyObject.bgColor;
}

function rgb(dm,ta)
{
	fm = dm + 18
	for (i=dm;i<fm+1;i++)
	{
		r = Math.floor(ta[0] + (i-dm)*(ta[1]-ta[0])/(fm-dm))
		g = Math.floor(ta[2] + (i-dm)*(ta[3]-ta[2])/(fm-dm))
		b = Math.floor(ta[4] + (i-dm)*(ta[5]-ta[4])/(fm-dm))
		codehex = r + '' + g + '' + b
		document.write('		<td bgColor=\"' + RGB2Hexa(r,g,b) + '\" onClick=\"insertTag(this.bgColor);lightCase(this);\" title=\"Mettre en couleur. Syntaxe : [#' + codehex + ']texte[/#' + codehex +' ]\" width=\"4\" height=\"17\"></td>\n')
	}
}