Флуд v.149

завтра по обновляю , старые софты . На более новый движок.

 

бесполезнейшая тема

 

Что то ты загнул с терминами. Я не понял.
А про socks на delphi, то поддерживает. Код небольшой надо.
Возможно завтра выложу софт проксе чекер

 

Мапхак был просто раньше, тема, да и стил всякими дагонами/ультами ама/зевса/некрофоса тема
Или орбволк, типо не будешь останавливаться, когда бежишь, а он типо по умному бежит , чтоб больше тычек успеть дать

 

Прикол в том что Соксы будут работать как HTTP на синапсе , про инди хз.

 

нет
тупо перебивает управление
больше фиданешь из-за этого
есть пара прикольных штучек
типа скриптов "абилитиз", "тувер радиус", "авто мидас", "снетчер"
но никак не те, что берут управление на себя
это лажа
на инвокера скрипт так вообще тайминги путал)))))

 

Спойлер

if (TypeProxy<>0) then
begin
inc(ProxyGlob);
if ProxyGlob>=ProxyList.Count then ProxyGlob:=0;
ProxyLoc:=ProxyGlob;
Form1.Memo1.Lines.Add('Используем прокси: '+ProxyList[ProxyLoc]);
if TypeProxy=1 then
begin
HTTP.ProxyParams.ProxyServer:=Copy(ProxyList[ProxyLoc],1,Pos(':',ProxyList[ProxyLoc])-1);
HTTP.ProxyParams.ProxyPort:=StrToInt(Copy(ProxyList[ProxyLoc],Pos(':',ProxyList[ProxyLoc])+1,Length(ProxyList[ProxyLoc])-Pos(':',ProxyList[ProxyLoc])));
end
else if TypeProxy=2 then
begin
IdSocksInfo.Version:=svSocks4;
IdSocksInfo.Host:=Copy(ProxyList[ProxyLoc],1,Pos(':',ProxyList[ProxyLoc])-1);
IdSocksInfo.Port:=StrToInt(Copy(ProxyList[ProxyLoc],Pos(':',ProxyList[ProxyLoc])+1,Length(ProxyList[ProxyLoc])-Pos(':',ProxyList[ProxyLoc])));
IdSocksInfo.Authentication:= saNoAuthentication;
IdSSLIOHandlerSocketOpenSSL.TransparentProxy:=IdSocksInfo;
HTTP.IOHandler:=IdSSLIOHandlerSocketOpenSSL;
IdSSLIOHandlerSocketOpenSSL.ConnectTimeout:=30000;
IdSSLIOHandlerSocketOpenSSL.ReadTimeout:=30000;
end
else
begin
IdSocksInfo.Version:=svSocks5;
IdSocksInfo.Host:=Copy(ProxyList[ProxyLoc],1,Pos(':',ProxyList[ProxyLoc])-1);
IdSocksInfo.Port:=StrToInt(Copy(ProxyList[ProxyLoc],Pos(':',ProxyList[ProxyLoc])+1,Length(ProxyList[ProxyLoc])-Pos(':',ProxyList[ProxyLoc])));
IdSocksInfo.Authentication:= saNoAuthentication;
IdSSLIOHandlerSocketOpenSSL.TransparentProxy:=IdSocksInfo;
HTTP.IOHandler:=IdSSLIOHandlerSocketOpenSSL;
IdSSLIOHandlerSocketOpenSSL.ConnectTimeout:=30000;
IdSSLIOHandlerSocketOpenSSL.ReadTimeout:=30000;
end;
end;

Года 3 назад находил данный код.
Работало тогда точно. Сейчас не тестил

 

в нем есть снетчер, аегис все дела, я взял тупо ради анти-вак и собсно мапхака ))

 

Инди всегда работал норм) Но там утечка большая..
Synapce - THTTpsend;
Indy - IdHttp;

 

Кто сможет на дедике порты открыть?