!7

!include once #1025868 // DynTalkBot2 compact include

standardBot1 agiBlueRulesBot {
  processSimplified {
    if null (s = dropMyPrefixOrNull(s)) null;
    
    long channelID = longPar channelID(_);
    
    L<AGIBlue_Rule> rules = agiBlue_ruleObjects();
    L<AGIBlue_MatchedRule> matches = agiBlue_matchAllRulesOnInput(s);
    if (empty(matches)) ret "No matches with " + nRules(rules);
    L<AGIBlue_MatchedRule> matches2 = takeFirst(5, matches);
    LS rendered = map(matches2, mm -> backtickQuote(mm.rewrittenRHS())
        + "\n  " + mm.map);
    for (S r : rendered)
      postInChannel(channelID, r, msg -> {
        queue(msg.addReaction(unicode_thumbsUp()));
        queue(msg.addReaction(unicode_thumbsDown()));
      });
    postInChannel(channelID, plusNMoreWithNL(matches, matches2));
  }
}