SaitoBot Scripts

By Aerialman on Aug 06, 2009

This is SaitoBot's (#fc on irc.coldfront.net) !gp and !8ball scripts in mIRC form. They were originally made in Java, but this works the same. Have fun!

on *:text:!8ball*:#:{ 
  set %8ball $rand(1,5)
  if (%8ball == 1) { set %8ballreply Outlook good. }
  if (%8ball == 2) { set %8ballreply Not a chance. }
  if (%8ball == 3) { set %8ballreply Like that's gonna happen! }
  if (%8ball == 4) { set %8ballreply Lady Luck shines upon you. }
  if (%8ball == 5) { set %8ballreply Why should I tell you? }
  msg $chan The 8ball's response to... $+ $2- $+ : %8ballreply
}
on *:text:!gp*:#:{
  set %nick1 $nick($chan,$rand(1,$nick($chan,0)))
  set %nick2 $nick($chan,$rand(1,$nick($chan,0)))
  while (%nick2 == %nick1) { set %nick2 $nick($chan,$rand(1,$nick($chan,0))) }
  set %prob1 $rand(1,100)
  set %prob2 $rand(1,100)
  while (%prob2 >= %prob1) { set %prob2 $rand(1,100) }
  msg $chan The probability of... $+ $2- $+ : Largest chance: %nick1 with %prob1 $+ % $+ . Least chance: %nick2 with %prob2 $+ % $+ .
}
Sign in to comment.
romen   -  Feb 24, 2010

I have a long combination of !8ball and !gp code

 Respond  
romen   -  Feb 24, 2010

on :text:!8ball:#: { set %randxc $r(1,28) {

if (%randxc == 1) { msg $chan $nick, 4Ask again later }
if (%randxc == 2) { msg $chan $nick, 4Not a chance }
if (%randxc == 3) { msg $chan $nick, 4As I see it, yes }
if (%randxc == 4) { msg $chan $nick, 4Better not tell you now }
if (%randxc == 5) { msg $chan $nick, 4Cannot predict now }
if (%randxc == 6) { msg $chan $nick, 4Concentrate and ask again }
if (%randxc == 7) { msg $chan $nick, 4Don't count on it }
if (%randxc == 8) { msg $chan $nick, 4It is certain }
if (%randxc == 9) { msg $chan $nick, 4It is decidedly so }
if (%randxc == 10) { msg $chan $nick, 4Most likely }
if (%randxc == 11) { msg $chan $nick, 4My reply is no }
if (%randxc == 12) { msg $chan $nick, 4My sources say no }
if (%randxc == 13) { msg $chan $nick, 4Outlook good }
if (%randxc == 14) { msg $chan $nick, 4Outlook not so good }
if (%randxc == 15) { msg $chan $nick, 4Reply hazy, try again }
if (%randxc == 16) { msg $chan $nick, 4Signs point to yes }
if (%randxc == 17) { msg $chan $nick, 4Very doubtful }
if (%randxc == 18) { msg $chan $nick, 4Without a doubt }
if (%randxc == 19) { msg $chan $nick, 4Yes }
if (%randxc == 20) { msg $chan $nick, 4Yes - definitely }
if (%randxc == 21) { msg $chan $nick, 4You may rely on it }
if (%randxc == 22) { msg $chan $nick, 4Do I Look Like I Care? }
if (%randxc == 23) { msg $chan $nick, 4Yeah, Right }
if (%randxc == 24) { msg $chan $nick, 4Ask a better question }
if (%randxc == 25) { msg $chan $nick, 4Well, $rand(1,50) years, $rand(17,364) days, $rand(0,23) hours, $rand(0,59) minutes, and some odd seconds...wait, what was the question? }
if (%randxc == 26) { msg $chan $nick, 4lol, seriously? You can ask me any question and you ask " $+ $2- $+ " }
if (%randxc == 27) { msg $chan $nick, 4Is this a trick? Or you are just stupid? }
if (%randxc == 28) { msg $chan $nick, 7Hello is this John? (I'm sorry , he left in an hour ago.Try calling back later ok?) ok. Oh sorry i was'nt listenning what was your question again? }

} } on :text:!gp:#:{ set %nick1 $nick($chan,$rand(1,$nick($chan,0))) set %nick2 $nick($chan,$rand(1,$nick($chan,0))) while (%nick2 == %nick1) { set %nick2 $nick($chan,$rand(1,$nick($chan,0))) } set %prob1 $rand(1,100) set %prob2 $rand(1,100) while (%prob2 >= %prob1) { set %prob2 $rand(1,100) } msg $chan The probability of... $+ $2- $+ : Largest chance: %nick1 with %prob1 $+ % $+ . Least chance: %nick2 with %prob2 $+ % $+ . }

 Respond  
romen   -  Feb 24, 2010

Hey i have a code a long code. I have a long combination of !8ball and !gp

 Respond  
Aerialman   -  Feb 22, 2010

Ok guys I get it I double posted it.

@PATX

Tell me what's wrong with the code and I'll fix it. I didn't see anything wrong with it when I tested it.

 Respond  
VinX   -  Aug 25, 2009
PATX   -  Aug 13, 2009
Weasel   -  Aug 13, 2009

Maybe add more?

 Respond  
Aerialman   -  Aug 12, 2009

@Master of Death: Sorry, my computer was running slow and I double clicked the Submit button.

 Respond  
Weasel   -  Aug 07, 2009

Check it on the mirc forum

 Respond  
Master-Of-Death   -  Aug 07, 2009

Why have you double posted this snippet?

I thought it was against the rules to double post? I could be wrong?

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.