sS agiBlue_linkForPhrase(S phrase, O... additionalParams) {
  S domain = makeAGIDomainPart(phrase), url;
  if (empty(domain)) null;
  bool readAs = neq(phrase, domain);
  if (l(domain) > maximumDomainPartLength()) {
    url = "http://agi.blue";
    domain = domain + ".agi.blue";
  } else {
    url = "http://" + domain + ".agi.blue";
    domain = null;
  }
    
  ret url + hquery(
    paramsPlus(additionalParams, +domain,
    key := readAs ? "read as" : null, value := readAs ? phrase : null));
}

Began life as a copy of #1023646