Warning: session_start(): open(/var/lib/php/sessions/sess_sm39rb41dl21bncqsh7p5vscde, O_RDWR) failed: No space left on device (28) in /var/www/tb-usercake/models/config.php on line 51
Warning: session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in /var/www/tb-usercake/models/config.php on line 51
!7
// cmodule fails because of loadPageWithUserAgent
module GBot > DynDiscordHopper {
S myName = "GBot";
int defaultResults = 1;
Set syntaxes = synchroSet();
@Override S answer(S input, Map map) {
ret mapEachLine_tlft_nempties(input, s -> {
new Matches m;
s = simpleSpaces_noTok(s);
if (swic_trim(s, myName + ":", m))
ret doIt(m.rest());
if (eqic(s, myName + " syntaxes"))
ret backtickQuote(lines_rtrim(elementPlusList(myName + ": ...", syntaxes)));
if (swic_trim(s, myName + " new syntax:", m)) {
S syntax = unquote(m.rest());
if (!endsWithEllipsis(syntax))
ret "Shouldn't this end with \"...\"? >> " + syntax;
syntax = trim(dropSuffix("...", syntax)) + " ...";
if (!syntaxes.add(syntax)) ret "I already know that syntax!";
change();
ret "Syntax added! You can try: " + backtickQuote(replaceSuffix("...", randomThingToGoogle(), syntax));
}
if (ellipsisToDotPlusRegexpIC_matchAny(syntaxes, s, m))
ret doIt(m.rest());
null;
});
}
S doIt(S query) {
LS l = regexpICFullMatch_groups("\\d+ results? for .+");
int results = defaultResults;
if (l != null) {
results = parseInt(first(l));
query = last(l);
}
ret discord_google(query, +results);
}
S randomThingToGoogle() {
ret "Why are penguins black and white?";
}
}