on *:TEXT:!hehe*:#: {
  set %yes 0
  set %no 0
  msg $chan $nick has started a poll: $2-
  set %poll on
  set %question $2-
  msg $chan type !yes or !no to vote - you have 2min
  timer 1 120 /pollova
}
on *:TEXT:!yes*:#: {
  if (%poll == on) && (%voted [ $+ [ $nick ] ] != %voted [ $+ [ $nick ] ]) {
    inc %yes
    notice $nick you have voted yes
    set %voted [ $+ [ $nick ] ]
  }
  else {
    notice $nick you allready voted
  }
}
on *:TEXT:!no*:#: {
  if (%poll == on) && (%voted [ $+ [ $nick ] ] != %voted [ $+ [ $nick ] ]) {
    inc %no
    notice $nick you have voted no
    set %voted [ $+ [ $nick ] ]
  }
  else {
    notice $nick you allready voted
  }
}
alias pollova {
  msg $chan Total votes for - %question - Yes %yes - No %no
  unset %yes
  unset %no
  unset %question
  unset %poll
}