on *:TEXT:!setpoll*:#:{ if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvo $chan) {
set %polly on
set %pollquestion $$2-
set %pollchan $chan
set %pollnick $nick
set %pollpeople 0
set %polltime 60
msg %pollchan Poll started by %pollnick $+ . %pollquestion $+ ? Type !yes to answer yes and !no to answer no.
timer 1 30 msg $chan There are 30 Seconds left of the poll and %pollpeople people have voted so far.
timer 1 60 msg $chan Poll results are: %pollyes Yes's and %pollno No's.
unset pollnick.*
}
}
on *:TEXT:!votes:#:{ if (%polly != on) { notice $nick There is no poll currently on! | halt }
msg $chan %votesyes people have said yes.
msg $chan %votesno people have said no. }
on *:text:!yes *:#: {
if (%polly == on) {
if (%pollnick. $+ $nick != yes) {
set %pollnick. $+ $nick yes
inc %pollyes 1
inc %pollpeople 1
notice $nick Thank you $nick for your vote.
}
else {
notice $nick Please refrain from voting twice.
}
}
}
on *:text:!no *:#: {
if (%polly == on) {
set %pollnick. $+ $nick no
if (%pollnick. $+ $nick != no) {
inc %pollno 1
inc %pollpeople 1
notice $nick Thank you $nick for you vote.
}
else{
notice $nick Please refrain from voting twice..
}
}