All pastes #637783 Raw Edit

aqua

public text v1 · immutable
#637783 ·published 2007-07-29 06:15 UTC
rendered paste body
on *:text:!poll on*:#zips-staff: {
  inc %served
  if ( $chan == #bot ) { HALT }
  if ($nick isop $chan && $nick ishop $chan) {
    /writeini poll.ini Poll $chan $3-
    /writeini poll.ini Yes $chan 0
    /writeini poll.ini No $chan 0
    .timer 1 1 msg $chan $nick Has started the Poll! Poll Question: $readini(poll.ini,Poll,$chan)
    .timer 1 3 msg $chan To vote Yes type !yes to vote No type !no and if you need to see the poll again type !poll
  }
  on *:text:!yes:#zips-staff: {
    inc %served
    if ( $readini(poll.ini,Poll,$chan) == $null ) { HALT }
    if ($readini(poll.ini,$chan,$address($nick,2)) == Voted ) { .notice $nick Sorry! Can Only Vote Once! | HALT }
    /writeini poll.ini $chan $address($nick,2) Voted
    /writeini poll.ini Yes $chan $calc($readini(poll.ini,Yes,$chan) + 1 )
  }
  on *:text:!no:#zips-staff: {
    inc %served
    if ( $readini(poll.ini,Poll,$chan) == $null ) { HALT }
    if ($readini(poll.ini,$chan,$address($nick,2)) == Voted ) { .notice $nick Sorry! Can Only Vote Once! | HALT }
    /writeini poll.ini $chan $address($nick,2) Voted
    /writeini poll.ini No $chan $calc($readini(poll.ini,No,$chan) + 1 )
  }
  on *:text:!poll off:#zips-staff: {
    inc %served
    if ($readini(poll.ini,Poll,$chan) == $null) { HALT }
    if ($nick isop $chan && $nick ishop $chan)
    .timer 1 1 msg $chan The Poll Is Now Over... Tallying Votes...
    .timer 1 3 msg $chan The Results for the Poll Question: $readini(poll.ini,Poll,$chan) are...
    .timer 1 5 msg $chan Number of People that Voted Yes: $readini(poll.ini,Yes,$chan) People that Voted No: $readini(poll.ini,No,$chan)
    .timer 1 6 /remini poll.ini Poll $chan
    .timer 1 6 /remini poll.ini No $chan
    .timer 1 6 /remini poll.ini Yes $chan
    .timer 1 6 /remini poll.ini $chan
  }

  on *:text:!poll:#zips-staff: {
    inc %served
    if ( $chan == #bot ) { HALT }
    if ($readini(poll.ini,Poll,$chan) == $null) { .notice $nick There is No Current poll for $chan $+ . | HALT }
    .notice $nick The Poll Question for $chan is: $readini(poll.ini,Poll,$chan)
  }
  on *:text:!info poll:#zips-staff: {
    inc %served
    .timer 1 1 .notice $nick Poll Script v2.1 by Aldo191 Updated June 23 2007
    .timer 1 2 .notice $nick To Start a Poll type !poll on (Poll Question)
    .timer 1 3 .notice $nick Type !poll to view the Current Poll, To end the Poll type !poll off
    .timer 1 4 .notice $nick You Must Be halfop or Higher to start a Poll.