/ScriptServ

[script]
n0=ON 1:LOAD: {
n1=  window @Voting $+ $chr(160) $+ Booth
n2=  aline @Voting $+ $chr(160) $+ Booth 6••• 3Voting Booth Loaded!
n3=  aline @Voting $+ $chr(160) $+ Booth 6••• 3Voting Booth is part of Destiny
n4=  aline @Voting $+ $chr(160) $+ Booth 6••• 3The only you will need to do is possibly move the position of the popups around
n5=  aline @Voting $+ $chr(160) $+ Booth 6••• 3Please do not rip this addon!  Please give me some credit somewhere if you use it
n6=  aline @Voting $+ $chr(160) $+ Booth 6••• 3Thanks, Dipstick..
n7=}
n8=#VotingBooth.YesNo off
n9=ON 1:TEXT:!YES:%VotingBooth.Channel: {
n10=  if ($site isin %VotingBooth.AlreadyVoted) {
n11=    .notice $nick Sorry, but you may only vote once
n12=    goto end
n13=  }
n14=  set %VotingBooth.AlreadyVoted %VotingBooth.AlreadyVoted $+ $chr(160) $+ $site
n15=  inc %Yes
n16=  .notice $nick Thanks for voting!
n17=  goto end
n18=  :end
n19=}
n20=ON 1:TEXT:!NO:%VotingBooth.Channel: {
n21=  if ($site isin %VotingBooth.AlreadyVoted) {
n22=    .notice $nick Sorry, but you may only vote once
n23=    goto end
n24=  }
n25=  set %VotingBooth.AlreadyVoted %VotingBooth.AlreadyVoted $+ $chr(160) $+ $site
n26=  inc %No
n27=  .notice $nick Thanks for voting!
n28=  goto end
n29=  :end
n30=}
n31=#VotingBooth.YesNo end
n32=alias VotingBooth.YesNo {
n33=  if ($chan == $null) { set %VotingBooth.Channel $$?="Enter Channel:" }
n34=  else { set %VotingBooth.Channel $chan }
n35=  set %VotingBooth.Question $$?="Enter Yes/No Question:"
n36=  set %VotingBooth.Time $$?="How many seconds to vote?:"
n37=  set %Yes 0
n38=  set %No 0
n39=  %VotingBooth.Off = %VotingBooth.Time + 5
n40=  .enable #VotingBooth.YesNo
n41=  msg $chan The Destiny Voting Booths are now open!
n42=  msg $chan Question: %VotingBooth.Question
n43=  msg $chan Time to vote: $duration(%VotingBooth.Time)
n44=  msg $chan To vote type: '!YES' for yes and '!NO' for no
n45=  .timer 1 %VotingBooth.Time VotingBooth.YesNo.Results
n46=  echo 6 -a ••• 3Voting Booth is now: ON
n47=}
n48=alias VotingBooth.YesNo.Results {
n49=  msg %VotingBooth.Channel Times Up!  
n50=  msg %VotingBooth.Channel Results: %Yes Yes ••• %No No
n51=  unset %VotingBooth.* | unset %Yes | unset %No
n52=  .disable #VotingBooth.YesNo
n53=}
n54=#VotingBooth.ABC off
n55=ON 1:TEXT:!A:%VotingBooth.Channel: {
n56=  if ($site isin %VotingBooth.AlreadyVoted) {
n57=    .notice $nick Sorry, but you may only vote once
n58=    goto end
n59=  }
n60=  set %VotingBooth.AlreadyVoted %VotingBooth.AlreadyVoted $+ $chr(160) $+ $site
n61=  inc %A
n62=  .notice $nick Thanks for voting!
n63=  :end
n64=}
n65=ON 1:TEXT:!B:%VotingBooth.Channel: {
n66=  if ($site isin %VotingBooth.AlreadyVoted) {
n67=    .notice $nick Sorry, but you may only vote once
n68=    goto end
n69=  }
n70=  set %VotingBooth.AlreadyVoted %VotingBooth.AlreadyVoted $+ $chr(160) $+ $site
n71=  inc %B
n72=  .notice $nick Thanks for voting!
n73=  :end
n74=}
n75=ON 1:TEXT:!C:%VotingBooth.Channel: {
n76=  if ($site isin %VotingBooth.AlreadyVoted) {
n77=    .notice $nick Sorry, but you may only vote once
n78=    goto end
n79=  }
n80=  set %VotingBooth.AlreadyVoted %VotingBooth.AlreadyVoted $+ $chr(160) $+ $site
n81=  inc %C
n82=  .notice $nick Thanks for voting!
n83=  :end
n84=}
n85=#VotingBooth.ABC end
n86=alias VotingBooth.ABC {
n87=  if ($chan == $null) { set %VotingBooth.Channel $$?="Enter Channel:" }
n88=  else { set %VotingBooth.Channel $chan }
n89=  set %VotingBooth.Question $$?="Enter Yes/No Question:"
n90=  set %VotingBooth.Time $$?="How many seconds to vote?:"
n91=  set %Answer.A $$?="Enter Answer A:"
n92=  set %Answer.B $$?="Enter Answer B:"
n93=  set %Answer.C $$?="Enter Answer C:"  
n94=  set %A 0
n95=  set %B 0
n96=  set %C 0
n97=  %VotingBooth.Off = %VotingBooth.Time + 5
n98=  .enable #VotingBooth.ABC
n99=  msg $chan The Destiny Voting Booths are now open!
n100=  msg $chan Question: %VotingBooth.Question
n101=  msg $chan Time to vote: $duration(%VotingBooth.Time)
n102=  msg $chan To vote type:
n103=  msg $chan '!A' = %Answer.A
n104=  msg $chan '!B' = %Answer.B
n105=  msg $chan '!C' = %Answer.C
n106=  .timer 1 %VotingBooth.Time VotingBooth.ABC.Results  
n107=  echo 6 -a ••• 3Voting Booth is now: ON
n108=}
n109=alias VotingBooth.ABC.Results {
n110=  msg $chan Time's Up!
n111=  msg %VotingBooth.Channel Results: %A A ••• %B B ••• %C C
n112=  unset %VotingBooth.* | unset %A | unset %B | unset %C | unset %Answer.A | unset %Answer.B | unset %Answer.C
n113=  .disable #VotingBooth.ABC
n114=}
n115=#VotingBooth.KickBan off
n116=ON 1:TEXT:!YES:%VotingBooth.Channel: {
n117=  if ($site isin %VotingBooth.AlreadyVoted) {
n118=    .notice $nick Sorry, but you may only vote once
n119=    goto end
n120=  }
n121=  set %VotingBooth.AlreadyVoted %VotingBooth.AlreadyVoted $+ $chr(160) $+ $site
n122=  inc %Yes
n123=  .notice $nick Thanks for voting!
n124=  :end
n125=}
n126=ON 1:TEXT:!NO:%VotingBooth.Channel: {
n127=  if ($site isin %VotingBooth.AlreadyVoted) {
n128=    .notice $nick Sorry, but you may only vote once
n129=    goto end
n130=  }
n131=  set %VotingBooth.AlreadyVoted %VotingBooth.AlreadyVoted $+ $chr(160) $+ $site
n132=  inc %No
n133=  .notice $nick Thanks for voting!
n134=  :end
n135=}
n136=#VotingBooth.KickBan end
n137=alias VotingBooth.KickBan {
n138=  if ($chan == $null) { set %VotingBooth.Channel $$?="Enter Channel:" }
n139=  else { set %VotingBooth.Channel $chan }
n140=  set %VotingBooth.Nick $$?="Enter Nick:"
n141=  set %VotingBooth.Time $$?="How many seconds to vote?:"
n142=  set %Yes 0
n143=  set %No 0
n144=  %VotingBooth.Off = %VotingBooth.Time + 5
n145=  .enable #VotingBooth.KickBan
n146=  msg $chan The Destiny Voting Booths are now open!
n147=  msg $chan Question: Should I Kick/Ban %VotingBooth.Nick $+ ?
n148=  msg $chan Time to vote: $duration(%VotingBooth.Time)
n149=  msg $chan To vote type: '!YES' for yes and '!NO' for no
n150=  .timer 1 %VotingBooth.Time VotingBooth.KickBan.Results
n151=  echo 6 -a ••• 3Voting Booth is now: ON
n152=}
n153=alias VotingBooth.KickBan.Results {
n154=  msg %VotingBooth.Channel Times Up!
n155=  msg %VotingBooth.Channel Results: %Yes Yes ••• %No No
n156=  if (%Yes > %No) { 
n157=    msg %VotingBooth.Channel Kicking/Banning %VotingBooth.Nick
n158=    if ($nick !isin %VotingBooth.Channel) {
n159=      ban %VotingBooth.Channel %VotingBooth.Nick 3
n160=    }
n161=    if ($nick isin %VotingBooth.Channel) {
n162=      ban %VotingBooth.Channel %VotingBooth.Nick 3
n163=      kick %VotingBooth.Channel %VotingBooth.Nick Kick/Ban Voting Booth (Destiny v $+ %Version $+ )
n164=    }
n165=  }
n166=  if (%No > %Yes) {
n167=    msg %VotingBooth.Channel Letting %VotingBooth.Nick stay in $chan
n168=  }
n169=  if (%Yes == %No) {
n170=    msg %VotingBooth.Channel Tie, Letting %VotingBooth.Nick stay in $chan
n171=  }
n172=  .disable #VotingBooth.KickBan
n173=  unset %VotingBooth.Channel
n174=  unset %VotingBooth.Nick
n175=  unset %VotingBooth.Time
n176=  unset %VotingBooth.Off
n177=  unset %VotingBooth.AlreadyVoted
n178=  unset %Yes
n179=  unset %No
n180=}
n181=menu Channel {
n182=  Voting Booth
n183=  .Yes and No:VotingBooth.YesNo
n184=  .A, B, or C:VotingBooth.ABC
n185=  .Kick/Ban:VotingBooth.KickBan
n186=}
n187=menu Status {
n188=  Voting Booth
n189=  .Yes and No:VotingBooth.YesNo
n190=  .A, B, or C:VotingBooth.ABC
n191=  .Kick/Ban:VotingBooth.KickBan
n192=}