Hey TestMaxers.. jobbet med et script for en kompis på IRC som ville ha en lik bot som på #lost kanalen på Quakenet...
Så ideen går hovedsaklig til #lost kanalen.. men scriptet er ikke laget av andre enn meg selv med egen improvisasjon..
Hva Det gjør: Det er for dere som vil lage en kanal med informasjon rundt en Tv Serie.
Du skriver inn informasjon til boten angående neste tv sending for serien.
Og boten regner ut og gir ut informasjon til kanalen den er satt til og udbyde siner servicer for!
Kommandoene får du når du loader scriptet!
eks.
I #channel
[19:00:44] <@eG|Christer> !next
[19:00:44] <eG|Christ3r> Next Episode (12x2 - Dead) will be inn 4days 18hrs 36mins 16secs
[19:00:58] <@eG|Christer> !nextinfo
[19:00:58] <eG|Christ3r> :: (12x2 - Dead) - Everybody dies ::
[19:03:35] <eG|Christ3r> This is the Automessage that can say whatever you want
i Privat chat (query\PM)
[19:00:20] <eG|Christer> !setdelay 500
[19:00:20] <eG|Christ3r> New Delay is set to 500 Seconds
[19:01:36] <eG|Christer> !setinfo everybody Dies
[19:01:36] <eG|Christ3r> - Done - Spoiler: everybody Dies
[19:02:03] <eG|Christer> !settime 24/05/2008 13:37:00
[19:02:03] [pn] <eG|Christ3r>: :::::: Done - Next Episode is: 5days 18hrs 34mins 57secs
[19:03:02] <eG|Christer> !setautomsg This is the Automessage that can say whatever you want
[19:03:02] <eG|Christ3r> - Done - New Automsg: This is the Automessage that can say whatever you want
[19:03:42] <eG|Christer> !setepisode 11x2 Dead
[19:03:42] <eG|Christ3r> Next episode: 11x2 Dead
Scriptet:
on *:load: {
set %ep.channel $$?="What Channel do you want me on? $crlf Please specify only 1"
set %ep.episode $$?="What is the current episode?"
set %ep.automsg $$?="input the Automsg you want to display"
set %ep.info $$?="Info about the Episode thats comming"
set %ep.time $$?="When will it be shown on TV? dd/mm/yyyy hh:mm:ss"
set %ep.timer $$?="How often do you want the Automsg Sent? (seconds)"
echo 5 -ag --------------------
echo 5 -ag - (C) COPYRIGHTED FOR CHRISTER @ www.TestMax.dk -
echo 5 -ag - You can change whatever you want from this script. -
echo 5 -ag - But you cant take Credit for it as the script is written in default! -
echo 5 -ag --------------------
echo 4 -ag Commands - in Channel ( $+ %ep.channel $+ )
echo 4 -ag !next - Shows the next episode name and how long until its released
echo 4 -ag !nextinfo - Shows a spoiler for the episode
echo 4 -ag Commands - in Query (PM) -> admins only <-
echo 4 -ag !setepisode <EPISODE NAME> - Sets the next Episode name
echo 4 -ag !settime <FULL DATE> - input the FULL DATE of the next episode release
echo 4 -ag !setdelay <SECONDS> - Changes the delay for the automsg
echo 4 -ag !setautomsg <Message> - Changes the message of Automessage
echo 4 -ag !setinfo <spoiler\info> - Change the info for the Episode release
echo 3 -ag Thats All. Enjoy!
echo 3 -ag --------- CURRENT SETTINGS ---------
echo 3 -ag --------------------------------------
echo 3 -ag Channel: %ep.channel
echo 3 -ag Current Episode: %ep.episode
echo 3 -ag Episode Spoiler: %ep.info
echo 3 -ag AutoMsg: %ep.automsg
echo 3 -ag Automsg Delay: %ep.timer seconds
echo 3 -ag --------------------------------------
echo 3 -ag -------------- END -----------------
if ($server) {
/j %ep.channel
timerepisode 0 %ep.timer /msg %ep.channel %ep.automsg
}
}
on *:connect: {
/j %ep.channel
timerepisode 0 %ep.timer /msg %ep.channel %ep.automsg
}
on *:text:*:#: {
if ($1 == !next) {
msg $chan Next Episode ( $+ %ep.episode $+ ) will be inn $duration($calc($ctime(%ep.time) - $ctime))
}
if ($1 == !nextinfo) {
notice $nick :: ( $+ %ep.episode $+ ) - %ep.info ::
}
}
on *:text:*:?: {
if ($nick isop %ep.channel) {
if ($1 == !setepisode) { set %ep.episode $2- | msg $nick Next episode: %ep.episode }
if ($1 == !setinfo) { set %ep.info $2- | msg $nick - Done - Spoiler: %ep.info }
if ($1 == !setautomsg) {
set %ep.automsg $2-
msg $nick - Done - New Automsg: %ep.automsg
timerepisode off
timerepisode 0 %ep.timer /msg %ep.channel %ep.automsg
}
if ($1 == !setdelay) {
set %ep.timer $2
timerepisode off
timerepisode 0 %ep.timer /msg %ep.channel %ep.automsg
msg $nick New Delay is set to $+ %ep.timer Seconds
}
if ($1 == !settime) {
if (*/*/* *:*:* iswm $2-) {
set %ep.time $2-
msg $nick Done - Next Episode is: $duration($calc($ctime(%ep.time) - $ctime))
}
else { notice $nick Wrong Format: Please use dd/mm/yyyy hh:mm:ss as Date format }
}
}
}