All pastes #462541 Raw Edit

Stuff

public text v1 · immutable
#462541 ·published 2007-04-28 11:03 UTC
rendered paste body
on *:text:!trivia:#: {
  if (%trivia == $null) { 
    msg $chan 4Trivia12 Has Started. You Have4 30 12seconds to Answer
    set %thing $read(trivia.txt)   
    set %question $gettok(%thing,1,124)
    set %trivia on
    set %answer $gettok(%thing,4,124)
    msg $chan 4Question:12 %question
    set %chan #
    .timer1 1 15 msg $chan 12HINT:4 $gettok(%thing,2,124)
    .timer2 1 25 msg $chan 12HINT:4 $gettok(%thing,3,124)
    .timer3 1 35 wrong
    haltdef
  }
  else { msg $nick 4Trivia12 is Already On }
}
alias wrong {
  if (%trivia == on) {
    msg %chan 12You Failed To Answer The Question! next Question in4 5 12seconds!
    unset %answer
    unset %question
    unset %thing  
    .timer 1 5 new
    haltdef
  }
}
alias new {
  if (%trivia == on) {
    set %thing $read(trivia.txt)
    set %question $gettok(%thing,1,124)
    set %trivia on
    set %answer $gettok(%thing,4,124)
    msg %chan 12New Question:4 %question
    .timer1 1 15 msg %chan 12HINT:4 $gettok(%thing,2,124)
    .timer2 1 25 msg %chan 12HINT:4 $gettok(%thing,3,124)
    .timer3 1 35 wrong
    haltdef
  }
}
on *:text:*:%chans: {
  if ($1 == %answer) {
    .timer3 off
    .timer1 off
    .timer2 off
    msg %chan 12You Got It Right The Answer Was:4 $+(%answer,!)$+ $+(12,$nick)$+ Has %score [ $+ [ $nick ] ] Point(s)!
    inc %score [ $+ [ $nick ] ]
    unset %answer
    unset %question
    unset %thing
    .timer 1 5 new
    haltdef
  }
  if ($1 == !strivia) {
    msg %chan 4Trivia12 Has Been Halted!
    .timer1 off
    .timer2  off
    .timer3 off
    .timer4 off
    unset %trivia
    unset %answer
    unset %question
    unset %thing
    haltdef
  }
  if ($1 == !won) {
    if (%score [ $+ [ $nick ] ] == $null) {
      notice $nick You Have 0 Points
    }
    elseif (%score [ $+ [ $nick ] ] != $null) {
      notice $nick You Have %score [ $+ [ $nick ] ] Points!
    }
  }
}
on *:join:#scaperune: {
  if ($me isop #) {
    if (%score [ $+ [ $nick ] ] > 49) && (%score [ $+ [ $nick ] ] < 99) {
      mode # +h $nick
    }
    elseif (%score [ $+ [ $nick ] ] > 99) {
      mode # +o $nick
    }
    elseif (%score [ $+ [ $nick ] ] == $null) {
      msg $chan 4Welcome12 to4 $chan 12Type4 !trivia12 to play the Trivia Game, Type 4!strivia12 to stop 
    }
  }
}
alias chans { 
  if (!$1) {
    set %chans $$?="Enter Channel For Trivia!" 
  }
  else { 
    set %chans $1
  }
}
on *:input:#: {
  if ($1 == !trivia) {
    if (%trivia == $null) { 
      msg $active $1-
      msg $active 4Trivia12 Has Started. You Have4 30 12seconds to Answer
      set %thing $read(trivia.txt)   
      set %question $gettok(%thing,1,124)
      set %trivia on
      set %answer $gettok(%thing,4,124)
      msg $chan 4Question:12 %question
      set %chan #
      .timer1 1 15 msg $chan 12HINT:4 $gettok(%thing,2,124)
      .timer2 1 25 msg $chan 12HINT:4 $gettok(%thing,3,124)
      .timer3 1 35 wrong
      haltdef
    }
  }
  if ($1 == !strivia) {
    msg $active $1-
    msg $active 4Trivia12 Has Been Halted!
    .timer1 off
    .timer2  off
    .timer3 off
    .timer4 off
    unset %trivia
    unset %answer
    unset %question
    unset %thing
    haltdef
  }
  if ($1 == !won) {
    if (%score [ $+ [ $me ] ] == $null) {
      echo -a 12You Have4 0 12Points
    }
    elseif (%score [ $+ [ $nick ] ] != $null) {
      echo -a 12You Have4 %score [ $+ [ $nick ] ] 12Points!
    }
  }
  if ($1 == %answer) {
    msg $active $1-
    .timer3 off
    .timer1 off
    .timer2 off
    inc %score [ $+ [ $nick ] ]
    msg %chan 12You Got It Right The Answer Was:4 $+(%answer,!)$+ $+(12,$nick)$+ Has %score [ $+ [ $nick ] ] point(s)!
    unset %answer
    unset %question
    unset %thing
    .timer 1 5 new
    haltdef
  }
}