sockread -gn &brL
if ($bfind(&brL, 1, "rmlist">)) {
;Retrieve Channel Name
var %cx = $calc($ifmatch + 9), %cb = $bfind(&brL, %cx, </a>), %f = $calc(%cb - %cx)
channel name is $bvar(&brL,%cx,%f).text
;Retrieve Topic
var %ct = $calc($bfind(&brL, %cb, <td>) + 4), %ctx = $bfind(&brL, %ct, ;</td>), %tt = $calc(%ctx - %ct)
topic is $bvar(&brL,%ct,%tt).text
Now my difficulty lies in getting the language and count.
I start from the end of topic and filter html code out of the rest and it becomes 10English, for instance.
$bvar(&brL,%ctx $+ -).text
