Something

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
      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 {
  unset %HEISTcheck
  unset %HEISToriginalnick
  unset %HEISTchallengenick
  unset %HEISTtime
}