on *:TEXT:!giveaway:#:{
  %i = 0
  %j = 0
  %add = 1
  %rand = $r(1, $nick($chan, 0))
  %tot = 7
  if (%tot > $nick($chan,0)) %tot = $v2
  %chosen = ""

  %file = $+($mircdir, exclusionlist.txt)
  %lines = $lines(%file)

  while (%i < %tot) {
    %add = 1
    while ($istok(%chosen, $nick(#, %rand), 32)) {
      %rand = $r(1, $nick($chan,0))
    }
    while (%j <= %lines) {
      if ($gettok($read(%file,%j),1,32) == $nick($chan,%rand)) {
        %add = 0
        %j = 1
      }
      inc %j
    }
    if (%add == 1){
    %chosen = %chosen $nick($chan, %rand)
    msg # $nick($chan,%rand)
    msg # CHOSEN: %chosen
    inc %i
  }
}