there is even a more easier way to do a random joke picker
on *:text:!joke:#: { msg $active $read(jokes.txt) }
that simple hehe