All pastes #638817 Raw Edit

Something

public text v1 · immutable
#638817 ·published 2007-07-30 03:11 UTC
rendered paste body
//HEISToriginalnick is the nick that issued the request
//HEISTchallengenick is the nick that types !yes or !no
on *:TEXT:!heist*:#heist2:{
  if (%HEISTcheck) { notice $nick Sorry, you've used up your hourly heist, please wait a while and try again. | RETURN }
  if (!%HEISTcheck) {
    if (!$2) { notice $nick Sorry, you need 2 people to heist. Try !heist <nick> | return }
    if ($2 !ison #heist2) { notice $nick Sorry that person is not in the channel right now! | return }
    else {
      set %HEISToriginalnick $nick
      set %HEISTchallengenick $2
      set -u20 %HEISTcheck on        //  this is the line that dictates how long the time between heists is, it's currently set to 20 seconds, 3600 would be an hour
      notice %HEISTchallengenick $nick has sent you a heist request.  Please type !yes in #heist to accept and !no to decline.
    }
  }
}
on *:TEXT:!yes*:#heist2:{
  if (%HEISTchallengenick == $nick) {
    notice %HEISToriginalnick $nick has accepted your request.
    HEIST
  }
}
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------=
alias HEIST {
  set -u16 %HEIST $read(heist.txt)
  var %HEISTtime = $rand(5,15)
  msg $chan 4 $+ %HEISTchallengenick 14and 4 $+ %HEISToriginalnick 14are about to heist.
  msg $chan 14[4 %HEISTtime 14] seconds to heist results.
  timer 1 %HEISTtime msg $chan $+($chr(3),04,%HEIST,$chr(3))
  resetHEISTvars
}
alias resetHEISTvars {
  //I just have this here to make sure I didn't leave any variables set that could cause a memory leak.  Once we're sure the script works
  //we can remove it...
  unset %HEISTcheck
  unset %HEISToriginalnick
  unset %HEISTchallengenick
  unset %HEISTtime
}