The routine QBMTAG can be used in conjunction with QIPBTAG to provide extremely pure (99%) b hemisphere tagging.
In addition to providing a btag for each event hemisphere, it also does so for each jet in the event.