Автоматическое экранирование символов при поиске

string P[10];
string T="привет (привет)";

string R= "привет (п"; //Не находит
string R= "привет "; //Находит
int k=regexsearch(-1, #P[0], T, R);

messagebox(format(k));

regexreplace(-1, #R, R, "[\(]", "\(");
regexreplace(-1, #R, R, "[\[]", "\[");
regexreplace(-1, #R, R, "[\.]", "\.");

regexreplace(-1, #R, R, "[\.]", "\.");

string T="привет (привет)"; // строка
string R= "привет (п"; // что искать

if(find(T, R)) // вызов функции поиска
{
// нужные действия
messagebox("Текст найден");
}
else messagebox("Текст не найден");



function find(string s, string regex)
{
string P;
// экранирование символов ()?!
regexreplace(-1, #regex, regex, "([\(\)\?\!])", "\$1"); // добавить нужные символы в квадратные скобки через \

if(regexsearch(1, #P, s, regex))return 1; // если найдено функция вернёт 1
return 0; // иначе 0
}