A simple !8ball script,
Put this into your Remotes Alt + R.
Enjoy.
on *:TEXT:!8ball*: {
set %8ball $rand(1,7)
if (%8ball == 1) {
msg $chan 12The magical Eight-Ball says,"5It seems so.12"
}
elseif (%8ball == 2) {
msg $chan 12The magical Eight-Ball says,"5I doubt it.12"
}
elseif (%8ball == 3) {
msg $chan 12The magical Eight-Ball says,"5I dont't care.12"
}
elseif (%8ball == 4) {
msg $chan 12The magical Eight-Ball says,"5Who the hell are you?.12"
}
elseif (%8ball == 5) {
msg $chan 12The magical Eight-Ball says,"5Ask me again in 1000 years.12"
}
elseif (%8ball == 6) {
msg $chan 12The magical Eight-Ball says,"5Absolutely not!12"
}
elseif (%8ball == 7) {
msg $chan 12The magical Eight-Ball says,"5I'm 100% sure that its true.12"
}
}
;;;end;;;
you are better off doing it this way
on *:TEXT:!8ball*: {
if (!$($+(%,8ballflood),2)) {
set -u3 $+(%,8ballflood) on
var %8ball = It seems so.|I doubt it.|I dont't care.|Who the hell are you?|Ask me again in 1000 years.|Absolutely not!|I'm 100% sure that its true.
msg $chan 12The magical Eight-Ball says,"5 $gettok(%8ball,$r(1,7),124) 12"
}
}
or this way (this one was made by napa182 and is triggered in a form of a question. like "8ball will i get home tonight?")
on *:text:*:#:{
if ($regex($1-,/^(8ball\s(.*)\?)$/S) && !$($+(%,ball8flood),2)) {
set -u3 $+(%,ball8flood) $nick
var %^ = Ask again later.|Not a chance.|As I see it, yes.|Don't count on it.|My sources say no.|Yes.
describe # shakes up the 8ball...
.timer8ball 1 2 msg # The magic 8ball says: $gettok(%^,$r(1,6),124)
}
}
i aggee with u on the variables part slacker however i maintain my point that i like simple stuff it as simple as that. for example i needed a new factoid script so i made the http://patxbot.tk snippet :)
you dont have to bring nothing down for me, but giving it a score of an 8 "8 meaning very useful" on somthing coded like this just seems to be a joke.
there is no reason to be setting global vars for this code at all, and there is no flood protection to it so one can be flooded off the channel useing this.