!747
!pcall {

m {
  static Class receivingBot;
  static int delay = 10000;
  
  p {
    while (true) {
      pcall { doIt(); }
      sleep(delay);
    }
  }
  
  static void doIt() {
    S answer = sendToRemoteBot("Identity Manager", format3("Who is moving to * (full state)", getComputerID()));
    print(answer);
    
    for (DynamicObject state : (L<DynamicObject>) unstructure(answer)) {
      print("State: " + structure(state));
      
      S botID = cast state.fieldValues.get("id");
      S dataID = cast state.fieldValues.get("dataID");
      
      if (receivingBot == null)
        receivingBot = hotwire("#1001337");
        
      answer = (S) call(receivingBot, "doIt", botID, dataID);
      print(answer);
      if (!match3("All done.", answer))
        continue;
        
      print(sendToRemoteBot("Identity Manager", format3("* is now in state *", botID, "residing")));
    }
  }
}

Began life as a copy of #1001349