Forums Scripts & Popups join chans of one who said *

This is what you're after:

On *:text:!joinme:?:{
set -z %cometo $+ $nick 15
whois $nick
}

raw 319:*:{
; 319: Whois Channels
if %cometo [ $+ [ $2 ] ] { join $replace($remove($3-,@,%,+),$chr(32),$chr(44)) }
}

(paste in the remote and do a /msg bot !joinme)