on *:sockread:bash.*: {
  if ( $sockerr ) { echo -s $sock($sockname).wsmsg | return }
  var %uid = $sock($sockname).mark,%tmp
  sockread -f %tmp
  if ( $regex(%tmp,/<center><font\sclass="bodytext">(Quote\s#\d{1,}\sdoes\snot\sexist\.)<\/font><\/center>/) ) {
    bash_send %uid $bash.style($regml(1))
    $+(.timer.,%uid) off
    sockclose $sockname
  }
  elseif ( $regex(%tmp,/<center><font\sclass="bodytext">(No\sesults\sreturned.)<BR><BR><\/font><\/center>/) ) {
    bash_send %uid Search for $+(',$($+(%,bq.,%uid,.msg),2),') found no results.
    $+(.timer.,%uid) off
    sockclose $sockname
  }
  elseif ( $regex(%tmp,/^<p\sclass="quote"><a\shref="(\?\d{1,})".*?<b>(#\d{1,})<\/b>.*?"qa">([+-])<\/a>(\(\d{1,}\)).*?"qt">(.*?)<br\s\/>$/) ) {
    var %a = $iif($hfind(bash,$+(%uid,.*),0,w),$calc($hfind(bash,$+(%uid,.*),0,w) + 1),1)
    hadd -m bash $+(%uid,.,%a) Bash Quote ID: $regml(2) $+($iif($regml(3) == +,09,04),$regml(4),) $+(www.bash.org/,$regml(1))
    hadd -m bash $+(%uid,.,$calc(%a + 1)) $bash.style($regml(5))
  }
  elseif ( $regex(%tmp,/^<p\sclass="quote"><a\shref="(\?\d{1,})".*?<b>(#\d{1,})<\/b>.*?"qa">([+-])<\/a>(\(\d{1,}\)).*?"qt">(.*?)<\/p>$/) ) {
    var %a = $iif($hfind(bash,$+(%uid,.*),0,w),$calc($hfind(bash,$+(%uid,.*),0,w) + 1),1)
    hadd -m bash $+(%uid,.,%a) Bash Quote ID: $regml(2) $+($iif($regml(3) == +,09,04),$regml(4),) $+(www.bash.org/,$regml(1))
    hadd -m bash $+(%uid,.,$calc(%a + 1)) $bash.style($regml(5))
    sockclose $sockname
  }
  elseif ( $regex(%tmp,/^(&lt;.*?&gt;\s?|\w{1,}\s?|\(.*?\)\s?|\*{3}\s?|\[.*?\]\s?)(.*?)<br\s\/>$/) ) {
    var %a = $calc($hfind(bash,$+(%uid,.*),0,w) + 1)
    hadd -m bash $+(%uid,.,%a) $bash.style($regml(1) $regml(2))
  }
  elseif ( $regex(%tmp,/^(&nbsp;{1,}.*?)<br\s\/>$/) ) {
    var %a = $hfind(bash,$+(%uid,.*),0,w)
    hadd -m bash $+(%uid,.,%a) $hget(bash,$+(%uid,.,%a)) $bash.style($regml(1))
  }
  elseif ( $regex(%tmp,/^(&lt;.*?&gt;\s?|\w{1,}\s?|\(.*?\)\s?|\*{3}\s?|\[.*?\]\s?)(.*?)<\/p>$/) ) {
    var %a = $calc($hfind(bash,$+(%uid,.*),0,w) + 1)
    hadd -m bash $+(%uid,.,%a) $bash.style($regml(1) $regml(2))
    sockclose $sockname
  }
}