Forums Scripts & Popups Returning the line number at which $1 is found

/write -d textfile.txt

;usage $remove_line(<textfile.txt>,<nickname>)

alias remove_line {
  var %rem = $read($1,w,$+(*,$2,*))
  if (!%rem) { echo -a ***** Error! - $chr(91) $+(,$2,) $chr(93) is not listed in $1 ***** | halt }
  elseif (%rem) { 
    write $+(-dl,$readn) $1
    echo -a ***** $chr(91) $+(,$2,) $chr(93) has been removed from the textfile. ***** 
  }
}

 /write -ds $+ $1 textfile.txt