on *:TEXT:!poll*:#: {
  if (%poll == $null) {
    msg $chan 4 $nick started a poll:12 the question was $2-
    set %poll yes
    set %question $2-
    set %nick1 $nick
    set %yes 0
    set %no 0
    elseif (%poll != $null) { .notice $nick There is a poll already a poll set! | halt }
  }
}
on *:TEXT:!vote*:#: {
  if ( %poll ) {
    if ($2 == No) {
      /notice $nick 12Casting vote...
      /msg $chan 4 $+ $nick 12Has voted No
      inc %no
    }
    elseif ($2 == Yes) {
      /notice $nick 12Casting Vote...
      /msg $chan 4 $+ $nick 12Has voted Yes.
      inc %yes
    }
  }
}

on *:TEXT:!spoll*:#: {
  if (%poll != $null) && (%nick1 == $nick) {
    msg $chan 10The poll has been stopped the results are:
    msg $chan 4 %yes 10voted for yes!
    msg $chan 4 %no 10voted for no!
    /unset %poll
    /unset %nick1
    /unset %yes
    /unset %no
  }  
}