Jump to content

Recommended Posts

Posted
2 hours ago, Pokimane123 said:

I need this script captcha anyone can help me??   E8YRuQ

 

use this

 

uses sysutils,classes;
var
  p1,p2:pointer;
begin
  while true do
  begin
    if engine.waitaction([ladlg], p1, p2) = ladlg then
    begin
      if pos(lowercase('bot'), lowercase(engine.dlgtext)) <> 0 then
      begin
        delay(555);
        engine.bypasstoserver('antibot_correct');
      end;
    end;
  end;
end.

 

Posted
uses SysUtils, Classes;

var
a1, a2: integer;

procedure Captcha;
begin
  while delay(100) do begin
    if Engine.Status = lsOnline then begin
      case Engine.WaitAction([laDlg], a1, a2) of
        laDlg: if (Pos('Antibot', Engine.DlgText)>0) then
         Engine.BypassToServer('antibot_correct'); 
      end;
    end;
    delay(1000);
  end;
end; 

begin
  Script.NewThread(@Captcha);
end.

 

  • 1 month later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...