Advertisement
Guest User

Untitled

a guest
Jan 21st, 2019
110
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.75 KB | None | 0 0
  1. function DownloadFile(SourceFile, DestFile: string): Boolean; //фукнкция не моя для скачивания файлов
  2. function URLEncode(const S2: string): string; //урленкод перевод кирилицы в ulr формат
  3. function decVK_hash(hash : String) : String; // тоже не моя функция раскодировка хэша вк на стенах групп
  4. function ReplaceSub(str, sub1, sub2: string): string; //замена в строке
  5. function autoriseVK(email,pass,proxyTYPE,proxy,port,proxyUSER,proxyPASS:string; memo:tmemo; editkey:TEdit; rus:integer):string; //авторизаця в вк
  6. function autoriseVK2(email,pass,proxyTYPE,proxy,port,proxyUSER,proxyPASS:string; memo:tmemo; editkey:tedit; rus:integer):string; //авторизаця в вк с антикаптчей
  7. function autoriseVK3(email,pass,proxyTYPE,proxy,port,proxyUSER,proxyPASS:string; memo:tmemo; editkey:tedit):string; //авторизаця в вк с антикаптчей при регитстрации аккаунта
  8. function send(method,zap,cooc,params,ref,mime,proxyTYPE,proxy,port,proxyUSER,proxyPASS:string; var headers:array of string):string; //отправка любого запроса, с использованием прокси любых видов
  9. function coocs(method,zap,params,ref,mime,proxyTYPE,proxy,port,proxyUSER,proxyPASS:string;headers:array of string):string; //вытаскивание куков
  10. function parser(doc,home,eend:string;nacpos,parstype:integer):string; //парсер любой строки
  11. function captchaHOME(put,key:string; rus:integer):string; //Отправление капчи в антигейт в ответ придет ID
  12. function captchaEND(id,key:string):string;// прием капчи в ответ приходит капча
  13. function HttpPostFileForm(const cooc,contTYPE,URL, FieldName, FileName: string;
  14. const Data: TStream; const FormFields:TStrings;ref,proxyTYPE,proxy,port,proxyUSER,proxyPASS:string;headers:array of string ): string; //загрузка файлов на сервера
  15. function loadIMG(link,put,cooc,ref,proxyTYPE,proxy,port,proxyUSER,proxyPASS:string):string; //скачивание файлов моя функция
  16. function hosttoip(name: string; var ip: string): boolean; //проверка домена на ip
  17. procedure Sorting(ALogins, APasses: TStringList; razd:string; memo:tmemo); // Разделяет логины и пассы
  18. procedure Sorting_mails(Amails, Apasses: TStringList; razd:string; memo, Amemolog:tmemo); // Разделяет мылы(до собаки) и пассы
  19. function proxyCheck(AType ,Aproxy, Aport, Auser, Apass:string; time:integer):boolean; // Если прокся валид, возвращает тру, если нет, Фалсе.
  20. function captcha(cap_sidA,key:string; rus:integer): string; // тупо отгадывает капчу по адресу captcha и с ключем key
  21. function filepoisk(put:string; str:string):boolean;
  22. function DigitToHex(Digit: Integer): Char;
  23. function URLEncode2(const S: string): string;
  24. function URLDecode(const S: string): string;
  25. function UrlEncode3(Str: string): string;
  26. function UrlEncode4(const S:string;NeedUTF8:boolean=false):string;
  27. function autoriseVK4(email,pass:string):string;
  28. function autoriseVK5(email,pass,ag,AType ,Aproxy, Aport, Auser, Apass:string):string; // с каптчей
  29. function show_code(S:string):string; // Функция выводит Идентификатор компа юзера и шифрует его с заданной строкой S
  30. function test_code(link, code, S:string):boolean; // Функция проверяет привязку компа по заданному адреса скрипта
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement