This script will automatically pick a noob of the day and change it automatically when the day changes. Type "!notd" to use.
on *:TEXT:!notd*:#:{
inc -u5 %notd. [ $+ [ $nick ] ]
if (%notd. [ $+ [ $nick ] ] > 1) { }
else {
if ($gettok(%notd,1,32) == $date) { msg $chan Noob of the day is $gettok(%notd,2,32) }
else { set %notd $date $nick($chan,$rand(1,$nick($chan,0))) | msg $chan Noob of the day is $gettok(%notd,2,32) }
}
}