Вот то что у мну получилось
- Рыбный бот для Lineage (неспорю, стоит его конкретно доработать, но первые шаги я уже сделал)
[color=green]//---------------------------------------------------------------------------[/color]
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Timer1->Enabled = True;
Timer2->Enabled = True;
Timer3->Enabled = True;
}
[color=green]//---------------------------------------------------------------------------[/color]
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Timer1->Enabled = False;
Timer2->Enabled = False;
Timer3->Enabled = False;
}
[color=green]//---------------------------------------------------------------------------[/color]
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
void *hdc=CreateDCA("DISPLAY",NULL,NULL,NULL);
if(GetPixel(hdc,118,157) == 16239368)
keybd_event(VK_F2, 0, 0, 0);
keybd_event(VK_F2, 0, KEYEVENTF_KEYUP, 0);
if(GetPixel(hdc,118,157) == 4852793)
keybd_event(VK_F3, 0, 0, 0);
keybd_event(VK_F3, 0, KEYEVENTF_KEYUP, 0);
}
[color=green]//---------------------------------------------------------------------------[/color]
void __fastcall TForm1::Timer2Timer(TObject *Sender)
{
void *hdc=CreateDCA("DISPLAY",NULL,NULL,NULL);
if(GetPixel(hdc,256,136) == 3020813)
GetPixel(hdc,1,1);
else
keybd_event(VK_F1, 0, 0, 0);
keybd_event(VK_F1, 0, KEYEVENTF_KEYUP, 0);
}
[color=green]//---------------------------------------------------------------------------[/color]
void __fastcall TForm1::Timer3Timer(TObject *Sender)
{
void *hdc=CreateDCA("DISPLAY",NULL,NULL,NULL);
if(GetPixel(hdc,336,70) == 1573045)
GetPixel(hdc,1,1);
else
keybd_event(VK_F4, 0, 0, 0);
keybd_event(VK_F4, 0, KEYEVENTF_KEYUP, 0);
}
[color=green]//---------------------------------------------------------------------------[/color]