Create a text with random answers... and just add this

on *:text:whatever:#:{ msg $chan $read(textfile) }

or

on *:text:whatever:#:{ msg $chan $read(textfile,$rand(1,$lines(textfile))) }

even though its the same thing. By default the $read without N , is reading a random line of your text