svoid tok_standardBot1(LS tok) {
  int i;
  while ((i = jfind(tok, "standardBot1 <id> {")) >= 0) {
    print("Processing standardBot1");
    int iOpening = indexOf(tok, i, "{");
    S name = tok.get(iOpening-2);
    int iClosing = findEndOfBracketPart(tok, iOpening)-1;
    LS contents = subList(tok, iOpening+1, iClosing);
    
    S allServers = "";
    int j = jfind(contents, "allServers {");
    if (j >= 0) {
      int k = findEndOfBracketPart(contents, j+2);
      allServers = joinSubList(contents, j+4, k-2);
      clearTokens(contents, j, k);
    }

    S init = "";
    j = jfind(contents, "init {");
    if (j >= 0) {
      int k = findEndOfBracketPart(contents, j+2);
      init = joinSubList(contents, j+4, k-2);
      clearTokens(contents, j, k);
    }
    
    replaceTokens_reTok(tok, i, iClosing+1,
      [[ cmodule2 ]] + name + [[ extends DynTalkBot2<]] + name + [[.ByServer> {
        void init {
          super.init();
          makeByServer = () -> new ByServer;
          useAGIBlueForDropPunctuation = false;
          preprocessAtSelfToMyName = false;
          ]] + init + [[
        }
        
        ]] + allServers + [[

        class ByServer extends DynTalkBot2.ByServer { ]]
        + join(contents)
        + "} }");
  }
}

Began life as a copy of #1025378