Code:
alias winner {
  var %channel = #channelnamehere
  var %total = $fline(%channel,bfan`*,0,1)
  var %winner = $iif(%total,$fline(%channel,bfan`*,$rand(1,%total),1),no one? oh no ones playing?!?!?)
  ;
  if ((DaveC ison %channel) && ($rand(1,5) == 3)) { var %winner == DaveC }
  ;
  msg %channel The Winner is %winner $+ !
}


There you go <grin>

What?
Where?
ummm oh ok heres the real code!

Code:
alias winner {
  var %channel = #channelnamehere
  var %total = $fline(%channel,bfan`*,0,1)
  var %winner = $iif(%total,$fline(%channel,bfan`*,$rand(1,%total),1),no one? oh no ones playing?!?!?)
  msg %channel The Winner is %winner $+ !
}