Automation and bots

 Помощь      Поиск      Пользователи


 Страниц (1): [1]   

> Описание: The script automatically parses the list of free proxies from the site, checks them and issues a working one
Kibor
Отправлено: 07 Июля, 2020 - 15:29:32
Post Id



Администратор
Full Member


Покинул форум
Сообщений всего: 160
Дата рег-ции: Дек. 2017  
Репутация: 0
Карма 0




A simple script that parses a site with a list of free proxies makes an array of them and checks them for performance.
It allows you to easily automatically find a working free proxy without going to any sites manually and without checking the proxy list by hand.

If a working proxy is found, it issues the page(для просмотра ссылки Вам необходимо авторизоваться) to which the script goes through this proxy and issues an IP and port for further use of the free proxy for its intended purpose.

CODE:
int pos_size_edit0[1][4];
string text_edit0[1];

pos_size_edit0[0][0]=10; pos_size_edit0[0][1]=9; pos_size_edit0[0][2]=221; pos_size_edit0[0][3]=20;
text_edit0[0]="Proxy parsing...";

createdialog(0, EDIT, #pos_size_edit0[0][0], #text_edit0[0]);
showdialog(0, "Proxy Search", 200, 200, 250, 70, 1, 1);
//////////



find_proxi();



function find_proxi()
{
int pade=1;
string T;
S:;
if (sendgetweb(#T, "Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:78.0) Gecko/20100101 Firefox/78.0", "GET", "http:/^/foxtools.ru", "Proxy?page="+format(pade)))
{
text_edit0[0]="Proxy parsing...";
//messagebox ("Proxy?page="+format(pade));
/*
if (fopen ("c:\5.txt", "w")!=0)
{//если открылся
fwrite(T);
fclose();//закрываем файл
}
start("c:\5.txt");
*/

string P[100];
string R="(?<=input type=^"checkbox^" class=^"ch^" value=^")[\d]+(\.)[\d]+(\.)[\d]+(\.)[\d]+(:)[\d]+(?=^" onclick=^"SelectProxy\(this\)^")";
int k=regexsearch(100, #P[0], T, R);
if (k==0)
{
messagebox ("No proxy");
return;
}
for (int n=0; n<k; n++)
{
//messagebox (P[n]);
text_edit0[0]=P[n];

if (sendgetweb(P[n], #T, "", "GET", "https:/^/kibor-bot.com", "forum"))
{
if (T!="")
{
//messagebox (IP[n]+":"+PORT[n]);
messagebox (P[n]+" - "+T);
if (fopen ("c:\5.txt", "w")!=0)
{//если открылся
fwrite("Working proxy "+P[n]+"^r^n"+T);
fclose();//закрываем файл
}
start("c:\5.txt");
return;
}
}

}
}
pade++;
goto S;
}


-----
The Visual Code Editor is Kibor. Creating bots without knowledge of programming.

Learning function for recognizing text.
-----
 
 Top
Страниц (1): [1]
Сейчас эту тему просматривают: 1 (гостей: 1, зарегистрированных: 0)
« Textbook Kibor »


Все гости форума могут просматривать этот раздел.
Только администраторы и модераторы могут создавать новые темы в этом разделе.
Только администраторы и модераторы могут отвечать на сообщения в этом разделе.
 




Powered by