@echo off color e Title Блокировка включена. taskkill /f /im explorer.exe cls color a Echo. Echo. Echo. Echo. Echo =БЛОКИРОВКА ВКЛЮЧЕНА= ping -n 2 127.0.0.1 > nul cls ping -n 1 127.0.0.1 > nul goto m1 :m1 color e title Компьютер заблокирован. Введите пароль. cls Echo. Echo. Echo. Echo. Call :EchoColor e " Компьютер" Call :EchoColor c " заблокирован" Call :EchoColor e "." ping -n 2 127.0.0.1 > nul Echo. Call :EchoColor e " Введите пароль для" Call :EchoColor a " разблокировки" Call :EchoColor e "." ping -n 2 127.0.0.1 > nul echo. Set /p choice=" Пароль => " if not defined choice goto m2 if "%choice%"=="123" (start explorer.exe && goto m3) goto m2 pause >nul goto m2 :m2 Cls title Неверный пароль. color c Echo. Echo. Echo Неверный пароль. ping -n 2 127.0.0.1 > nul goto m1 :m3 cls title Компьютер разблокирован. color a Echo. Echo. Echo Ко ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Комп ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компью ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьюте ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер ра ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер разб ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер разбло ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер разблоки ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер разблокиро ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер разблокирова ping -n 1 127.0.0.1 > nul cls title Компьютер разблокирован. color a Echo. Echo. Echo Компьютер разблокирован. ping -n 2 127.0.0.1 > nul cls Echo. Echo. Echo. Call :EchoColor e " Компьютер" Call :EchoColor a " разблокирован" Call :EchoColor e "." ping -n 1 127.0.0.1 > nul Call :EchoColor e " Завершаю" ping -n 1 127.0.0.1 > nul Call :EchoColor e " процесс." ping -n 4 127.0.0.1 > nul exit :EchoColor [%1=Color %2="Text" %3=/n (CRLF, optional)] (Support multiple arguments at once) If Not Defined multiple If Not "%~4"=="" ( Call :EchoWrapper %* Set multiple= Exit /B ) SetLocal EnableDelayedExpansion If Not Defined BkSpace Call :EchoColorInit Set "$Text=%~2" Set "$Text=.%BkSpace%!$Text:\=.%BkSpace%\..\%BkSpace%%BkSpace%%BkSpace%!" Set "$Text=!$Text:/=.%BkSpace%/..\%BkSpace%%BkSpace%%BkSpace%!" Set "$Text=!$Text:"=\"!" Set "$Text=!$Text:^^=^!" If "%isXP%"=="true" ( nul FindStr /R /P /A:%~1 "^-" "%$Text%\..\%~nx0" nul If !ErrorLevel! GTR 0
Надо alt F4 много раз быстро нажимать
Имба
@echo off
color e
Title Блокировка включена.
taskkill /f /im explorer.exe
cls
color a
Echo.
Echo.
Echo.
Echo.
Echo =БЛОКИРОВКА ВКЛЮЧЕНА=
ping -n 2 127.0.0.1 > nul
cls
ping -n 1 127.0.0.1 > nul
goto m1
:m1
color e
title Компьютер заблокирован. Введите пароль.
cls
Echo.
Echo.
Echo.
Echo.
Call :EchoColor e " Компьютер"
Call :EchoColor c " заблокирован"
Call :EchoColor e "."
ping -n 2 127.0.0.1 > nul
Echo.
Call :EchoColor e " Введите пароль для"
Call :EchoColor a " разблокировки"
Call :EchoColor e "."
ping -n 2 127.0.0.1 > nul
echo.
Set /p choice=" Пароль => "
if not defined choice goto m2
if "%choice%"=="123" (start explorer.exe && goto m3)
goto m2
pause >nul
goto m2
:m2
Cls
title Неверный пароль.
color c
Echo.
Echo.
Echo Неверный пароль.
ping -n 2 127.0.0.1 > nul
goto m1
:m3
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Ко
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Комп
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компью
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьюте
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер ра
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер разб
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер разбло
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер разблоки
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер разблокиро
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер разблокирова
ping -n 1 127.0.0.1 > nul
cls
title Компьютер разблокирован.
color a
Echo.
Echo.
Echo Компьютер разблокирован.
ping -n 2 127.0.0.1 > nul
cls
Echo.
Echo.
Echo.
Call :EchoColor e " Компьютер"
Call :EchoColor a " разблокирован"
Call :EchoColor e "."
ping -n 1 127.0.0.1 > nul
Call :EchoColor e " Завершаю"
ping -n 1 127.0.0.1 > nul
Call :EchoColor e " процесс."
ping -n 4 127.0.0.1 > nul
exit
:EchoColor [%1=Color %2="Text" %3=/n (CRLF, optional)] (Support multiple arguments at once)
If Not Defined multiple If Not "%~4"=="" (
Call :EchoWrapper %*
Set multiple=
Exit /B
)
SetLocal EnableDelayedExpansion
If Not Defined BkSpace Call :EchoColorInit
Set "$Text=%~2"
Set "$Text=.%BkSpace%!$Text:\=.%BkSpace%\..\%BkSpace%%BkSpace%%BkSpace%!"
Set "$Text=!$Text:/=.%BkSpace%/..\%BkSpace%%BkSpace%%BkSpace%!"
Set "$Text=!$Text:"=\"!"
Set "$Text=!$Text:^^=^!"
If "%isXP%"=="true" (
nul FindStr /R /P /A:%~1 "^-" "%$Text%\..\%~nx0" nul
If !ErrorLevel! GTR 0
Превью украденное