Трюки в Windows с помощью скриптов

Мигающие_лампочки.vbs

Итак, первый скрипт заставит ваши лампочки на клавиатуре мигать как новогодние гирлянды; для начала создайте текстовый документ и вставьте туда следующее:

Set wshShell =wscript.CreateObject("WScript.Shell") ' создать экземпляр оболочки
do
wscript.sleep 100 ' ждать 100 миллисекунд
wshshell.sendkeys "{CAPSLOCK}" ' подсветить CAPSLOCK итд
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop

Скрипт бесконечный, и закрыть его нужен через диспетчер задач:

Озвучка_текста.vbs

Dim message, sapi message=InputBox("What do you want me to say?","Speak to Me") Set sapi=CreateObject("sapi.spvoice") sapi.Speak message

Сумасшедший_дисковод.vbs

Скрипт заставит ваш дисковод выезжать и заезжать обратно:

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count -1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count -1
colCDROMs.Item(i).Eject
Next

End If
wscript.sleep 5000
loop

Вывести_ошибку.vbs

x=msgbox("С НОВЫМ ГОДОМ ТЕБЯ", 0+16, "ЭЙ")

Зелёная_матрица.bat

@echo off

color 02

:start

echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto start

Записная_книжка.txt

Вначале файла прописываем .LOG, далее после каждой введённой записи будет дата и время новой записи.

Генератор паролей

@echo off

:Start2

cls

goto Start

:Start

title ѓҐ­Ґа в®а Ї а®«Ґ©

echo I will make you a new password.

echo Please write the password down somewhere in case you forget it.

echo ----------------------------------------м-----------------------

echo 1) 1 Random Password

echo 2) 5 Random Passwords

echo 3) 10 Random Passwords

echo Input your choice

set input=

set /p input= Choice:

if %input%==1 goto A if NOT goto Start2

if %input%==2 goto B if NOT goto Start2

if %input%==3 goto C if NOT goto Start2

:A

cls

echo Your password is %random%

echo Now choose what you want to do.

echo 1) Go back to the beginning

echo 2) Exit

set input=

set /p input= Choice:

if %input%==1 goto Start2 if NOT goto Start 2

if %input%==2 goto Exit if NOT goto Start 2

:Exit

exit

:B

cls

echo Your 5 passwords are %random%, %random%, %random%, %random%, %random%.

echo Now choose what you want to do.

echo 1) Go back to the beginning

echo 2) Exit

set input=

set /p input= Choice:

if %input%==1 goto Start2 if NOT goto Start 2

if %input%==2 goto Exit if NOT goto Start 2

:C

cls

echo Your 10 Passwords are %random%, %random%, %random%, %random%, %random%, %random%, %random%, %random%, %random%, %random%

echo Now choose what you want to do.

echo 1) Go back to the beginning

echo 2) Exit

set input=

set /p input= Choice:

if %input%==1 goto Start2 if NOT goto Start 2

if %input%==2 goto Exit if NOT goto Start 2