Skocz do zawartości
fervi (Skovv)

Pewne pytanko :D

Rekomendowane odpowiedzi

Siemka! :)

 

Więc jak to powiedzieć. Jestem noobem w pascalu, ale znalazłem na necie (tibia.org.pl) poradnik do robienia "botów" :D, ale wpisując to nie działa taki problemik :/

Daje kod, poprawcie i powiedzcie co jest źle (jak chcecie)

Fęrvi Prąsi :D*

Używam Lazarus-a

 

Zamiast tego w jakieś linijce

procedure TForm1.Button1Click(Sender: TObject);
begin

end;

 

Na to:

 

procedure TForm1.Button1Click(Sender: TObject);
var
Tibia: Cardinal;
begin
Tibia := FindWindow('TibiaClient',nil);
SetWindowText(Tibia,PChar('Tibia <<Mój Bot>>'));
end;

 

Z góry dziękuję!!

 

*Tekst napisany specjalnie zresztą widać po nicku, zamiast fervi to fęrvi

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

to ja tu nie widzę jako takich błędów oprócz tego że zamiast cardinal powinno być HWND i to pchar jest zupełnie nie potrzebne jeżeli nie przypisujesz zmiennych...

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Zrobiłem to co podałeś (zamieniłem Cordinal czy coś takiego na HWND) i mam takie problemy

 

http://img103.imageshack.us/my.php?image=pomoczt5.png

 

@INFO

Lekko przyciąłem ;d

 

Tutaj jakiś dostęp do pamięci

 

(...)

var

Form1: TForm1;

 

const

BATTLELIST_START = $005F7994;

BATTLELIST_END = $005FD460;

PLAYER_X = $00602B08;

PLAYER_Y = $00602B04;

PLAYER_Z = $00602B00;

PLAYER_LEVEL = $005F7920;

PLAYER_EXP = $00605A04; // zmieniony - Tibia 7.9

STATUS_TEXT = $0074F1D0;

STATUS_TIMER = $0074F1CC;

SPEED_USE = $0074DBD0;

 

implementation

(...)

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

ale co te twoje adresy mają do rzeczy skoro ty ich tam i tak nie używasz ? ;/ a unity dodałeś?... znasz się w ogóle na programowaniu czy zainstalowałeś lazerusa bo zobaczyłeś poradnik yaboo jak napisać bota dla noobów ?

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Nie zajmuje się pascalem ;d

 

Zobaczyłem poradnik, więc chciałem spróbować, zobaczyć itp.

 

Zresztą napisałem, że zobaczyłem poradnik ;d

 

ODŚWIEŻAM TEMAT!

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Jeśli chcesz dodać odpowiedź, zaloguj się lub zarejestruj nowe konto

Tylko zarejestrowani użytkownicy mogą komentować zawartość tej strony.

Zarejestruj nowe konto

Załóż nowe konto. To bardzo proste!

Zarejestruj się

Zaloguj się

Posiadasz już konto? Zaloguj się tutaj.

Zaloguj się tutaj

  • Przeglądający   0 użytkowników

    Brak zarejestrowanych użytkowników, przeglądających tę stronę.

×