on $*:TEXT:/^[!@.](bash)/Si:#proton:{
  var %ticks = $ticks
  sockopen $+(Bash.,%ticks) rscript.org 80
  sockmark $+(Bash.,%ticks) $iif($left($1,1) == @,msg #,.notice $nick)
}


on *:SOCKOPEN:Bash.*:{
  sockwrite -nt $sockname GET /lookup.php?type=bash HTTP/1.1
  sockwrite -nt $sockname Host: rscript.org
  sockwrite -nt $sockname $crlf
}

on *:SOCKREAD:Bash.*:{
  if ($sockerr) { echo $sockerr | Halt }
  else {
    var %READ
    sockread %READ
    if (*QUOTE:* iswm %READ) {
      echo -a %READ
      sockclose $sockname
    }
  }
}