// covers the common cases
  static S getBotNameFromSnippet(S programID) ctex {
    S src = loadSnippet(programID);
    L<S> tok = javaTok(src);
    S[] m;
    for (S pat : litlist(
      "new Android3(*",
      "makeAndroid(*", "makeAndroid3(*", "makeSilentAndroid(*",
      "addToMultiPort(*")) {
      m = find2(javaTok(pat), tok);
      if (m != null && isQuoted(m[0])) ret unquote(m[0]);
    }
    ret null;
  }