Бешенный CD-ROM INATTACK.RU :: Архив документации для хакера
Автор: Scorp
Здравствуйте!!! Решил написать статейку про то, как сделать прогу-вред, предположим вы хотите чтобы у недруга открывался CD-Rom через указанное время, для этого создаёте новый проект (file -> New Aplication) и ставите компонент "Timer (вкладка: System)" на форму, в его свойстве interval ставите через какое время открывать CD-Rom (в миллисикундах, 1000 мсек. = 1 сек.).
После того как установили интервал нажмите на таймере 2 раза кнопкой мыши и пишите туда такой код: mciSendString('Set cdaudio door open wait', nil, 0, handle);
Кстати не забудте добавить слово MMSystem в uses. Теперь компилим программу и запускаем, и видим, что через указанное время CD-Rom открывается, и когда мы его закрываем он всё-равно открывается через указанное время! Всё бы хорошо, теперь надо исправить мелкие недочёты, такие как скрытие формы, и невозможность снять программу через ALT-CTRL-DEL. Итак будем разбираться с первым (невидимая форма), для этого нажмите на форму 2 раза и пишите туда: Left := Screen.Width;
Этот код, скроет форму. Осталось последнее, сделать так, чтобы вашу программу не было видно через ALT-CTRL-DEL, это сделать очень просто добавляем функцию:
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external 'KERNEL32.DLL'; begin RegisterServiceProcess(GetCurrentProcessID, 1); begin Yield; end;
Желательно добавлять это, после все процедур и других функций! Всё программа готова, после этого остаётся только, перезагрузить компьютер, но вы же не настолько глупые, чтобы не засунуть эту программу в автозапуск :)
После этого ваш юзверь не будет жить спокойной жизнью... Если вы кинули прогу другу, и он обратился к вам за помощью, не спешите рассказать ему, что у него в автозапуске есть плохая программа, что из-за неё все беды, а лучше скажите, что незнаете что это такое и и скажите что щас вышлете (или принесёте) ему программу, которая вылечит ваш комп, я думаю друг вам будет, после этого благодарен!
Такую программу я думаю сделаете сами, просто создайте прогу, которая удалит указанный файл из автозапуска (нашу программу). Вроде всё, если что-то не понятно пишите _scorp_@mail.kz! Удачи!!!
