!7

cmodule CombinedBot > DynAttractorBot {
  class CombinedBot2 > AttractorBot {
    *() {
      addStandardAttractor(new Attractor1);
    }
    
    run {}
    
    class Attractor1 > DefaultAttractor {
      run {
        LS modules = dm_attractorBotModules();
        for (S mod : modules) {
          continue if dm_isMe(mod);
          LS msgs = synchroList();
          {
            temp vmBus_onMessage aBotSaid(voidfunc(O mod2, S output) {
              print("Got " + output + " from " + mod2);
              if (dm_sameModule(mod, mod2))
                msgs.add(output);
            });
            print("Calling: " + dm_moduleName(mod));
            dm_call(mod, 'submitInput, input);
          }
          say(msgs);
        }
      }
    }
  }
    
  AttractorBot makeBot() { ret new CombinedBot2; }
}