* PoiXons * Bingo * Game * V1 !! *

By PoiXon on Nov 14, 2004

This A Bingo Game For People In The Chan , type /gamechan to put the game in watever channel u want to !!! type /del_nick to delete a persons nick in the !top5 list ! , type /reset to reset the score board !! whenever a person joins whos in the !Top5 Will Get halfop or Op !! depends on their score !! the script will work when someone in the channel types !Bingo ( This Will Only Work If You Have Set The /gamechan in the channel that the person types !Bingo ) .. Have Fun !!!! :D

on *:TEXT:!bingo:%channel: {
  set %number $rand(1,50) 
  set %number2 $rand(1,50) 
  set %number3 $rand(1,50)
  set %number4 $rand(1,50)
  set %number5 $rand(1,50)
  set %lucky $rand(1,50)
  set %lucky1 $rand(1,50)
  set %lucky2 $rand(1,50)
  set %lucky3 $rand(1,50)
  set %lucky4 $rand(1,50)
  set %lucky5 $rand(1,50)
  notice $nick Ur Numbers are:
  notice $nick %number 
  notice $nick %number2
  notice $nick %number3
  notice $nick %number4
  notice $nick %number5
  timer 1 1 notice $nick The First Number is %lucky
  timer 1 4 notice $nick The Second Number is %lucky2
  timer 1 7 notice $nick The Third Number is %lucky3
  timer 1 10 notice $nick The Fourth Number is %lucky4
  timer 1 13 notice $nick And The Thunderball is ... %lucky5
  timer 1 14 notice $nick Calculating Stats ...
  if (%lucky == %number) { set %a 1 }
  if (%lucky == %number2) { set %b 1 }
  if (%lucky == %number3) { set %c 1 }
  if (%lucky == %number4) { set %d 1 }
  if (%lucky == %number5) { set %e 1 }
  if (%lucky2 == %number) { set %f 1 }
  if (%lucky2 == %number2) { set %g 1 }
  if (%lucky2 == %number3) { set %h 1 } 
  if (%lucky2 == %number4) { set %i 1 }
  if (%lucky2 == %number5) { set %j 1 }
  if (%lucky3 == %number) { set %k 1 }
  if (%lucky3 == %number2) { set %l 1 }
  if (%lucky3 == %number3) { set %m 1 }
  if (%lucky3 == %number4) { set %n 1 }
  if (%lucky3 == %number5) { set %o 1 }
  if (%lucky4 == %number) { set %p 1 }
  if (%lucky4 == %number2) { set %q 1 }
  if (%lucky4 == %number3) { set %r 1  }
  if (%lucky4 == %number4) { set %s 1 }
  if (%lucky4 == %number5) { inc %t 1 }
  if (%lucky5 == %number) { set %u 1 }
  if (%lucky5 == %number2) { set %v 1 }
  if (%lucky5 == %number3) { set %w 1 }
  if (%lucky5 == %number4) { set %x 1 }
  if (%lucky5 == %number5) { set %y 1 }
  set %score $calc(%a + %b + %c + %d + %e + %f + %g + %h + %i + %j + %k + %l + %m + %n + %o + %p + %q + %r + %s + %t + %u + %v + %w + %x + %y)
  timer 1 16 msg $chan $nick has got %score Right
  if (%score == 1) { set %winner5 $nick | msg $nick u have been added as winner 5 , type !top5 to see the highest scores }
  if (%score == 2) { set %winner4 $nick | msg $nick Congrats , u have been added as winner4 type !top5 to see the top 5 people }
  if (%score == 3) { set %winner3 $nick | msg $nick Congrats , u have been added as winner3 type !top5 to see the top 5 people }
  if (%score == 4) { set %winner2 $nick | msg $nick Congrats , u have been added as winner2 type !top5 to see the top 5 people }
  if (%score == 5) { set %winner $nick | msg $nick CONGRATS !!!!! , u are the winner !!! Type !top5 !!! to see the top 5 people }
  unset %a
  unset %b
  unset %c
  unset %d
  unset %e
  unset %f
  unset %g
  unset %h
  unset %i
  unset %j
  unset %k
  unset %l
  unset %m
  unset %n
  unset %o
  unset %p
  unset %q
  unset %r
  unset %s
  unset %t
  unset %u
  unset %v
  unset %w
  unset %x
  unset %y
}
on *:TEXT:!Top5:%channel: {
  msg $nick 1st " %winner "
  msg $nick 2nd " %winner2 "
  msg $nick 3rd " %winner3 "
  msg $nick 4th " %winner4 "
  msg $nick 5th " %winner5 "
}
on *:JOIN:%channel: {
  if ($me isop #) {
    if ($nick == %winner) { mode %channel +o $nick | msg $chan $nick Got OP because he/she Is the Winner Of Bingo .. 1st  }
    if ($nick == %winner2) { mode %channel +o $nick | msg $chan $nick Got OP because he/she won at bingo and is second just under %winner }
    if ($nick == %winner3) { mode %channel +h $nick | msg $chan $nick Got HOP because he/she won at bingo ! }
    if ($nick == %winner4) { mode %channel +h $nick | msg $chan $nick Got HOP because he/she won at bingo ! }
    if ($nick == %winner5) { mode %channel +h $nick | msg $chan $nick Got HOP because he/she won at bingo ! }
  }
}
alias reset {
  echo You Have Deleted all Winners 
  unset %winner
  unset %winner2
  unset %winner3
  unset %winner4
  unset %winner5
}
alias del_nick {
  echo You Have Deleted The $1 $+ 's account
  if ($1 == %winner) { unset %winner }
  if ($1 == %winner2) { unset %winner2 } 
  if ($1 == %winner2) { unset %winner3 }
  if ($1 == %winner2) { unset %winner4 }
  if ($1 == %winner2) { unset %winner5 }
}
alias gamechan {
  set %channel $$?="Enter Channel For Bingo" 
}

Comments

Sign in to comment.
airfreshner   -  Feb 02, 2007

great bot

love it,

 Respond  
LilPiMp   -  Mar 01, 2005

nice poixon :

 Respond  
PoiXon   -  Nov 17, 2004

lol , Thanks People :)

 Respond  
DarthReven   -  Nov 16, 2004

oops i sent cause i was blown away very nice job 2 thumbs up dear boy

 Respond  
DarthReven   -  Nov 16, 2004
 Respond  
ZeroCool   -  Nov 16, 2004

damn PoiXon ur my idol :)

 Respond  
-MaRtYn-   -  Nov 14, 2004

cool its a fun game to play :D

 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.