//! runtextmacro DeclareDictionary("integer", "boolean", "IntegerComparison")

library_once IntegerComparison {
    public bool less(int op1, int op2) { return op1 < op2; }
    public bool equal(int op1, int op2) { return op1 == op2; }
}

library Cirillic uses Dictionaryintegerboolean {
    private Dictionary_integer_boolean Dict;

    int GetNextCirillic(string s, int searchPos) {
        int l = StringLength(s);
        whilenot searchPos >= l {
            if Dict.Exists[StringHash(SubString(s, searchPos, searchPos + 1))] {
                return searchPos;
            }
           searchPos++;
         }
        return -1;
    }

    callback onInit() {
        string s = "АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдеёжзийклмнопрстуфхцчшщъыьэюя";
        int i = StringLength(s);
        Dict = Dictionary_integer_boolean.Create();
        loop {
            Dict[StringHash(SubString(s, i - 1, i))] = true;
            exitwhen i == 1;
            i--;
        }
        Dict.Rebuild();
    }
}

void PrintAllCirillic(string s) {
    string result = "";
    int i = 0;
    loop {
        i = GetNextCirillic(s, i) + 1;
        exitwhen i == 0;//Если букв больше нет, GetNextCirillic возвращает -1.
        result += SubString(s, i - 1, i);
    }
    printf(result);
}

callback onInit() {
    PrintAllCirillic("З1д2р5авYстZ45ву&й, Мир!JASS2");
    //output: ЗдравствуйМир
}