on *:TEXT:!randlogline:#:{
  notice $nick $read($+(log-,$chan,.txt))
}

on *:TEXT:!randlogline *:#:{
  if ($read($+(log-,$2,.txt)) == $null) { notice $nick 14I have nothing in my log database about 4 $+ $2 $+ 14. | HALT }
  if ($chr(35) isin $2) {
    notice $nick $read($+(log-,$2,.txt))
  }
}

on *:TEXT:*:#:{
  if ($1- == !randlogline) { HALT }
  write $+(log-,$chan,.txt) $+(4,$chr(60),14,$nick,4,$chr(62)) $+(14,$1-)
}
on *:JOIN:#:{
  write $+(log-,$chan,.txt) $+(3,$Chr(42)) $nick has joined $chan
}

on *:TEXT:!log *:#:{
  if ($3- isin $read($+(log-,$2,.txt))) {
    notice $nick $read($+(log-,$2,.txt), s, $+(*,$3-*))
  }
  else { notice $nick 14I cannot find4 $3- 14in my logs for4 $2 $+ 14. 
  }
}