Diane's Basic Chat 8 - Cut and Paste

Cut & Paste Code

<HTML>







<HEAD>
<TITLE>Diane's Basic Chat 8</TITLE>
<SCRIPT>
chatURL="basicchat-8.html"
DT=document.URL.toString()
if (DT.indexOf("?") != -1) {
bS=DT.indexOf("serv=")+5
bP=DT.indexOf("port=")+5
bC=DT.indexOf("chan=")+5
serv=DT.substring(bS,bP-5)
port=DT.substring(bP,bC-5)
chan=DT.substring(bC,DT.length)
}else{
serv="chat.talkcity.com"
port="6667"
chan="DianesChatRoom"
}
key=""
document.write("<wtvchat host="+serv+" port="+port+" channel=#"+chan+" key="+key+">")
window.status="Now Connecting ..."
timerA=setTimeout('window.status="Server: "+serv',3000)
timerB=setTimeout('window.status="Port: "+port',6000)
timerC=setTimeout('window.status="Room: "+chan',9000)
timerD=setTimeout('window.status=""',12000)
timerE=setTimeout('Welcome()',7000)
function Welcome() {
Chat.addChannelMessage("/me is using Diane's BasicChat-8 Chat")
Chat.addChannelMessage("/who")
}
function Connect() {
serv=document.settings.serv.value
port=document.settings.port.value
chan=document.settings.chan.value
key=document.settings.key.value
if (serv && port && chan) {
location.href=chatURL+"?serv="+serv+"port="+port+"chan="+chan
}
}
function addMessage() {
document.chat.input.focus()
Chat.addChannelMessage(document.chat.input.value)
document.chat.input.value=""
}
function addMsg1() {
Chat.addChannelMessage(document.msg.nick1.value+" "+document.msg.text1.value)
document.msg.text1.value=""
}
function addMsg2() {
Chat.addChannelMessage(document.msg.nick2.value+" "+document.msg.text2.value)
document.msg.text2.value=""
}
function changeChannel() {
DT=document.change.channel.options[document.change.channel.selectedIndex].value
if (DT == "gotop") {
DT=""
window.location="#gotop"
}
if (DT == "join") {
DT=""
room=prompt("Enter Room Name on "+serv)
if (room && !null) {
chan=room
location.href=chatURL+"?serv="+serv+"port="+port+"chan="+chan
}
}
if (DT != "") {
bS=DT.indexOf("serv=")+5
bP=DT.indexOf("port=")+5
bC=DT.indexOf("chan=")+5
serv=DT.substring(bS,bP-5)
port=DT.substring(bP,bC-5)
chan=DT.substring(bC,DT.length)
key=""
location.href=chatURL+"?serv="+serv+"port="+port+"chan="+chan
}
}
function sendPopup() {
text=document.pop.poptext.options[document.pop.poptext.selectedIndex].value
if (text) {
if (text == "ID") {
text="/me is connected to "+serv+" on port:"+port+" in #"+chan+" Chat Room using Diane's Basic Chat-8"
}
Chat.addChannelMessage(text)
}
}
function playMusic() {
musicURL=document.music.musicmenu.options[document.music.musicmenu.selectedIndex].value
if (musicURL) {
window.location.href=musicURL
}
}
function WS0(){self.status=""}
function WS1(){self.status="Enter Server Here"}
function WS2(){self.status="Enter Port Number Here"}
function WS3(){self.status="Enter Room Name / Channel Here"}
function WS4(){self.status="Optional: Password for Room Owners"}
function WS5(){self.status="Click Here to Connect to Room"}
function WS6(){self.status="Type Text Here to Send to Room"}
function WS7(){self.status="Click Here to Send Private Message"}
function WS8(){self.status="Enter Whisper Nick Here"}
function WS9(){self.status="Enter Whisper Message Here"}
function WS10(){self.status="Change Chat Rooms"}
function WS11(){self.status="Sends Pre-Loaded Messages"}
function WS12(){self.status="Plays Music while Chatting"}
</SCRIPT>
</HEAD>
<BODY bgcolor=181818 onLoad="timer=setTimeout('document.chat.input.focus()',4000)">
<center>
<a name="gotop"></a>
<form name="settings">
<input name="serv" bgcolor=black text=gold cursor=gold size=17 onFocus="WS1()" onBlur="WS0()">
<input name="port" bgcolor=black text=gold cursor=gold size=4 onFocus="WS2()" onBlur="WS0()">
<input name="chan" bgcolor=black text=gold cursor=gold size=14 onFocus="WS3()" onBlur="WS0()">
<input name="key" bgcolor=black text=gold cursor=gold size=4 onFocus="WS4()" onBlur="WS0()">
<input type="button" text=gold value="Connect" borderimage=file://ROM/Borders/ButtonBorder2.bif onClick="Connect()" onFocus="WS5()" onBlur="WS0()">
<script>
document.settings.serv.value=serv
document.settings.port.value=port
document.settings.chan.value=chan
document.settings.key.value=key
</script>
<table border=0><tr>
<td>
<wtvchattranscript height=210 width="100%">
</table>
<table cellspacing=0 cellpadding=0 border=0><tr>
<td>
<form id="chat">
<input id="input" width="100%" bgcolor=181818 text=gold cursor=gold font=proportional autoactivate nohighlight onChange="addMessage()" onFocus="WS6()" onBlur="WS0()">
<td>
<input type="button" text=gold value="Whisper" borderimage=file://ROM/Borders/ButtonBorder2.bif onClick="window.open('whisper.panel','whisper')" onFocus="WS7()" onBlur="WS0()">
<input width="1%" bgcolor=181818 text=181818 cursor=181818 border=0 nohighlight>
</table>
<table width="100%" cellspacing=0 cellpadding=0 border=0><tr>
<form name="msg">
<td abswidth="25%">
<input name="nick1" width="100%" bgcolor=181818 text=gold cursor=gold font=proportional autoactivate nohighlight value="/msg " onChange="document.msg.nick1.focus(); addMsg1()" onFocus="WS8()" onBlur="WS0()">
<td abswidth="75%">
<input name="text1" width="100%" bgcolor=181818 text=gold cursor=gold font=proportional autoactivate nohighlight onChange="document.msg.text1.focus(); addMsg1()" onFocus="WS9()" onBlur="WS0()">
<tr>
<td abswidth="25%">
<input name="nick2" width="100%" bgcolor=181818 text=gold cursor=gold font=proportional autoactivate nohighlight value="/msg " onChange="document.msg.nick2.focus(); addMsg2()" onFocus="WS8()" onBlur="WS0()">
<td abswidth="75%">
<input name="text2" width="100%" bgcolor=181818 text=gold cursor=gold font=proportional autoactivate nohighlight onChange="document.msg.text2.focus(); addMsg2()" onFocus="WS9()" onBlur="WS0()">
</table>
<table>
<tr>
<td>
<form name="change">
<select name="channel" size=1 onChange="changeChannel()" onFocus="WS10()" onBlur="WS0()">
<option value="">Change Rooms
<option value="join">/JOIN
<option value="serv=chat.talkcity.comport=6667chan=DianesChatRoom">Talk City
<option value="serv=irc.duh-net.orgport=6667chan=WebTV">Duh Net
<option value="serv=irc.xworld.orgport=6667chan=Webtv-Diane">Xworld
<option value="serv=irc.zuh.netport=6667chan=Diane's_Domain">Zuh Net
<option value="serv=promo.iacta.comport=6667chan=Net4TV">Net4TV
<option value="gotop">Server ^ TOP
</select>
<td>
<form name="pop">
<select name="poptext" size=1 onChange="sendPopup()" onFocus="WS11()" onBlur="WS0()">
<option value="">Popup Messages
<option value="/who">/who
<option value="Hello, how are you?">Hello
<option value="Welcome to the Chat Room">Welcome
<option value="/me thinks Diane's Chats are the BEST!">Diane's Chats
<option value="ID">Show Connect ID
</select>
<td>
<form name="music">
<select name="musicmenu" size=1 onChange="playMusic()" onFocus="WS12()" onBlur="WS0()">
<option value="">Music Menu
<option value="http://members.tripod.com/~dianedumas/mid/stmusic.mid">ST: First Contact
<option value="http://members.tripod.com/~dianedumas/mid/stdumas.mid">St. Dumas Theme
<option value="http://www.wbr.com/med/ppm/virtualp.ram">Internet Song
<option value="http://net4tv.com/livetest/livetest.ram">Net4TV Live Audio
</select>
</table>
</center>
</BODY>
</HTML>