var USERNICK = '';
var ChannelName ='';
var randomnumber=Math.floor(Math.random()*10000)
var ServerName = 'www.imserver.net'

var MSJVMVersion = oClientCaps.getComponentVersion ("{08B0E5C0-4FCB-11CF-AAA5-00401C608500}","componentid");

function DibujarChat()
{
	win.document.write('<html><head><title>Chat</title>')
	win.document.write('<style type="text/css">.txt {font: bold 12px Arial, Helvetica, sans-serif; color: #ffffff;}</style></head>')
	win.document.write('<body bgcolor="#000000" topmargin="3" leftmargin="3" oncontextmenu="return false">')
	win.document.write('<div style="behavior:url(#default#clientCaps)" id="oClientCaps">')
	
	if (navigator.javaEnabled() && MSJVMVersion != 0){
		win.document.write('<applet name="IMChat" codebase="http://' + ServerName + '/Chat/classes" archive="jirc_pure.zip" code=Chat.class width=490 height=300 MAYSCRIPT>')
	}
	else{
		win.document.write('<object classid="clsid:8AD9C840-044E-11D1-B3E9-00805F499D93" name="IMChat" width="490" height="300" codebase="http://java.sun.com/products/plugin/autodl/jinstall-1_4_2-windows-i586.cab#Version=1,1,0,0">')
		win.document.write('<param name="code" value="Chat.class">')
		win.document.write('<param name="codebase" value="http://' + ServerName + '/Chat/classes">')
		win.document.write('<param name="archive" value="jirc_pure.zip">')
		win.document.write('<param name="type" value="application/x-java-applet;version=1.4">')
		win.document.write('<param name="mayscript">')
		win.document.write('<param name="scriptable" value="true">')
	}

	// Connection Related Parameters
	win.document.write('<param name="LicenseKey" value="v3:imserver.net:7634658996740684164252943551268361355421023295165387389402230121986147965067514566540177488264081361323656803677964770378931566501419630191127958418644734">')
	win.document.write('<param name="ServerName1" value="' + ServerName + '">')
	win.document.write('<param name="Channel1" value='  + ChannelName + '>')
	win.document.write('<param name="NickName" value="'+USERNICK+'">')
	win.document.write('<param name="RealName" value="IM User">')
	win.document.write('<param name="ServerPort" value="8521">')
	
	// Color Related Parameters
	win.document.write('<param name="TextColor" value="black">')
	win.document.write('<param name="TextScreenColor" value="white">')
	win.document.write('<param name="BackgroundColor" value="black">')
	win.document.write('<param name="FGColor" value="black">')
	win.document.write('<param name="ListTextColor" value="black">')
	win.document.write('<param name="ListScreenColor" value="white">')
	win.document.write('<param name="LogoBgColor" value="black">')
	win.document.write('<param name="InputTextColor" value="black">')
	win.document.write('<param name="InputScreenColor" value="white">')
	win.document.write('<param name="ServerCmdColor" value="127,127,127">')
	win.document.write('<param name="UserCmdColor" value="blue">')
	win.document.write('<param name="ServerErrorColor" value="red">')
	win.document.write('<param name="ActionColor" value="red">')
	win.document.write('<param name="NickNameColor" value="-1">')
	win.document.write('<param name="TitleBackgroundColor" value="black">')
	win.document.write('<param name="TitleForegroundColor" value="white">')
	
	// GUI and States Control
	win.document.write('<param name="DirectStart" value="true">')
	win.document.write('<param name="DisplayUserList" value="true">')
	win.document.write('<param name="DisplayConfigNick" value="false">')
	win.document.write('<param name="DisplayConfigNickPass" value="false">')
	win.document.write('<param name="DisplayConfigChannel" value="false">')
	win.document.write('<param name="DisplayConfigChannelPass" value="false">')
	win.document.write('<param name="DisplayConfigRealName" value="false">')
	win.document.write('<param name="DisplayConfigServer" value="false">')
	win.document.write('<param name="DisplayConfigServerPass" value="false">')
	win.document.write('<param name="DisplayConfigPort" value="false">')
	win.document.write('<param name="DisplayConfigMisc" value="false">')
	win.document.write('<param name="DisplayConfigOK" value="false">')
	win.document.write('<param name="DisplayConfigSocks" value="false">')
	win.document.write('<param name="DisplayColorControl" value="true">')
	win.document.write('<param name="DisplaySoundControl" value="false">')
	win.document.write('<param name="DisplayAbout" value="false">')
	win.document.write('<param name="DisplayConnectButton" value="false">')
	win.document.write('<param name="DisplayTitleBar" value="false">')
	win.document.write('<param name="DisplayTextInput" value="true">')
	win.document.write('<param name="RefreshColorCode" value="false">')
	win.document.write('<param name="AllowShowURL" value="false">')
	win.document.write('<param name="AllowHyperLink" value="true">')
	win.document.write('<param name="AllowSound" value="true">')
	win.document.write('<param name="isLimitedChannels" value="true">')
	win.document.write('<param name="isLimitedServers" value="true">')
	win.document.write('<param name="AllowIdentd" value="true">')
	win.document.write('<param name="AllowPrivateChatWindow" value="true">')
	win.document.write('<param name="AllowJoinSound" value="true">')
	win.document.write('<param name="AllowLeaveSound" value="true">')
	win.document.write('<param name="IgnoreMOTD" value="true">')
	win.document.write('<param name="IgnoreChannelChangeMsg" value="true">')
	win.document.write('<param name="IgnoreServerMsg" value="true">')
	win.document.write('<param name="IgnoreModeMsg" value="true">')
	win.document.write('<param name="IgnoreCode" value="NOTICE,396">')
	win.document.write('<param name="FilterKeys" value=":-@ :@ [angry] [beer] ;) ;-) [blink] [brokenheart] [cake] :-/ :/ [confused] :' + "'" + '( [cry] >:) >:-) [devil] [flower] [gift] 8-) 8) [glasses] [heart] :-d :-D :d :D [bigsmile] :-( :( [sad] :-) :) [smile] :-p :-P :p :P [tongue] [idea] :-* :* [kiss] [music] :-x :-X :x :X [silence] I-) [sleepy] :-o :-O :o :O [surprised] [thumbsdown] [thumbsup]">')
	win.document.write('<param name="FilterVals" value="angry.gif angry.gif angry.gif beer.gif blink.gif blink.gif blink.gif brokenheart.gif cake.gif confused.gif confused.gif confused.gif cry.gif cry.gif devil.gif devil.gif devil.gif flower.gif gift.gif glasses.gif glasses.gif glasses.gif heart.gif bigsmile.gif bigsmile.gif bigsmile.gif bigsmile.gif bigsmile.gif sad.gif sad.gif sad.gif smile.gif smile.gif smile.gif tongue.gif tongue.gif tongue.gif tongue.gif tongue.gif idea.gif kiss.gif kiss.gif kiss.gif music.gif silence.gif silence.gif silence.gif silence.gif silence.gif sleepy.gif sleepy.gif surprised.gif surprised.gif surprised.gif surprised.gif surprised.gif thumbsdown.gif thumbsup.gif">')
	win.document.write('<param name="NoConfig" value="true">')
	win.document.write('<param name="BorderVsp" value="5">')
	win.document.write('<param name="BorderHsp" value="5">')
	win.document.write('<param name="BorderSpacing" value="0">')
	win.document.write('<param name="LogoWidth" value="83">')
	win.document.write('<param name="LogoHeight" value="92">')
	win.document.write('<param name="UserListWidth" value="130">')
	win.document.write('<param name="PWindowHeight" value="280">')
	win.document.write('<param name="PWindowWidth" value="400">')
	win.document.write('<param name="UseModeIcons" value="false">')
	
	// Label wordings
	win.document.write('<param name="FieldNameTitlePeople" value="People">')
	win.document.write('<param name="FieldNameTitleTopic" value="">')
	win.document.write('<param name="FieldNamePrivateChatTitle" value="Private chat with:">')
	win.document.write('<param name="FieldNameConnecting" value=" Connecting...">')
	win.document.write('<param name="FieldNameConnected" value=" Connected. Please wait for the other user to join.">')
	win.document.write('<param name="FieldNameConnectionClose" value="Have a nice day!">')
	win.document.write('<param name="FieldNameChannelJoined" value="just entered the chat">')
	win.document.write('<param name="FieldNameChannelLeft" value="left the chat">')
	
	// Misc
	win.document.write('<param name="WelcomeMessage" value=" Welcome!">')
	win.document.write('<param name="NOS" value="false">')
	win.document.write('<param name="TextFontSize" value="12">')
	win.document.write('<param name="TextFontName" value="Helvetica">')
	win.document.write('<param name="AcceptCommands" value="false">')
	win.document.write('<param name="NickMaskStart" value="[">')
	win.document.write('<param name="NickMaskEnd" value="]">')
	win.document.write('<param name="AllowTimeStamp" value="false">')
	win.document.write('<param name="TimeStampFormat" value="hh:mm a">')
	win.document.write('<param name="ScreenBufferPageSize" value="3">')
	
	if (navigator.javaEnabled() && MSJVMVersion != 0){
		win.document.write('</applet><br>')
	}
	else{
		win.document.write('</object><br>')
	}

	win.document.write('<table width="300" cellspacing="0" cellpadding="2" border="0"><tr>')
	win.document.write('<td>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>')
	win.document.write('<td class="txt">:) = <img src="/Chat/classes/applet_images/smile.gif" width="24" height="24" border="0" alt="" align="absmiddle"></td>')
	win.document.write('<td class="txt">:( = <img src="/Chat/classes/applet_images/sad.gif" width="24" height="24" border="0" alt="" align="absmiddle"></td>')
	win.document.write('<td class="txt">:D = <img src="/Chat/classes/applet_images/bigsmile.gif" width="24" height="23" border="0" alt="" align="absmiddle"></td>')
	win.document.write('<td class="txt">:P = <img src="/Chat/classes/applet_images/tongue.gif" width="24" height="24" border="0" alt="" align="absmiddle"></td>')
	win.document.write('<td class="txt"><input type="button" name="Submit" value="More..." style="height: 19px; width: 55px; font-size: 10px;" onClick="window.open(' + "'/Chat/emoticons.htm?000000&FFFFFF','Emoticons','resizable=no,height=266,width=430')" + '"></td>')
	win.document.write('</tr></table>')
	win.document.write('</div>')
	win.document.write('</body></html>')
	
	return true
}

function sendFromjChat()
{
	USERNICK = ReemplazarCaracteresInvalidos(UserName)
	
	var randomnumber=Math.floor(Math.random()*10000)
	
	win=window.open("","IRC2" + randomnumber,"resizable=no,height=330,width=505")				
	DibujarChat();
	window.opener = top;
	window.close();
}  


function send(F)
{
   if (document.Formulario.NombreUsuario.value == null || document.Formulario.NombreUsuario.value == "")
   {
        window.alert(MSG_1)
        return false
   }
    
 win=window.open("","IRC","resizable=no,height=330,width=505")   
 DibujarChat();
 
}            

function ReemplazarCaracteresInvalidos(nick) {
var Letra = ''
var pos=0;

    for (pos=0;pos<nick.length;pos++) {
        Letra = nick.substring(pos,pos+1)
        if (isNaN(Letra) && !EsMayuscula(Letra) && !EsMinuscula(Letra)) {
            if (pos == 0) {
                nick = "_" + nick.substring(1,nick.length )
			}
            else {
                if (pos == nick.length) {
                    nick =  nick.substring(0,nick.length -1)  + "_"
				}
                else {	
                    nick = nick.substring(0,pos) + "_" + nick.substring(pos + 1,nick.length) 			
				}
			}
		}
    }
	if (!isNaN(nick.substring(0,1))) {
		nick =  "_" + nick
	}	
	nick = nick.substring(0,1).toUpperCase() + nick.substring(1,nick.length)	
	return nick
}

function EsMayuscula(Letra) {
    if (Letra.charCodeAt()>= 65 && Letra.charCodeAt() <= 90) {
        return true
	}
    else {
        return false
 	}
}
function EsMinuscula(Letra) {
    if (Letra.charCodeAt() >= 97 && Letra.charCodeAt()  <= 122) {
        return true
	}
    else {
        return false
    }
}


function ProcesarClick(F) {
	if ((F.Name.value=='') || (F.Email.value=='') || (F.Message.value=='')) {
		alert(MSG_2)
	}
	else {
		F.action = "/WebPanel/MsgPanel.asp?WCI=Panel&WCE=Click";
		F.submit()
	}
}
	
function ProcesarChat(F) {
	if (F.Name.value=='')  {
		alert(MSG_3)
	}
	else {	
			var tempName = '';
			tempName = ReemplazarCaracteresInvalidos(F.NombreUsuario.value)
			ChannelName = tempName + randomnumber
			USERNICK = ReemplazarCaracteresInvalidos(F.Name.value)			

			F.ChatName.value = ChannelName
			F.action = "/WebPanel/MsgPanel.asp?WCI=Panel&WCE=Chat";
			F.submit();

			send(F);
	}
}





