slaplist 2

alias slaplist { 
  if ($2) {
    var %true = $true
    var %i = 1
    while (%true && $read(slaplist.txt,%i)) {
      if ($2- isin $read(slaplist.txt,%i)) {
        describe $chan $replace($read(slaplist.txt,%i),_-_nick_-_,$1)
        var %true = $false
      }
      inc %i
    }     
  }
  else {
    describe $chan $replace($read(slaplist.txt),_-_nick_-_,$1) 
  }
}