string si="";
string s;
readclipboard (s);

string rn=formatic(13)+formatic(10);

string path="C:\new"; // куда скачать файлы


messagebox(s);

int count_file=download(s, path); // вызов функции, которая скачает найдёт ссылки и скачает файлы
messagebox("Скачено файлов: "+format(count_file));

function download(string s, string path_save)
{
char text[9999999];
string link[99], name_file[9999], domain, body;
int count_download_file=0;
regexreplace(1, #path_save, path_save, "(.+?)\\*$", "$1\");

int count_link=regexsearch(sizearray(link), #link[0], s, "https?:\/\/[^\r\n]+", MULTILINE);
if(count_link)
{
for(int i=0; i<count_link; i++)
{

if(regexsearch(1, #domain, link[i], "https?:\/\/[^\/]+"))
{
if(regexreplace(1, #body, link[i], "https?:\/\/[^\/]+\/(.+)", "$1"))
{
if(regexsearch(1, #name_file[i], body, "[^\/]+$"))
{
si=si+name_file[i]+rn;
writeclipboard (si);

int count_byte=sendgetweb(#text[0], "Mozilla", "GET", domain, body);
if(count_byte>0)
{
if(fopen(path_save+name_file[i], "wb"))
{
fwriteb(#text[0], count_byte);
fclose();
count_download_file++;

}
}
}
}
}
}
}
return count_download_file;
}

string si="", s;
readclipboard (s);

string rn=formatic(13)+formatic(10);
string path="C:\new"; // куда скачать файлы

messagebox(s);

int count_file=download(s, path); // вызов функции, которая скачает найдёт ссылки и скачает файлы
messagebox("Скачено файлов: "+format(count_file));

function download(string s, string path_save)
{
char text[9999999];
string link[99], name_file, domain, body;
int count_download_file=0;
regexreplace(1, #path_save, path_save, "(.+?)\\*$", "$1\");

int count_link=regexsearch(sizearray(link), #link[0], s, "https?:\/\/[^\r\n]+", MULTILINE);
if(count_link)
{
for(int i=0; i<count_link; i++)
{
if(regexsearch(1, #domain, link[i], "https?:\/\/[^\/]+"))
{
if(regexreplace(1, #body, link[i], "https?:\/\/[^\/]+\/(.+)", "$1"))
{
if(regexsearch(1, #name_file, body, "[^\/]+$"))
{
si=si+name_file+rn;
writeclipboard (si);
int count_byte=sendgetweb(#text[0], "Mozilla", "GET", domain, body);
if(count_byte>0)
{
if(regexreplace(1, #name_file, name_file, "([^\.]+)(\..+)", "$1"+"_"+format(count_download_file)+"$2"))
{
if(fopen(path_save+name_file, "wb"))
{
fwriteb(#text[0], count_byte);
fclose();
count_download_file++;
}
}
}
}
}
}
}
}
return count_download_file;
}