on *:text:!truth*:#: {
  describe $chan  read(truth.txt)
}
on *:text:!dare*:#: {
  msg $chan read(dare.text)
}
write truth.txt= are you gay
