*ХЕКЕРСТВО* урок 13 пРиКалУеМСя С кЛавИаТУрой!!

Всем привет! Сегодня будет экзотический прикол. Мы будем мигать лампочками на клавиатуре с помощью VBS!

Создайте файл 1.vbs и через блокнот пишите в нем:

Set s = CreateObject("Wscript. Shell")

Do

Wscript. sleep 80

S. sendkeys"{numlock}"

Wscript. sleep 80

S. sendkeys"{capslock}"

Wscript. sleep 80

S. sendkeys"{scrolllock}"

Wscript. sleep 80



Wscript. sleep 80

S. sendkeys"{numlock}"

Wscript. sleep 80

S. sendkeys"{capslock}"

Wscript. sleep 80

S. sendkeys"{scrolllock}"

Wscript. sleep 80



S. sendkeys"{scrolllock}"

Wscript. sleep 80

S. sendkeys"{capslock}"

Wscript. sleep 80

S. sendkeys"{numlock}"

Wscript. sleep 80





Wscript. sleep 80

S. sendkeys"{scrolllock}"

Wscript. sleep 80

S. sendkeys"{capslock}"

Wscript. sleep 80

S. sendkeys"{numlock}"

Wscript. sleep 80

S. sendkeys"{numlock}"

Wscript. sleep 80

S. sendkeys"{capslock}"

Wscript. sleep 80

S. sendkeys"{scrolllock}"

Wscript. sleep 80

Loop

В принципе, код не сложный, можно сказать легкий.

S. sendkeys"{numlock}" - какую кнопку следует нажать. Поищите, может найдете имена клавиш. Я поэкспериментировал, нашел кнопку esc. Запустил - сущий ад =)

Wscript. sleep 80 - Пауза между нажатиями на клавиши. 80 миллисекунд