Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Pytanie] Bot

Sebastiano14

Rekomendowane odpowiedzi

Sebastiano14 Pasjonat

Sebastiano14

Opublikowano
Pasjonat

Sebastiano14

Opublikowano

Witam, napisałem aimbot'a do pewnej gry lecz mi nie działa:/

oto kod

HotKeySet("{F6}","_Exit")

While 1 
$Variable = PixelSearch(726,463,696,413,0xBF2603)
If IsArray($Variable) = True Then
	MouseMove($Variable [0], $Variable [1], 1)
	MouseClick("left")
EndIf
WEnd
While 1 
$Variable = PixelSearch(726,463,696,413,0x3CBF03)
If IsArray($Variable) = True Then
	MouseMove($Variable [0], $Variable [1], 1)
	MouseClick("left")
EndIf
WEnd
While 1 
$Variable = PixelSearch(726,463,696,413,0x8503BF)
If IsArray($Variable) = True Then
	MouseMove($Variable [0], $Variable [1], 1)
	MouseClick("left")
EndIf
WEnd
While 1 
$Variable = PixelSearch(726,463,696,413,0xD50000)
If IsArray($Variable) = True Then
	MouseMove($Variable [0], $Variable [1], 1)
	MouseClick("left")
EndIf
WEnd
While 1 
$Variable = PixelSearch(726,463,696,413,0xEB0000)
If IsArray($Variable) = True Then
	MouseMove($Variable [0], $Variable [1], 1)
	MouseClick("left")
EndIf
WEnd
Func _Exit()
Exit
EndFunc

Napisałem by klikał w takie tarcze lecz wogóle nie klika i mysz się nie rusza tam gdzie musi, a wogóle błędy nie wyskakują.

Co trzeba zrobic aby to działało?

Ponad 80 includów by me :D
Fli_PL Znawca

Fli_PL

Opublikowano
Znawca

Fli_PL

Opublikowano

Po pierwsze ExitLoop, bo będzie ci wykonywało pierwszą pętlę w nieskończoność... a po drugie to nie wiem.

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól...

RobeM Arcymistrz

RobeM

Opublikowano
Arcymistrz

RobeM

Opublikowano

zacząć się uczyć a nie przepisywać

poucz sie o funkcjach i zmiennych

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

RobeM Arcymistrz

RobeM

Opublikowano
Arcymistrz

RobeM

Opublikowano

to sobie przeanalizuj działanie aimbota i na tej podstawie zrób jedną funkcje a nie kilka z których działać będzie tylko i tak jedna , pierwsza

 

wszystki zmienne przypisane do jednej a ja widze kilka możliwych

 

MouseMove i MouseClick to to samo co tylko zrobić MouseClick

 

skąd wytrzasnołeś podstawe do skopiowania skryptu ?

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

Fli_PL Znawca

Fli_PL

Opublikowano
Znawca

Fli_PL

Opublikowano

Trzeba kliknąć na niego lewym przyciskiem myszki :P

@Edit: Heh, już miałem napisać, że ktoś popełnił taki sam błąd jak ty, ale to te same skrypty...

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól...

Sebastiano14 Pasjonat

Sebastiano14

Opublikowano
Pasjonat

Sebastiano14

  • Autor
Opublikowano

Jeśli grał ktoś jedną z gier użytkowników mojamafia.pl i była strzelnica to można się skapnąc o co mi chodzi. Wejdzcie na:

MojaMafia

i dajcie jakąś dobrą grę z rankingu po lewej stronie.

Przykład:

MafiaWorld

tam na strzelnicy będą latały takie tarcze trzeba w nie trafiac :P

Ogarniecie ;]

Jeśli już to zobaczycie to prosiłbym właśnie o pomoc co do tego i żadnego kodu nie kopiowałem.

Ponad 80 includów by me :D
Fli_PL Znawca

Fli_PL

Opublikowano
Znawca

Fli_PL

Opublikowano

Wątpię, żeby ktoś dla ciebie wchodził na jakieś strony Mafii.

Jesli nie kopiowałeś to albo założyłeś temat na tamtym forum albo cud ^^

 


While 1
;tu ci szuka
If $result = 1 Then
    MouseClick("", $x, $y)
    ExitLoop
EndIf
WEnd

While 2 ...
;itd.

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól...

lokuxd Weteran

lokuxd

Opublikowano
Weteran

lokuxd

Opublikowano

Weź to wsadź wszystko w jedna pętle pozmieniaj nazwy zmiennych i będzie szukało wszystkich obrazków po kolei po co robić milion pętli skoro jedna wystarczy??

Do
$wiek+=1
Until ŻycieGetMsg() = -3

zbieram +

Fli_PL Znawca

Fli_PL

Opublikowano
Znawca

Fli_PL

Opublikowano

Własnie, w jednej pętli włóż wyszukiwanie wszystkich pixelów po kolei...

 

While 1
    $result1 = PixelGetColor(uzupelniasz)
    If $result1 = 1 Then MouseClick(uzupelniasz)
    $result2 = PixelGetColor(uzupelniasz)
    If $result2 = 1 Then MouseClick(uzupełniasz)
    (...)i tak dalej (...)
WEnd

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól...

Sebastiano14 Pasjonat

Sebastiano14

Opublikowano
Pasjonat

Sebastiano14

  • Autor
Opublikowano

O ok dzięki o tylko to i już będzie porządnie działac? :P

Sprawdzam to ;)

 

 

Edit:

C:\Documents and Settings\THC\Pulpit\Nowy AutoIt v3 Script (7).au3 (7) : ==> Incorrect number of parameters in function call.:

$result1 = PixelGetColor(0xBF2603)

$result1 = ^ ERROR

 

Wyskakuje błąd:/

Ponad 80 includów by me :D
Fli_PL Znawca

Fli_PL

Opublikowano
Znawca

Fli_PL

Opublikowano

No nie wiem, nie próbowałem w SciTe, okaże się przy {F5}.

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól...

Ktosiu Znawca

Ktosiu

Opublikowano
Znawca

Ktosiu

Opublikowano

ma szukac koloru w obszarze czyli get ( POBIERAĆ ) sie nie nada i jak było PixelSearch ma byc

 

 

While 1

Sleep(1000)

$Variable1 = PixelSearch(111, 111, 222, 222, 0xAAAAAA)
If Not @error Then
	MouseClick("left", $Variable1[0], $Variable1[1])
Else
	$Variable2 = PixelSearch(111, 111, 222, 222, 0xBBBBBB)
	If Not @error Then
		MouseClick("left", $Variable2[0], $Variable2[1])
	Else
		$Variable3 = PixelSearch(111, 111, 222, 222, 0xCCCCCC)
		If Not @error Then
			MouseClick("left", $Variable3[0], $Variable3[1])
		Else
			$Variable4 = PixelSearch(111, 111, 222, 222, 0xDDDDDD)
			If Not @error Then
				MouseClick("left", $Variable4[0], $Variable4[1])
			EndIf
		EndIf
	EndIf
EndIf

WEnd

Mózg to nie mydło; nie ubędzie Ci go, gdy go użyjesz.

Maciek134 Bywalec

Maciek134

Opublikowano
Bywalec

Maciek134

Opublikowano
Jeszcze widziałem inne ale nie chce mi się szukac.

Więc jeśli już chcesz napisac posta to pomóż smile.gif

W tym momencie mnie wkurwiłeś, sry ale skoro Tobie się nie chce to czemu nam ma się chcieć?

 

C:\Documents and Settings\THC\Pulpit\Nowy AutoIt v3 Script (7).au3 (7) :  ==> Incorrect number of parameters in function call.:
$result1 = PixelGetColor(0xBF2603)
$result1 = ^ ERROR

Syntax error kaleko, Incorrect number of parameters in function call.: -> Za mało parametrów podałeś, poducz się angielskiego zanim zaczniesz programować.

 

        $Variable1 = PixelSearch(111, 111, 222, 222, 0xAAAAAA)
       If Not @error Then
               MouseClick("left", $Variable1[0], $Variable1[1])
       Else
               $Variable2 = PixelSearch(111, 111, 222, 222, 0xBBBBBB)
               If Not @error Then
                       MouseClick("left", $Variable2[0], $Variable2[1])
               Else
                       $Variable3 = PixelSearch(111, 111, 222, 222, 0xCCCCCC)
                       If Not @error Then
                               MouseClick("left", $Variable3[0], $Variable3[1])
                       Else
                               $Variable4 = PixelSearch(111, 111, 222, 222, 0xDDDDDD)
                               If Not @error Then
                                       MouseClick("left", $Variable4[0], $Variable4[1])
                               EndIf
                       EndIf
               EndIf
       EndIf

Ten kod co podałeś pod względem składni i użycia funkcji wygląda OK, może złe kolory albo zły obszar przeszukiwania wybrałeś?

[TUT] Full Autoit V3 Tutorial

yo po 1 nie kayloger tylko bot który zapamiętuje hasła -_-

stop1.png

RobeM Arcymistrz

RobeM

Opublikowano
Arcymistrz

RobeM

Opublikowano

sprawdziłem siostrzeńca , nawet mu wyszło bazgranie

wyszukuje 1 jak nie znajdzie 2 , potem 3 i 4 i od nowa . jak znajdzie wykona polecenie i wraca na koniec skryptu i od nowa

 

w deburgerze sprawuje się idealnie i działa

 

kordy, kolory czy więcej kolorów dodać można samemu już chyba bez problemu

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

Maciek134 Bywalec

Maciek134

Opublikowano
Bywalec

Maciek134

Opublikowano 

Dim $arr[4] = [0xAAAAAA, 0xBBBBBB, 0xCCCCCC, 0xDDDDDD]

For $i = 0 To UBound($arr)
   $Temp = PixelSearch(111, 111, 222, 222, $arr[$i])
   If Not @error Then
   	MouseClick("left", $Temp[0], $Temp[1])
   EndIf
Next

 

Zoptymalizowany, powinien szybciej działać / zużywać mniej zasobów. No i dodawanie / usuwanie kolorów łatwiejsze ;p

[TUT] Full Autoit V3 Tutorial

yo po 1 nie kayloger tylko bot który zapamiętuje hasła -_-

stop1.png

lokuxd Weteran

lokuxd

Opublikowano
Weteran

lokuxd

Opublikowano

po co tyle kombinacji??? przecież już dostał kod o ktory mu chodziło (to co miał wsadzone w jednego while'a) i tyle ktosiu mu dał nawet ładnie ułozżonhy

Do
$wiek+=1
Until ŻycieGetMsg() = -3

zbieram +

RobeM Arcymistrz

RobeM

Opublikowano
Arcymistrz

RobeM

Opublikowano

jak ktoś umie użyć Tidy to zawsze będzie miał ładnie ułożony, czytelny i poprawione drobne błędy i braki w skrypcie/składni

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

lokuxd Weteran

lokuxd

Opublikowano
Weteran

lokuxd

Opublikowano

nie chodziło mi o układ graficzny tylko już ma kod ułożony w sensie logicznym

 

if cos =1 then

;cos

else

if cos2=1 then

else itd...

 

endif

Do
$wiek+=1
Until ŻycieGetMsg() = -3

zbieram +

Sebastiano14 Pasjonat

Sebastiano14

Opublikowano
Pasjonat

Sebastiano14

  • Autor
Opublikowano

Już działa :P

While 1
   $Variable1 = PixelSearch(461, 448, 959, 747, 0xBF2603)
       If Not @error Then
               MouseClick("left", $Variable1[0], $Variable1[1])
       Else
               $Variable2 = PixelSearch(461, 448, 959, 747, 0x3CBF03)
               If Not @error Then
                       MouseClick("left", $Variable2[0], $Variable2[1])
               Else
                       $Variable3 = PixelSearch(461, 448, 959, 747, 0x8503BF)
                       If Not @error Then
                               MouseClick("left", $Variable3[0], $Variable3[1])
                       Else
                               $Variable4 = PixelSearch(461, 448, 959, 747, 0xD50000)
                               If Not @error Then
                                       MouseClick("left", $Variable4[0], $Variable4[1])
							Else
									$Variable5 = PixelSearch(461, 448, 959, 747, 0xEB0000)
									If Not @error Then
										MouseClick("left", $Variable5[0], $Variable5[1])
									Else

									EndIf
                               EndIf
                       EndIf
               EndIf
	EndIf
WEnd

Tylko jeden problem :/

Za wolno kursor się rusza i bardzo często pudłuje :P

Ponad 80 includów by me :D

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

Tematy
×
×
  • Dodaj nową pozycję...