Бот на шрифт заборчиком.

[Dead~?]

Всем доброго времени суток.
Не могли бы Вы помочь мне с поиском ботом на шрифт заборчиком.
Буду очень благодарен.

[Dead~?]

Ап-с.

[thekakashko]

создай простой текстовик напиши там вот это:
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
s.sendkeys"{scrolllock}"
wscript.sleep 80
s.sendkeys"{capslock}"
wscript.sleep 80
s.sendkeys"{numlock}"

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

Set s = Createobject("Wscript.Shell")

wscript.sleep 80

do, loop

затем разрешение текстовика переправь на .vbs
запускай и будет тебе счастье

Добавлено через 3 минуты
если не прет то сделай тоже самое только текст другой
Set S = CreateObject("WScript.Shell")
do
Wscript.sleep(200)
s.sendkeys"{numlock}"
Wscript.sleep(200)
s.sendkeys"{capslock}"
Wscript.sleep(200)
s.sendkeys"{scrolllock}"
loop

[Dead~?]

Цитата: Сообщение от thekakashko создай простой текстовик напиши там вот это: 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 s.sendkeys"{scrolllock}" wscript.sleep 80 s.sendkeys"{capslock}" wscript.sleep 80 s.sendkeys"{numlock}" 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 Set s = Createobject("Wscript.Shell") wscript.sleep 80 do, loop затем разрешение текстовика переправь на .vbs запускай и будет тебе счастье Добавлено через 3 минуты если не прет то сделай тоже самое только текст другой Set S = CreateObject("WScript.Shell") do Wscript.sleep(200) s.sendkeys"{numlock}" Wscript.sleep(200) s.sendkeys"{capslock}" Wscript.sleep(200) s.sendkeys"{scrolllock}" loop

Ты не понял,мне нужно что-бы любые мои посты на тех-же форумах или в онлайн играх были сразу написаны зАбОрОм.