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)

        + "} }");

  }

}