This Script allows users in a chatroom to pick a voting question
eg.
<@SL> !vote Are you really a teen
-SLChatBot:#teenzone- 7,0This is the voting script and someone requested to vote in question is10 Are you really a teen? 7to vote use the following 6/msg SLChatBot .vote yes 4or 6.vote no
<%SLChatBot> 7,0This is the voting script and someone requested to vote in question is10 Are you really a teen $ + ? 7to vote use the following 6/msg SLChatBot .vote yes 4or 6.vote no
-SLChatBot- Sorry you have to use .vote yes/no
<%SLChatBot> 7,0And STOP...the results in in...102 7voted yes and10 1 7voted no and that give a persentage of4 66.666667%

;Coded : SL
;server : irc.4everlost.co.za
;room   : #slc
;webpage : http://slchat.50megs.com/Home.htm
on 1:load: {
  set %sl.v on
  echo -a 7,0This script was made by SL
  echo -a 10,0To use just type 6!Vote and a yes or no question
}
on 1:text:!vote*:#: {
  if (%sl.v == on) {
    if ($2 != $null) {
      set %sl.vy 0
      set %sl.vn 0
      set %sl.vt 0
      set %sl.vp 0
      set %sl.vc $2-
      set %sl.vu on
      set %sl.vr $chan
      notice $chan 7,0This is the voting script and someone requested to vote in $chan...the question is10 %sl.vc $+ ? 7to vote use the following 6/msg $me .vote yes 4or 6.vote no
      msg $chan 7,0This is the voting script and someone requested to vote in $chan...the question is10 %sl.vc $ + ? 7to vote use the following 6/msg $me .vote yes 4or 6.vote no
    }
    else { notice $nick Invalled command you need a question after you type !vote and only yes or no questions }
  }
  else { notice The script is not active for active scripts type !info in the chan }
}
on 1:text:.vote*:?: {
  if (%sl.v == on) {
    if (%sl.vu == on) {
      if ($2 == yes) {
        inc %sl.vy
        inc %sl.vt
        set %sl.vp $calc(100 * (%sl.vy / %sl.vt) )
        timer40 off
        timer41 off
        timer40 1 30 msg %sl.vr 7,0And STOP...the results in in...10 $+ %sl.vy 7voted yes and10 %sl.vn 7voted no and that give a persentage of4 %sl.vp $+ %
        timer41 1 30 set %sl.vu off
        msg $nick 7,0Thanx for using my voting script...please wait and look in the room for the results
      }
      if ($2 == no) {
        inc %sl.vn
        inc %sl.vt
        set %sl.vp $calc(100 * (%sl.vy / %sl.vt) )
        timer40 off
        timer41 off
        timer40 1 30 msg %sl.vr 7,0And STOP...the results in in...10 $+ %sl.vy 7voted yes and10 %sl.vn 7voted no and that give a persentage of4 %sl.vp $+ %
        timer41 1 30 set %sl.vu off
        msg $nick 7,0Thanx for using my voting script...please wait and look in the room for the results 
      }
      if ($2 != yes) {
        if ($2 != no) { 
          notice $nick Sorry you have to use .vote yes/no 
        }
      }
    }
    else { notice $nick Sorry The game is not active please type !info in the room to look for active games }

  }
  else { notice $nick Sorry there is no question to make a question type !vote [and u'r question in here] in the main room }
}
menu channel {
  -.-SL Voting V1.0-.-
  .Swich on:/set %sl.v on
  .Swich off:/set %sl.v off
}