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

Тема в разделе "Delphi - Сети", создана пользователем wlords, 26 ноя 2008.

  1. wlords

    wlords Гость

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

    Dock1100 :-]

    Регистрация:
    9 ноя 2009
    Сообщения:
    678
    Симпатии:
    0
    снинь сайт игри на Dock1100@bigmir.net. Помозгую.
     
  3. Dock1100

    Dock1100 :-]

    Регистрация:
    9 ноя 2009
    Сообщения:
    678
    Симпатии:
    0
    Могу дать код для управления мышкой, а как найти нужную картинку не знаю.
    Установить позицию курсора:
    Код (Text):
    SetCursorPos(x, y);
    // где x, y позиция курсора
    считать позицию курсора:
    Код (Text):
    getcursorPos(x,y)
    или
    type Tpointer=record
    x:integer;
    y:integer;
    end;
    var pos:tpointer;
    begin
    getcursorpos(pos)
    Клик левой кнопкой:
    Код (Text):
    mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
    mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
    Клик правой кнопкой:
    Код (Text):
    mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0);
    mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);
    Чтобы сделать два клика (Doubleclick) пишеш:
    Код (Text):
    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;
     
Загрузка...

Поделиться этой страницей