[color=blue]I haven't written a script for a few months since my bot broke down, and I was really mad, but I'm starting it again and by vote my users chose the newest command to be a lottery one.

Now I'm still not very good at scripting, but this is a really good one for me, even though it doesn't really use any advance scripts.

Also, thanks to Shadowmajestic, admin of http://www.revpermin.com/ for helping me with the if statement in the !joinlottery part.

Anyways, this is how it works!!!

Here are user commands...

*!lottery
Gives info about the lottery
*!startlottery
Pms the owner to start it
*!joinlottery
Once the lottery has started, to 'submit a ballot with your name on it'
*!admin
If they've won, can choose this to be admin for the day
*!box
If they've won, can choose the mystery box (filled with 6 different things, 3 of which are nothing)


Bot's Commands

Right click anywhere in channel and choose Lottery>On. This will start it.
Right click anywhere in channel and choose Lottery>Off. This will end it.


FEATURES
Pretty lame preset mystery box choices etc.
Security so someone can't submit their name twice, or when it's off.
Security so you don't get a "mystery box" or "Admin" message from non-winners
Everything already done for you, for the FULLY AUTOMATED system to work, all you have to do is Right Click>Lottery>On, and everything will be doen for you.
No changes in the code, either;this means you don't have to edit the code AT ALL unless you choose to edit something.

Hope you enjoy :D on *:LOAD:{
remove box.txt | write box.txt You have won the $me Administrator for a week! | write box.txt You have won Infinite $me V.I.P Spot-This means your suggestions will be highly valued and I'll try my best to listen to your commands. | write box.txt You have won the Admin for a Day | write box.txt You have won Nothing, sorry. | write box.txt You have won Nothing, sorry. | write box.txt You have won Nothing, sorry. }

menu channel {
Lottery
.On:set %lottery on | echo 7LOTTERY IS ON | amsg 3-4[ $me ]3-12The lottery has started!!! You have 5 minutes to join! To join, just type 3!joinlottery4 and to learn more about the lottery type 3!lottery | timer 1 10 set %winner $read(lottery.txt) | timer 1 300 amsg 3-4[ $me ]3-12The lottery has ended! The winner is.......4 %winner | timer 1 305 msg %winner Congratulations, %winner -you have won the lottery! Now, you can either choose to be a $me admin for a day, or choose the Mystery Box!(It's filled with good and bad things, the one chosen is completly random!) To be admin, type 3!admin4 and to choose the Mystery Box type 3!box | timer 1 301 set %lottery off | timer 1 310 remove lottery.txt
.Off:set %lottery off | echo 7LOTTERY IS OFF
}


on *:TEXT:!joinlottery:#:{
if ($read(lottery.txt,w,$nick)) { halt }
if (%lottery == on) { write lottery.txt $nick | notice $nick You have been added to the list }
}

on *:TEXT:!startlottery:#:{ msg $me 3-4[ $me ]3-12 $nick from $chan has requested that you start the lottery!
}

on *:TEXT:!lottery:#:{
msg $nick 3-4[ $me ]3-12The Lottery is a fun, simple, and interactive command on $me
msg $nick 3-4[ $me ]3-12To begin the lottery, I must activate it. If you feel like having a lotter, type 3!startlottery4 This will not automatically start it, but it will tell me that you have said this.
msg $nick 3-4[ $me ]3-12If I choose to start it, every channel I'm on will be alerted of such. You have 5 minutes to type 3!joinlottery4 and to join it, there's no cost. You can't submit your name twice, I've made precautions against this.
msg $nick 3-4[ $me ]3-12After 5 minutes, a name will be randomly selected from those submitted, and all the channels will be alerted of the winner. The winner will get a message, offering either admtxtstrationship for a day, or a mystery box. They can type 3!admin4 or 3!box
}

on *:TEXT:!admin:#:{
if ($nick == %winner) { msg $me 3-4[ $me ]3-12 $nick from $chan was the winner from the lottery, and chose the !admin command. | msg $nick You're request has been sent. }

on *:TEXT:!box:#:{
if ($nick == %winner) {
set %box $read(box.txt) | msg $me 3-4[ $me ]3-12 $nick from $chan has won %box | msg $nick %bot

} }