on 100:TEXT:.takeuser*:#:{
  var %i 1
  var %file apply.txt
  var %nickname $2
  var %status 0
  while (%i != $calc($lines(%file) + 1)) {
    if ($read( $+ %file $+ , $+ %i $+ ) == %nickname)  { write -dl $+ %i %file | var %status 1 }
    else { inc %i }
  }
  if (%status == 0)  { msg $chan 0,1 This person cannot be helped because he/she has not typed .apply yet }
  if (%status == 1)  { msg $2 0,1 $2 Your application has been sent to: $nick }
}