@waifish-shirk
here is a rough mockup to get you started.
on $*:text:/^@gmh$/iS:#: {
if ($sock(gmh)) sockclose gmh
sockopen gmh www.givesmehope.com 80
sockmark gmh $+(/page/,$r(1,300)) msg #
}
on *:sockopen:gmh: {
sockwrite -nt $sockname GET $gettok($sock(gmh).mark,1,32) HTTP/1.1
sockwrite -nt $sockname Host: $+($sock(gmh).addr,$str($crlf,2))
}
on *:sockread:gmh: {
var %gmh | sockread %gmh
if ($regex(%gmh,/\t{6}(.+?GMH?)/i)) {
$gettok($sock(gmh).mark,2-,32) $replace($remove($regml(1),<b>,</b>,<BR><BR>),",",<br /><br />,$chr(32))
sockclose gmh
}
}