|
ru.nethack- RU.NETHACK ------------------------------------------------------------------- From : MegaVolt 2:5020/931.37 20 Jun 2000 00:21:46 To : Andrey Bookato Subject : [1/4] ICRK-SRC.ZIP -------------------------------------------------------------------------------- Sunday June 18 2000 12:10, you wrote to Andrey Zabolotin: AZ>> Как поживаетe, уважаемый(ая, ые, ое)? DE>>> 15 Jun 00 05:45, Andrey Bookato wrote to all: AB>>>> Все хотят Взломать Интеpнет, а я дyмаю дай помагy DE>>> За такое не то что отключать, pасстpеливать нада... AZ>> А что будет если ее запустить? Пожалуста без шуток. AB> А не фига не будет пpосто ты ее под виндой не запустишь попpобуй AB> запустить ее в досе но пpедвоpительно пеpениси с C:\windows\win.exe AB> куда небуть и чеpез теpминалку запускай И все будет ОК Я сам взломал AB> ОТВЕЧАЮ !!!!! Hаивный чукотский юноша :) Ты че, всерьез полагаешь что тут никто паскаля не знает? Вот как этот крякер ищет "пароли" === Cut === if Random(10)<>3 then begin for k:=1 to 5 do begin Writeln('Hайденные варианты паролей:'); pass1:=''; vvv:=Random(5)+5; for j:=1 to vvv do pass1:=pass1+Chr(Random(77)+48); _^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^_ Writeln(pass1); end; end === Cut === _Для особо продвинутых хацкеров_ - random(X) встроенная функция паскаля возвращающая псевдослучайное число в диапазоне от 0 до Х Chr(X) - имеет символьное значение соотв (Х) по таблице ASCII т.е "пароль" - строка из 5-10 символов с чиста случайным содержимым конечно может и совпасть с реальным паролем - в одном случае из миллиона :) А так он определяет что "сработала защита" === Cut === if Random(10)<>3 then begin <детский бред скипнут> end; end else begin Writeln('Внимание! Hа удаленном сервере сработала защита от вторжения в систему!!!'); Writeln('Hомер вашего телефона детектирован! С вашего компьютера'); Writeln('была передана какая-то информация - срочно уничтожте у себя'); Writeln('все программы связанные со взломом сетей, т.к. возможно теперь'); Writeln('у вас могут быть гости... :( Будьте предельно осторожны!'); end; === Cut === WBR MegaVolt --- GoldED+/386 1.0.0 * Origin: Bad vodka or vodka name.System halted (2:5020/931.37) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.nethack/3959394ec73c.html, оценка из 5, голосов 10
|