Отключен JavaScript

У вас отключен JavaScript. Некоторые возможности системы не будут работать. Пожалуйста, включите JavaScript для получения доступа ко всем функциям.

[autoIT] спамер - своими руками

Автор russia , 15 июл 2013 08:12

Авторизуйтесь для ответа в теме

В этой теме нет ответов

#1 russia

Генералиссимус

Пользователи

Репутация

670

252 сообщений
254 тем

Отправлено 15 июля 2013 - 08:12

думаю особым описанием скрипт не нуждается
в кратце: макрос для спама игрового чата, сообщениями типа "ВСТУПАЙТЕ В КЛАН ***" и тп...
1 заходим на офф сайт аутоита

Пожалуйста Войдите или Зарегистрируйтесь чтобы увидеть скрытый текст

2 качаем\устанавливаем
3 создаем файл с расширением "au3"
4 пишем такое:

Код:

        margin: 0px;
        padding: 6px;
        border: 1px inset;
        width: 640px;
        height: 498px;
        text-align: left;
        overflow: auto">#include <Misc.au3>

Global $start = 0
;-------гор клавиши
HotKeySet("{INSERT}", "start") ;старт
HotKeySet("{DELETE}", "stop") ;стоп
;-------- "тело" скрипта
While 1
If _IsPressed(01) = 1 Then
Call("spam")
EndIf
WEnd
;-------функции
Func start() ; функция включения
$start = 1
EndFunc ; конец функции

Func stop() ; функция выключения
$start= 0
EndFunc ; конец функции

Func spam() ;функция спама
If $start = 1 then
While _IsPressed(01) = 1 ;если мышь зажата
Send( "{ENTER}")
Send( "spammer by warl0ck") ;сообщение
Send( "{ENTER}")
WEnd
EndIf
EndFunc

все!
запускаем, жмем лкм и наслаждаемся зафлуженым чатом

дополнение: скрипт типа "пойду ка я попью кофе, пусть макрос пофлудит"

Код:

        margin: 0px;
        padding: 6px;
        border: 1px inset;
        width: 640px;
        height: 418px;
        text-align: left;
        overflow: auto">#include <Misc.au3>
Global $start = 0
;-------гор клавиши
HotKeySet("{INSERT}", "start") ;старт
HotKeySet("{DELETE}", "stop") ;стоп
;-------- "тело" скрипта
While 1
Call("spam")
WEnd
;-------функции
Func start() ; функция включения
$start = 1
EndFunc ; конец функции

Func stop() ; функция выключения
$start= 0
EndFunc ; конец функции

Func spam() ;функция спама
If $start = 1 then
Send( "{ENTER}")
Send( "сообщение")
Send( "{ENTER}")
EndIf
EndFunc

________________

СКАЧАТЬ