All pastes #538481 Raw Edit

poll script

public text v1 · immutable
·published 2007-06-05 01:20 UTC
rendered paste body
[script]
n0=on *:TEXT:!setpoll*:#:{ if ($nick isop $chan) || ($readini(staff.ini,click,$nick)) || ($readini(admin.ini,click,$nick)) { 
n1=    remini poll.ini $chan 
n2=    writeini poll.ini $chan Poll $2- 
n3=    writeini poll.ini $chan Maker $nick 
n4=    set %polltime $ctime $chan 
n5=    msg $chan [POLL] $2- $+ ? !yes to vote yes. !no to vote no. 
n6=  } 
n7=} 
n8=on $*:TEXT:/^[!@]poll/Si:#:{ 
n9=  set %poll $iif($left($1,1) = @, msg $chan, notice $nick) 
n10=  %poll Poll for $chan $+ : 
n11=  %poll $readini(poll.ini,$chan,poll) 
n12=  %poll Set by $readini(poll.ini,$chan,maker) approximately $duration($calc($ctime - %polltime $chan)) ago. 
n13=  unset %poll 
n14=} 
n15=on *:TEXT:!yes*:#:{ if ($readini(poll.ini,$chan,poll) == $null) { notice $nick There is no poll for $chan $+ . | halt } 
n16=  if ($readini(poll.ini,$chan,$nick) == voted) { notice $nick You may only vote once! | halt } 
n17=  writeini poll.ini $chan yes $calc($readini(poll.ini,$chan,yes) + 1) 
n18=  writeini poll.ini $chan $nick voted 
n19=  notice $nick Thank you for voting. 
n20=} 
n21=on *:TEXT:!no*:#:{ if ($readini(poll.ini,$chan,poll) == $null) { notice $nick There is no poll for $chan $+ . | halt } 
n22=  if ($readini(poll.ini,$chan,$nick) == voted) { notice $nick You may only vote once! | halt } 
n23=  writeini poll.ini $chan $nick voted 
n24=  writeini poll.ini $chan no $calc($readini(poll.ini,$chan,no) + 1) 
n25=  notice $nick Thank you for voting! 
n26=} 
n27=on $*:TEXT:/^[!@]votes/Si:#:{ if ($readini(poll.ini,$chan,poll) == $null) { notice $nick There is no poll going on for $chan $+ . | halt } 
n28=  if ($nick isop $chan) { set %votes $iif($left($1,1) = @, msg $chan, notice $nick) 
n29=    %votes $readini(poll.ini,$chan,yes) people liked the idea. 
n30=    %votes $readini(poll.ini,$chan,no) people didn't go for it. 
n31=    unset %votes 
n32=  } 
n33=} 
n34=on *:TEXT:!endpoll*:#:{ if ($readini(poll.ini,$chan,poll) == $null) { notice $nick There is no poll going on for $chan $+ . | halt } 
n35=  if ($nick isop $chan) { 
n36=    remini poll.ini $chan 
n37=    msg $chan The poll has been ended by $nick $+ . 
n38=  } 
n39=}