Что нового

[Автоматизация] Помогите дописать бота спамера!

PreDoK

Новичок
Сообщения
30
Репутация
3
Выложил токо вид окна!
В Общем что именно записать, мне надо чтоб рассылался спам в чат в игре Point Blank и чтоб рассылку можно было остановить(все на кнопках)!Сделать рассылку надо для окна Point Blank!
Скрин окна бота:

Сам скрипт:

Код:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=k:\documents and settings\admin\Мои документы\form1.kxf
$Form1_1 = GUICreate("PBKillAuto v1.2", 387, 353, 192, 124)
GUISetFont(8, 400, 0, "Arial")
GUISetBkColor(0xC0C0C0)
$Label1 = GUICtrlCreateLabel("By PreDoK", 8, 312, 114, 26)
GUICtrlSetFont(-1, 14, 800, 0, "Courier New")
$Group1 = GUICtrlCreateGroup("Опции", 8, 64, 369, 153)
$Input1 = GUICtrlCreateInput("Название функции выполнения", 16, 80, 193, 22)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input2 = GUICtrlCreateInput("Включить", 224, 80, 65, 22)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input3 = GUICtrlCreateInput("Выключить", 304, 80, 65, 22)
GUICtrlSetState(-1, $GUI_DISABLE)
$Label2 = GUICtrlCreateLabel("Автовыстрел для оружия", 24, 112, 145, 20)
GUICtrlSetFont(-1, 8, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x008000)
$Label3 = GUICtrlCreateLabel("F5", 232, 112, 16, 17)
GUICtrlSetColor(-1, 0xFF0000)
$Label4 = GUICtrlCreateLabel("F7", 312, 112, 16, 17)
GUICtrlSetColor(-1, 0xFF0000)
$Label5 = GUICtrlCreateLabel("Автовыстрел для SSG-69", 24, 144, 149, 20)
GUICtrlSetFont(-1, 8, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x008000)
$Label6 = GUICtrlCreateLabel("Автовыстрел Fast Zoom", 24, 176, 137, 20)
GUICtrlSetFont(-1, 8, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x008000)
$Label11 = GUICtrlCreateLabel("F6", 232, 144, 16, 17)
GUICtrlSetColor(-1, 0xFF0000)
$Label12 = GUICtrlCreateLabel("F9", 312, 144, 16, 17)
GUICtrlSetColor(-1, 0xFF0000)
$Label13 = GUICtrlCreateLabel("F1", 232, 176, 16, 17)
GUICtrlSetColor(-1, 0xFF0000)
$Label14 = GUICtrlCreateLabel("F2", 312, 176, 16, 17)
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label7 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------", 16, 128, 352, 18)
$Label8 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------", 16, 160, 352, 18)
$Label9 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------", 16, 192, 352, 18)
$Label17 = GUICtrlCreateLabel("AutoKill to BOT v1.2", 32, 16, 332, 41)
GUICtrlSetFont(-1, 24, 800, 4, "Arial")
GUICtrlSetColor(-1, 0x008080)
GUICtrlCreateInput("", 8, 256, 361, 22)
$Label10 = GUICtrlCreateLabel("Строка спама", 16, 232, 103, 22)
GUICtrlSetFont(-1, 11, 800, 0, "Arial")
GUICtrlSetColor(-1, 0xFF0000)
$Button1 = GUICtrlCreateButton("Спамить", 192, 288, 75, 25)
$Button2 = GUICtrlCreateButton("Стоп", 288, 288, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd


Зарание спасибо! :laugh:
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Re: [Автоматизация] Помагите дописать BOT'а спамера!

PreDoK
Предупреждение Не нужно разукрашивать и подчёркивать весь текст сообщения. Форматирование текста предназначено для выделения действительно важных участков, а у тебя получается всё важное, что парадоксальным образом отменяет всю важность всего сообщения :wacko:.
 
Верх