!7

set flag AllowMetaCode. set flag Reparse. meta-transformNow { tok_standardBot }

standard bot WeNeed {

  Set<S> db = ciSet();

  S add(S s) { if (db.add(s)) change(); null; }

  S remove(S s) { ret db.remove(s) ? with(r change, "What a relief") : null; }

  S listWithPattern(S pat) { ret or2(lines(map(db, x -> format(ellipsisToStar(pat), x))), "nothing"); }

  S clearAfterConfirm() { ret "You're kidding, right?"; }

  sync S processSimplifiedLine(S s, O... _) {

    try answer super.processSimplifiedLine(s, _);

    new Matches m;

    meta {

      S program = [[

        We need ... = +

        We have ... = -

        Someone gave us ...|Someone gave me ... = -

        What do we need = listWithPattern("We need ...")

        We don't need ... anymore = -

        We need nothing|We don't need anything = clear after confirm

      ]];

      LS tok = javaTok(program);

      jreplace(tok, "+", "add(\\$1);");

      jreplace(tok, "-", "remove(\\$1);");

      jreplace(tok, "clear after confirm", "clearAfterConfirm();");

      LS lines = lines(join(tok));

      lines = map(lines, l -> {

        PairS p = splitAtEquals_pair(l);

        ret p == null ? l : "if (matchX2(\*quote(p.a)*/, s, m)) ret \*p.b*/;";

      });

      ret lines(lines);

    }

    null;

  }

}