on *:text:*:#:{
  if ($1 = .title) {
    var %file $qt($+($mircdir,title.txt))
    var %lines $lines(%file)
    if ($2 <= %lines) {
      msg $chan title: $2 - $read(%file,nt,$2)
    }
    else { msg $chan title out bounds. titles: %lines }
  }
}