#!/usr/bin/perl
print "Content-type: text/html\n\n";
open(count,"count.txt");
@total = ;
$to = $total[0];
$to++;
close(count);
open(count2,">count.txt");
print count2 "$to";
close(count2);
if((index($ENV{'HTTP_USER_AGENT'},"WebTV",0)) == -1)
{print "Error: This file cannot be sourced because you suck dick!"; exit;}
$back = $ENV{'HTTP_REFERER'};
$cookie = $ENV{'HTTP_COOKIE'};
$cookie .= ";";
$emb = "blank.html";
$eb = (index($cookie,"EMBED=",0));
if($eb ne -1){$ebb = (index($cookie,";",$eb));
$ebbb = $ebb - $eb - 6;
$emb = (substr($cookie,$eb + 6,$ebbb));}
$SS = 0;
$Sx = (index($cookie,"TIMES=",0));
if($Sx ne -1){$Sxx = (index($cookie,";",$Sx));
$Sxxx = $Sxx - $Sx - 6;
$SS = (substr($cookie,$Sx + 6,$Sxxx));}
$MM = 0;
$Mx = (index($cookie,"TIMEM=",0));
if($Mx ne -1){$Mxx = (index($cookie,";",$Mx));
$Mxxx = $Mxx - $Mx - 6;
$MM = (substr($cookie,$Mx + 6,$Mxxx));}
$HH = 0;
$Hx = (index($cookie,"TIMEH=",0));
if($Hx ne -1){$Hxx = (index($cookie,";",$Hx));
$Hxxx = $Hxx - $Hx - 6;
$HH = (substr($cookie,$Hx + 6,$Hxxx));}
$text1 = "white";
$tx = (index($cookie,"TEXT1=",0));
if($tx ne -1){$txx = (index($cookie,";",$tx));
$txxx = $txx - $tx - 6;
$text1 = (substr($cookie,$tx + 6,$txxx));}
$text2 = "black";
$ty = (index($cookie,"TEXT2=",0));
if($ty ne -1){$tyy = (index($cookie,";",$ty));
$tyyy = $tyy - $ty - 6;
$text2 = (substr($cookie,$ty + 6,$tyyy));}
$table = "black";
$ta = (index($cookie,"TABLES=",0));
if($ta ne -1){$taa = (index($cookie,";",$ta));
$taaa = $taa - $ta - 7;
$table = (substr($cookie,$ta + 7,$taaa));}
$ig = (index($cookie,"IGNORE=",0));
if($ig ne -1){$igg = (index($cookie,";",$ig));
$iggg = $igg - $ig - 7;
$ignore = (substr($cookie,$ig + 7,$iggg));}
$x = (index($cookie,"SCRIPTV=",0));
if($x ne -1){$xx = (index($cookie,";",$x));
$xxx = $xx - $x - 8;
$xscript = (substr($cookie,$x + 8,$xxx));}
$h = (index($cookie,"HOST=",0));
if($h ne -1){$hh = (index($cookie,";",$h));
$hhh = $hh - $h - 5;
$fh = (substr($cookie,$h + 5,$hhh));}
$p = (index($cookie,"PORT=",0));
if($p ne -1){$pp = (index($cookie,";",$p));
$ppp = $pp - $p - 5;
$fp = (substr($cookie,$p + 5,$ppp));}
$r = (index($cookie,"ROOM=",0));
if($r ne -1){$rr = (index($cookie,";",$r));
$rrr = $rr - $r - 5;
$fr = (substr($cookie,$r + 5,$rrr));}
$bg = "black";
$cbg = "black";
$q = (index($cookie,"BGCOLOR=",0));
if($q != -1)
{$qq = (index($cookie,";",$q));
$qqq = $qq - $q - 8;
$bg = (substr($cookie,$q + 8,$qqq));}
$qt = (index($cookie,"CHATCOLOR=",0));
if($qt != -1)
{$qqt = (index($cookie,";",$qt));
$qqqt = $qqt - $qt - 10;
$cbg = (substr($cookie,$qt + 10,$qqqt));}
$host = "document.chatroom.server.value";
$room = "document.chatroom.channel.value";
$port = "document.chatroom.number.value";
$fo = "text=$text1 nobackground cursor=$text1 font=proportional nohighlight autoactivate border=0"; $bo = "borderimage=\"file://rom/borders/buttonborder2.bif\" text=white"; print <ScripTV IRC
"); document.screen.document.close(); document.cookie = "ROOM=" + room + "; expires = Monday, 04-Apr-2010 5:00:00GMT"; document.cookie = "HOST=" + host + "; expires = Monday, 04-Apr-2010 5:00:00GMT"; document.cookie = "PORT=" + port + "; expires = Monday, 04-Apr-2010 5:00:00GMT"; } keeptimer(); } var minu = 0; var seco = 0;
var reason = "";
var goneat = "";
var on = "";
function afk()
{
on = "yes";
minu = 0;
seco = 0;
reason = document.chatbar.chmg.value.substring(5);
Chat.addChannelMessage(reason + " AFK");
goneat = document.clock.count.value;
goafk();
keeptime();
}
function keeptime()
{
seco++;
if(seco == "60"){seco = 0;
minu++;}
if(on == "yes"){setTimeout("keeptime()", 1000);}
else{Chat.addChannelMessage("Returned from " + reason + " gone since " + goneat + " for " + minu + " minutes, " + seco + " seconds");} } function goafk()
{
if(on == "yes"){Chat.addChannelMessage("/me is AFK, " + reason + " since " + goneat); setTimeout("goafk()", 180000);} }
function priv()
{
window.open("whisper.panel");
}
var ignore = "$ignore";
function msg()
{
var talk = document.chatbar.chmg.value;
var t = talk.toLowerCase();
if(talk.substring(0,1) != "/"){document.info.status.value = "Last Message: " + talk;} else{ last = "Last Command: ";
stat = "Unknown Command";
if(t.substring(0,3) == "/bg"){if(t.substring(4) != "")
{stat = "Change Background to " + talk.substring(4);
document.bgColor = talk.substring(4);
document.cookie = "BGCOLOR=" + talk.substring(4) + "; exipres = Monday, 04-Apr-2010 5:00:00GMT";} else{last = "Error-04: "; stat = "Background Color not specified";} talk = "";}
if(t == "/fix"){stat = "Use Music Fixed Version (slower)"; keeptimer();
talk = "";
parent.location = "scriptv2.pl";}
if(t.substring(0,7) == "/search"){stat = "Search for " + talk.substring(8); talk = "/whois *" + t.substring(8) + "*";} if(t.substring(0,4) == "/afk"){afk(); stat = "AFK Bot On, Type //afk to turn off, Reason: " + t.substring(5); talk = "";}
if(t == "//afk"){on = "no";
stat = "AFK Bot Off, Welcome back!";
talk = "";}
if(t.substring(0,3) == "/pm")
{
stat= "Perminate Private Message Mode ON, Nick: " + talk.substring(4); pn = "/msg " + talk.substring(4) + " "; talk = "";
}
if(t.substring(0,4) == "//pm")
{
stat = "Perminate Private Message Mode OFF";
pn = "";
talk = "";
}
if(t == "/list"){last = "Command List:";
stat = "
/afk //afk /alarm /bg
/buddy /chatbg /close /edit
/erasei /fix /join /help
/im /loadi /msgbox1 /msgbox2
/music /pm //pm /quit
/reload /safe /script /snooze
/table /text1 /text2 /viewi
/clone
More coming soon!";
talk = "";}
if(t == "/quit")
{
keeptimer();
parent.location = "$back";
}
if(t.substring(0,3) == "/im")
{stat = "Start a conversation with " talk.substring(4); Blim.openConversation(talk.substring(4)); Blim.openMessagesPanel();
}
if(t.substring(0,9) == "/chattext")
{stat = "Change chat text color to " + talk.substring(10); ctex = "yes";
ctext = t.substring(10);
talk = "";}
if(t == "/edit")
{
parent.location = "script.pl";
}
if(t.substring(0,6) == "/text2"){
if(t.substring(7) != "")
{stat = "Change text color 2 to " + talk.substring(7);
document.cookie = "TEXT2=" + talk.substring(7) + "; expires = Monday, 04-Apr-2010 5:00:00GMT"; keeptimer(); parent.location = history.go();}
else{last = "Error-03: ";
stat = "Color not defined";}
talk = "";}
if(t.substring(0,6) == "/text1"){
if(t.substring(7) != "")
{stat = "Change text color 1 to " + talk.substring(7);
document.cookie = "TEXT1=" + talk.substring(7) + "; expires = Monday, 04-Apr-2010 5:00:00GMT"; keeptimer(); parent.location = history.go();}
else{last = "Error-03: ";
stat = "Color not defined";}
talk = "";}
if(t.substring(0,6) == "/table"){
if(t.substring(7) != "")
{stat = "Change table color to " + talk.substring(7);
document.cookie = "TABLES=" + talk.substring(7) + "; expires = Monday, 04-Apr-2010 5:00:00GMT"; keeptimer(); parent.location = history.go();}
else{last = "Error-03: ";
stat = "Color not defined";}
talk = "";}
if(t == "/safe")
{
talk = "";
document.screen.document.open();
document.screen.document.write("You are now safe from flooders. Type /reload or click connect to restart chat"); document.screen.document.close(); stat = "Secure yourself from flooders";} if(t == "/reload") {connect(); talk = "";
stat = "Refresh the chat screen";}
if(t.substring(0,6) == "/check")
{document.chatbar.chmg.value = "";
if(t.substring(7) != ""){
stat = "Check for " + t.substring(7);
if(find(t.substring(7)) == true)
{parent.location = "file://romcache/music/Splash.mid"}} else{stat = "Error-05: Nick name not specified";} talk = "";}
if(t.substring(0,6) == "/clone"){
r = t.indexOf(" ",7);
q = t.indexOf(" ",r + 1);
s = talk.substring(7,r);
c = talk.substring(r + 1,q);
x = talk.substring(r + 1);
stat = "Clone " + c;
talk = "/me " + s + " " + " " + x;}
if(t.substring(0,5) == "/surf"){if(t.substring(6) != ""){stat = "Surf to " + t.substring(6); document.extra.src = t.substring(6); document.cookie = "EMBED="+t.substring(6)+"; expires = Monday, 04-Apr-2010 5:00:00GMT"; } else{stat = "Error-04:URL not defined";} talk = "";}
if(t.substring(0,5) == "/join"){if(t.substring(6) != "") {stat = "Join room " + t.substring(6);
$room = talk.substring(6);
connect();}
else{last = "Error-04: ";
stat = "Room not specified";}
talk = "";}
if(t.substring(0,7) == "/chatbg"){if(t.substring(8) != ""){stat = "Change Chat Background Color to " + talk.substring(8); chatbg = talk.substring(8); document.screen.document.bgColor = chatbg; document.cookie = "CHATCOLOR=" + chatbg + "; expires = Monday, 04-Apr-2010 5:00:00GMT";} else{last = "Error-03: "; stat = "Color not specified";} talk = "";}
if(t.substring(0,6) == "/alarm"){setalarm();
talk = "";
stat = "Set alarm to " + alarm + " Reason:" + alarmreas;} if(t == "/snooze"){stat = "Turn Alarm Off"; snooze();
talk = "";}
if(t.substring(0,5) == "/help"){talk = "";
last = "Help: ";
stat = "Unknown help command";
var tt = t.substring(6);
if(tt == "/text2"){stat = "Changes the secondary text color of your choice and displays it everytime you come to this irc";} if(tt == "/viewi"){stat = "Views your current \\"Saved\\" ignore list";} if(tt == "/clone"){stat = "Gives the illusion of cloning someone in chat. Type a one word message for you to say, then the nick you are wanting to clone then the message the\\"cloned\\" nick will say. Example: /clone hi! ScripTV I love this IRC";} if(tt == "/list"){stat = "Gives a list of all the commands this IRC features";} if(tt == "/msgbox2"){stat = "Opens up advanced Message boxes with scroll down menu and textarea message box";} if(tt == "/msgbox1"){stat = "Opens up the message boxes with saved nicks below your screen";} if(tt == "/music"){stat = "Opens your saved Music Track feature";} if(tt == "/quit"){stat = "Ends this session of chat and takes you back to your home";} if(tt == "/reload"){stat = "Refreshes the chat screen";} if(tt == "/safe"){stat = "Ends the chat screen and takes you to a safe spot to sit and wait out the flooders";} if(tt == "/script"){stat = "Calls upon your custom script you have created from the custom script editor";} if(tt == "/snooze"){stat = "Turns off the alarm clock";} if(tt == "/table"){stat = "Changes the back ground color of the main chat area";} if(tt =="/text1"){stat = "Changes the main text color to that of your choice to display everytime you come to this IRC";} if(tt == "/afk"){stat = "Turns on the Away from keyboard bot that logs the time you are away and gives the reason you are gone. Example: /afk dinner time";} if(tt == "//afk"){stat = "Turns off the Away from keyboard bot and displays the time you were away, reason, and the time you had turned on the AFK bot";} if(tt == "/pm"){stat = "Turns the Perminate private message mode on, the nick is after the /pm. Now every message will go to the specified nick. To turn it off type //pm. Commands can still be done in this mode";} if(tt == "//pm"){stat = "Turns the Perminate private message mode off";} if(tt == "/alarm"){stat = "Turns the alarm on and displays an alert when the given time has been reached. Enter time as 9:09:09 as an example";} if(tt == "/bg"){stat = "Changes the back ground color to your choice to be displayed evertime you use the IRC. You may change it whenever you wish";} if(tt == "/buddy"){stat = "Displays the buddy list feature below you";} if(tt == "/chatbg"){stat = "Changes the back ground color of the chat screen to your choice to be displayed everytime you connect to a room. You may change it whenever you wish";} if(tt == "/close"){stat = "Closes the current tool under the chat bar";} if(tt == "/edit"){stat = "Goes to the edit/create your own custom script program. If you do not already have a script, a new file will appear an be created for you. If you do have a script, your current one will be displayed for editing";} if(tt == "/erasei"){stat = "Erases and unignores everyone on your current ingore list";} if(tt == "/fix"){stat = "Goes to the fixed and a bit slower version of ScripTV IRC to liste to music onflawlessly";} if(tt == "/help"){stat = "Gives information on a command that you are having trouble with";} if(tt == "/im"){stat = "Starts a Conversation with someone with MSN IM";} if(tt == "/loadi"){stat = "Loads your current ignore list and ignores everyone on it at once";} if(tt == "/list"){stat = "Displays all of the current commands available on this IRC";} }
if(t == "/script"){if("$xscript" == ""){stat = "Error-02: You must create and save a script. Type \\"/help /script\\" for more details";} else{stat = "Open Custom Script"; document.extra.src = "scripts/$xscript\.htm";} document.cookie = "EMBED=scripts/$xscript\.html; expires = Monday, 04-Apr-2010 5:00:00GMT"; talk = "";} if(t == "/music"){stat = "Open Up Saved Music"; document.extra.src = "music.pl"; document.cookie = "EMBED=music.pl; expires = Monday, 04-Apr-2010 5:00:00GMT"; talk = "";} if(t == "/close"){stat = "Close Tools Window"; document.extra.src = "blank.htm"; document.cookie = "EMBED=blank.html; expires = Monday, 04-Apr-2010 5:00:00GMT"; talk = "";}
if(t == "/buddy"){stat = "Open Buddy List";
document.extra.src = "buddy.pl";
document.cookie = "EMBED=buddy.pl; expires = Monday, 04-Apr-2010 5:00:00GMT"; talk = "";}
if(t.substring(0,4) == "/who"){stat = "List of Chatters";} if(t.substring(0,5) == "/msg "){stat = "Private Message";} if(t == "/msgbox2")
{talk = "";
document.extra.src = "msgbox2.pl";
stat = "Open up Advanced Message Box";
document.cookie = "EMBED=msgbox2.pl; expires = Monday, 04-Apr-2010 5:00:00GMT"; }
if(t == "/msgbox1"){document.extra.src = "msgbox.pl";
stat = "Open Message Boxes";
document.cookie = "EMBED=msgbox.pl; expires = Monday, 04-Apr-2010 5:00:00GMT"; talk = "";}
if(t.substring(0,3) == "/me"){stat = "Action";}
if(t.substring(0,7) == "/erasei"){if(ignore == ""){stat = "Error-06:Ignore list empty";} else{ign = " " + ignore; stat = "Load ignore list ";
z = 1;
while(z != 0)
{k = ign.indexOf(",",z);
ke = ign.substring(z,k);
z = k + 1;
Chat.addChannelMessage("/ignore -" + ke);}
document.cookie = "IGNORE=; expires = Monday, 04-Apr-2010 5:00:00GMT"; ignore = "";}
talk = "";}
if(t == "/viewi"){last = "View Ignore List ";
last = ignore;
if(ignore == ""){last = "Error-06: ";
stat = "Ignore list empty";}
talk = "";}
if(t == "/loadi")
{if(ignore == ""){last = "Error-06: ";
stat = "Ignore list empty";}
else{ign = " " + ignore;
stat = "Load ignore list ";
z = 1;
while(z != 0)
{k = ign.indexOf(",",z);
ke = ign.substring(z,k);
z = k + 1;
Chat.addChannelMessage("/ignore " + ke);}}
talk = "";}
if(t.substring(0,7) == "/ignore"){if(t.substring(0,9) == "/ignore -"){stat = "Unignore " + talk.substring(10);} else{stat = "Ignore " + talk.substring(8); ignore = ignore + talk.substring(8) + ","; document.cookie = "IGNORE=" + ignore + "; expires = Monday, 04-Apr-2010 5:00:00GMT";}} if(t.substring(0,6) == "/whois"){stat = "Who is " + talk.substring(7);} if(t.substring(0,6) == "/topic"){stat = "Change topic to " + talk.substring(7);} document.info.status.value = last+ stat; if(stat == "Unknown Command"){talk = "";} } Chat.addChannelMessage(pn + talk); document.chatbar.chmg.value = ""; }
var pn = "";
var alarmreas = "";
var alarm = "";
function setalarm()
{
alarmreas = document.chatbar.chmg.value.substring(7);
alarm = prompt("Enter time you want alarm set to","9:00:00"); }
function snooze()
{
alarmreas = "";
alarm = "";
}
var ctex = "no";
var ctext = "";
function tictoc()
{
var digital = new Date();
var ho = digital.getHours();
if(ho > 12){h = ho - 12;}
if(ho < 13){h = ho;}
var mi = digital.getMinutes();
if(mi < 10){m = "0" + mi;}
if(mi > 9){m = mi;}
var se = digital.getSeconds();
if(se < 10){s = "0" + se;}
if(se > 9){s = se;}
document.clock.count.value = h + ":" + m + ":" + s;
if(document.clock.count.value == alarm)
{alert("Time to " + alarmreas);}
if(ctex = "yes")
{document.screen.fgColor = ctext;}
setTimeout("tictoc()", 1000);
}
tictoc();
var urmin = $MM\;
var ursec = $SS\;
var urhour = $HH\;
function keeptimer()
{
var D = new Date();
var M = D.getMonth();
var Da = D.getDate();
var Dy = D.getDay();
var T = T.getTimezoneOffset();
Dy++;
if(Dy == 7){Dy = 0;}
Da++;
if(Dy == 0){Dy = "Sunday";}
if(Dy == 1){Dy = "Monday";}
if(Dy == 2){Dy = "Tuesday";}
if(Dy == 3){Dy = "Wednesay";}
if(Dy == 4){Dy = "Thursday";}
if(Dy == 5){Dy = "Friday";}
if(Dy == 6){Dy = "Saturday";}
if(M == 0){M = "Jan";}
if(M == 1){M = "Feb";}
if(M == 2){M = "Mar";}
if(M == 3){M = "Apr";}
if(M == 4){M = "May";}
if(M == 5){M = "Jun";}
if(M == 6){M = "Jul";}
if(M == 7){M = "Aug";}
if(M == 8){M = "Sep";}
if(M == 9){M = "Oct";}
if(M == 10){M = "Nov";}
if(M == 11){M = "Dec";}
document.cookie = "TIMES=" + ursec + "; expires = " + Dy + ", " + Da + "-" + M + "-2000 " + T + ":00:00GMT"; document.cookie = "TIMEM=" + urmin + "; expires = " + Dy + ", " + Da + "-" + M + "-2000 " + T + ":00:00GMT"; document.cookie = "TIMEH=" + urhour + "; expires = " + Dy + ", " + Da + "-" + M + "-2000 " + T + ":00:00GMT"; } function timekeeper() {
ursec++;
if(ursec >= 60){ursec = 0;
urmin++;
if(urmin >= 60){urmin = 0;
urhour++;}}
if(ursec < 10){urs = "0" + ursec;}
if(urmin < 10){urm = "0" + urmin;}
if(urhour < 10){urh = "0" + urhour;}
if(ursec > 10){urs = ursec;}
if(urmin > 10){urm = urmin;}
if(urhour > 10){urh = urhour;}
window.status = "Chat Time for Today: " + urh + ":" + urm + ":" + urs; setTimeout("timekeeper()", 1000);
}
timekeeper();
document.write("");