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

[wlords]

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

 

[Dock1100]

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

 

[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;