you may want to add a flood too that

 on $*:TEXT:/^[!@.]Truth/Si:#:{
if  (!%tru) {
   inc -u4 %tru
if ($2- !ison $chan) { notice $nick Please Specify a Person | halt }
    msg # $2- $+ , Is it True That $read(Truth.txt) $+ ?
}
}

and then do the same thing for dare

 on $*:TEXT:/^[!@.]Dare/Si:#:{
  if  (!%dar) {
    inc -u4 %dar
    if ($2- !ison $chan) { notice $nick Please Specify a Person | halt }
    msg # $2- $+ ,  I Dare you to $read(Dare.txt) $+ !!
  }
}