Могут быть проблемы в "выкидыванием" с форума (слетевшей авторизацией). Нужно собрать статистику таких случаев.
Есть Тема, куда можете сообщить о проблемах с сайтом либо просто передать привет.
Капча на linestorm.ru
- Автор темы Reliable
- Дата начала
-
- Теги
- готовый скрипт
- Рег
- 26 Дек 2015
- Сообщения
- 82
- Реакции
- 0
мамкины скриптеры повылезали=)
без, обид, но за 7 баксов продавать прям скажем говнокод, который по сути просто скопипасчен (http://rawr.su/topic/4133-chislova-kapcha/?p=27388), в котором каждые 5 сек запускается новый поток, что обязательно приведет к зависанию адреналина рано или поздно... как-то не очень)
функция поиска ответа выглядит примитивнейшим образом блин:
procedure Find_Answer(E: TL2Control = Engine);
var RegExp: TRegExpr; S: string;
begin
RegExp:= TRegExpr.Create;
S:= StringReplace(E.DlgText, ' ', '', [rfReplaceAll]);
RegExp.Expression:= '>[0-9]+<';
if RegExp.Exec(S) then begin
S:= Copy(RegExp.Match[0], 2, Length(RegExp.Match[0])-2);
E.Msg('[AntiCAPTCHA]', 'Ответ: '+S, 128);
end;
if Engine.BypassToServer('00' + S) then delay(999);
RegExp.Free;
end;
Прикладываю скрипт (бесплатно и без смс =D), который решает эту капчу же на всех окнах, которые онлнайн, достаточно просто запустить его на любом окне, даже пустом, и все: https://drive.google.com/file/d/0B5R__sEBA6zSUUtXU25WYXNhT1k/view?usp=drivesdk
и обязательно загугли произношение слова Thread, произносишь ты, а стыдно мне
без, обид, но за 7 баксов продавать прям скажем говнокод, который по сути просто скопипасчен (http://rawr.su/topic/4133-chislova-kapcha/?p=27388), в котором каждые 5 сек запускается новый поток, что обязательно приведет к зависанию адреналина рано или поздно... как-то не очень)
функция поиска ответа выглядит примитивнейшим образом блин:
procedure Find_Answer(E: TL2Control = Engine);
var RegExp: TRegExpr; S: string;
begin
RegExp:= TRegExpr.Create;
S:= StringReplace(E.DlgText, ' ', '', [rfReplaceAll]);
RegExp.Expression:= '>[0-9]+<';
if RegExp.Exec(S) then begin
S:= Copy(RegExp.Match[0], 2, Length(RegExp.Match[0])-2);
E.Msg('[AntiCAPTCHA]', 'Ответ: '+S, 128);
end;
if Engine.BypassToServer('00' + S) then delay(999);
RegExp.Free;
end;
Прикладываю скрипт (бесплатно и без смс =D), который решает эту капчу же на всех окнах, которые онлнайн, достаточно просто запустить его на любом окне, даже пустом, и все: https://drive.google.com/file/d/0B5R__sEBA6zSUUtXU25WYXNhT1k/view?usp=drivesdk
и обязательно загугли произношение слова Thread, произносишь ты, а стыдно мне