/ScriptServ

on 1:text:!8ball*:%8ball:{ 
  if (%ball == on) && (? !isin $2-) { msg # 12 $+ $nick 4The 8ball says:12 Use a Question mark!! }
  else if (%ball == on) && (Who isin $2-)  { msg # 12 $+ $nick 4The 8ball says:12 $read [ $mircdirGame\8ballWho.txt ] }
  else if (%ball == on) && (Where isin $2-)  { msg # 12 $+ $nick 4The 8ball says:12 $read [ $mircdirGame\8ballWhere.txt ] }
  else if (%ball == on) && (Why isin $2-)  { msg # 12 $+ $nick 4The 8ball says:12 $read [ $mircdirGame\8ballWhy.txt ] }
  else if (%ball == on) && (When isin $2-)  { msg # 12 $+ $nick 4The 8ball says:12 $read [ $mircdirGame\8ballWhen.txt ] }
  else if (%ball == on) && (What isin $2-)  { msg # 12 $+ $nick 4The 8ball says:12 $read [ $mircdirGame\8ballWhat.txt ] }
  else if (%ball == on) { msg # 12 $+ $nick 4The 8ball says:12 $read [ $mircdirGame\8ballYes.txt ] }
}
#fortune
on 1:text:*!fortune*:#:if (%fortune == on ) { msg # 12 $+ $nick 4 $+ $read [ $$mircdirGame\fortune.txt ] }
#fortune end

#number on
on 1:TEXT:!guess*:%guessnumber.chan: {
  if ( %guessnumber. [ $+ [ $nick ] ] == $null ) { set %guessnumber. [ $+ [ $nick ] ] 1 | goto check }
  elseif ( %guessnumber. [ $+ [ $nick ] ] == 1 ) { set %guessnumber. [ $+ [ $nick ] ] 2 | goto check }
  elseif ( %guessnumber. [ $+ [ $nick ] ] == 2 ) { set %guessnumber. [ $+ [ $nick ] ] 3 | goto check }
  elseif ( %guessnumber. [ $+ [ $nick ] ] == 3 ) { set %guessnumber. [ $+ [ $nick ] ] 4 | msg %guessnumber.chan 4Sorry12 $nick $+ , 4you already guessed 3 times. | goto end } 
  elseif ( %guessnumber. [ $+ [ $nick ] ] == 4 ) { msg %guessnumber.chan 4Sorry12 $nick $+ , 4you already guessed 3 times. | goto end } 
  else { goto end }
  :check
  if ( %guessnumber.what == $parm2 ) { 
    .disable #number
    .timer50 off
    .timer51 off
    .timer52 off
    msg %guessnumber.chan 4We Have A Winner!12 $nick 4guessed the correct number! | msg %guessnumber.chan 4The correct number was12 %guessnumber.what - 4Congratulations! 
    msg %guessnumber.chan 4Number Guess Has Now Been 12Deactivated!
    unset %guessnumber.*
    goto end
  }
  else {
    msg %guessnumber.chan 4Sorry12 $nick $+ , 4that is not the correct number.
    goto end
  }
  :end
}
#number end

#Flipper off
on *:text:!flip*:#: { 
  %flip = $rand(1,2)
  if ( %flip = 1 ) { 
    if ( $strip($parm2) == heads ) { msg $chan 12 $+ $nick 4Flips the coin, and it lands on $chr(91) $+ 1HEADS4 $+ $chr(93) $+ . 12You win!! }
    if ( $strip($parm2) == tails ) { msg $chan 12 $+ $nick 4Flips the coin, and it lands on $chr(91) $+ 1HEADS4 $+ $chr(93) $+ . 12You lose!! }
  }
  if ( %flip = 2 ) { 
    if ( $strip($parm2) == heads ) { msg $chan 12 $+ $nick 4Flips the coin, and it lands on $chr(91) $+ 1TAILS4 $+ $chr(93) $+ . 12You lose!! }
    if ( $strip($parm2) == tails ) { msg $chan 12 $+ $nick 4Flips the coin, and it lands on $chr(91) $+ 1TAILS4 $+ $chr(93) $+ . 12You win!! }
  }
}
#flipper end

#spin off
on 1:TEXT:!spin*:%spin: {
  set %spin.num $rand(1,$nick($chan,0))
  set %spin.nick $nick($chan,%spin.num)
  msg %spin 12 $+ $nick 4Spins The Bottle, And It Stops On12 %spin.nick
}
#spin end
alias spin { .disable #number | msg %guessnumber.chan 4The correct number was12 %guessnumber.what | unset %guessnumber.* | say 4There were 12No winners. | say 4Number Guess Has Been 12Deactivated! | .timer50 off | .timer51 off | .timer52 off }

#vote off
on 1:text:!yes*:%vote.chan:inc %vote.yes | .notice $nick 4Your vote of 12!Yes 4has been casted! %version | .guser voted $nick 3
on 1:text:!no*:%vote.chan:inc %vote.no | .notice $nick 4Your vote of 12!No4 has been casted! %version | .guser voted $nick 3
on +voted:text:!yes*:%vote.chan:.notice $nick 4You may only vote 12once! %version
on +voted:text:!no*:%vote.chan:.notice $nick 4You may only vote 12once! %version
on 1:text:!dunno*:%vote.chan:.notice $nick 4Don't be so stupid, vote 12!yes 4or 12!no %version
on 1:text:!maybe*:%vote.chan:.notice $nick 4Don't be so stupid, vote 12!yes 4or 12!no %version
#vote end