• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Бот для онлайн игры

  • Автор темы wlords
  • Дата начала
W

wlords

Нужна помощь в написании бота для онлайн RPG (браузерная). Бот должен качать моего персонажа ("видеть" на экране картинку, наводить на неё курсор, щёлкать по ней мышкой)
Delphi владею на среднем уровне. Помогите плз кто чем может (литература, проги).
 
D

Dock1100

снинь сайт игри на Dock1100@bigmir.net. Помозгую.
 
D

Dock1100

Могу дать код для управления мышкой, а как найти нужную картинку не знаю.
Установить позицию курсора:
Код:
SetCursorPos(x, y);
// где x, y позиция курсора

считать позицию курсора:
Код:
getcursorPos(x,y)
или
type Tpointer=record
x:integer;
y:integer;
end;
var pos:tpointer;
begin
getcursorpos(pos)

Клик левой кнопкой:
Код:
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);

Клик правой кнопкой:
Код:
mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);

Чтобы сделать два клика (Doubleclick) пишеш:
Код:
var i,x,y:integer;
begin
setcursorpos(x,y);
for i:=1 to 2 do begin
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
end;
end;
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!