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

Gone Fishing wyławiacz :)

kamol1123

Przez kamol1123
w Via WWW

Rekomendowane odpowiedzi

kamol1123 Pomocnik

kamol1123

Opublikowano
Pomocnik

kamol1123

Opublikowano

Chciałbym przedstawić wam bota który umożliwi wyciągnięcie za nas ryby. Wystarczy go włączyć, włączyć grę i zarzucać i zacinać oraz zamykać okna po złowieniu itp. Mam nadzieję że się przyda :) Oto kod:

 

 

Global $mp ,$gar, $dp, $var ,$ap

Global $Paused

HotKeySet ("{F3}","TogglePaused")

HotKeySet("{F5}", "quit")

 

 

while 1

PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, 10908675,5,3)

If Not @error Then

Send("{space down}")

EndIf

PixelSearch(0, 0, @DesktopWidth, @DesktopHeight,12575241,3,2)

If Not @error Then

Send("{space up}")

EndIf

wend

 

Func TogglePaused()

$Paused = Not $Paused

While $Paused

Sleep(100)

TrayTip("Script is Paused", "Nacisnij ponownie F3 aby odpazowac", 1)

WEnd

TrayTip("Pauza wyłączona ", "Gra wznowiona",1)

EndFunc

Func quit()

Exit

EndFunc

Kocham mpcforum.pl!!!

18706.png

rebel9191 Nowicjusz

rebel9191

Opublikowano
Nowicjusz

rebel9191

Opublikowano

zaraz stestuje ,dzieki za fatyge

 

niestety cos nie dziala: sam zarzuca i ciagnie ..........w razie brania ciagnie az zerwie.............cos jest poprzestawiane w kodzie chyba-poprawisz?

 

kolejne testy i nowe wnioski-jak ustawilem okno wyzej to juz nie zrzuca sam ale nie puszcza spacji po dojsciu do okreslonego dalej trzyma spacje w dole i ryba sie zrywa

 

 

chyba koordy na ekranie sie nie pokrywaja z moimi bo jak rusze lekko w dol to znow warjuje a jak w gore to ciagnie bez konca........mozna te koorde recznie ustawiac?

kamol1123 Pomocnik

kamol1123

Opublikowano
Pomocnik

kamol1123

  • Autor
Opublikowano

Tutaj masz kod do szukania cordow, kolorow, polozenia myszki itd. :)

 

 

#include <GUIconstants.au3>

#include <WindowsConstants.au3>

#include <EditConstants.au3>

#include <StaticConstants.au3>

#include<Misc.au3>

#NoTrayIcon

 

Opt("WinTitleMatchMode", 4)

Opt("WinWaitDelay", 0)

Opt("GUIonEventMode",1)

 

;~ Global $SRCCOPY = 0x00CC0020

Global $leave = 0

Global $Paused=0

$MouseModifier = 1

$PressedTime = 1

 

HotKeySet("{PAUSE}", "TogglePause")

HotKeySet("{INS}", "_copyHEX")

 

Tooltip("AU3MAG", 0, 0,"","",4)

$MyhWnd = WinGetHandle("classname=tooltips_class32")

 

GUICreate("Pixel Color", 180, 410,0, 0, -1, $WS_EX_TOPMOST)

GUISetOnEvent($GUI_EVENT_CLOSE,"_exit")

 

GUICtrlCreateGroup(" Pozycja myszy ", 10, 10, 160, 50)

GUICtrlCreateLabel("X:", 25, 33, 15, 15)

$MousePosX=GUICtrlCreateInput("", 40, 30, 40, 20, $ES_READONLY)

GUICtrlCreateLabel("Y:", 90, 33, 15, 15)

$MousePosY=GUICtrlCreateInput("", 105, 30, 40, 20, $ES_READONLY)

 

GUICtrlCreateGroup(" Kod koloru ", 10, 70, 160, 110)

GUICtrlCreateLabel("Dziesiętny:", 25, 93, 50, 15)

$PixelColor=GUICtrlCreateInput("", 80, 90, 70, 20, $ES_READONLY)

GUICtrlCreateLabel("Hex:", 25, 123, 50, 15)

$hexColor=GUICtrlCreateInput("", 80, 120, 70, 20,$ES_READONLY)

GUICtrlCreateLabel("Kolor:", 25, 153, 50, 15)

$MostrarColor=GUICtrlCreateLabel("", 80, 150, 70, 20,$ES_READONLY)

 

GUICtrlCreateGroup(" Opcje specjalne ", 10, 190, 160, 145)

$RB_Full = GUICtrlCreateRadio("Pełny Ekran", 25, 210, 100, 20)

GUICtrlSetState(-1, $GUI_CHECKED)

$RB_Window = GUICtrlCreateRadio("Aktywne Okno", 25, 230, 100, 20)

$Mag= GUICtrlCreateCheckbox("Powiększenie", 25, 250, 100, 20)

$Solid= GUICtrlCreateRadio("Celownik prosty", 35, 270, 100, 20)

$Inver= GUICtrlCreateRadio("Celownik negatyw", 35, 290, 120, 20)

$KeyBMouse= GUICtrlCreateCheckbox("Sterowanie klawiaturą", 25, 310, 140, 20)

 

$Ayuda=GUICtrlCreateButton("Pomoc",10,345,77)

GUICtrlSetOnEvent(-1,"Ayuda")

$Saltar=GUICtrlCreateButton("Wpisz pozycję",92,345,77)

GUICtrlSetOnEvent(-1,"Saltar")

 

GUICtrlCreateLabel("PAUSE: Zablokuj/Odblokuj program", 0, 380 ,180,15,$SS_CENTER)

GUICtrlSetColor(-1,0x00808080)

GUICtrlCreateLabel("INS: Kopiuj kod hex do schowka", 0, 395 ,180,15,$SS_CENTER)

GUICtrlSetColor(-1,0x00808080)

 

 

GUISetState()

data()

 

Func data()

 

While 1

Sleep(50)

Opt("WinTitleMatchMode",4)

If (_IsPressed(25) + _IsPressed(26) + _IsPressed(27) + _IsPressed(28)) = 0 Then

_ResetSpeed()

EndIf

$msg=GUIGetMsg()

Select

Case $msg=$GUI_EVENT_CLOSE

Exit

EndSelect

 

If GUICtrlRead($KeyBMouse)=$GUI_CHECKED Then

MouseKeyb()

Else

MouseKeybNO()

EndIf

 

If GUICtrlRead($Mag)=$GUI_CHECKED Then

GUICtrlSetState($RB_Window,$GUI_DISABLE)

GUICtrlSetState($Solid,$GUI_ENABLE)

GUICtrlSetState($Inver,$GUI_ENABLE)

GUICtrlSetState($RB_Full,$GUI_CHECKED)

WinSetState($MyhWnd,"",@SW_SHOW)

MAG()

 

Else

GUICtrlSetState($Solid,$GUI_DISABLE+$GUI_UNCHECKED)

GUICtrlSetState($Inver,$GUI_DISABLE+$GUI_UNCHECKED)

GUICtrlSetState($RB_Window,$GUI_ENABLE)

WinSetState($MyhWnd,"",@SW_HIDE)

EndIf

If GUICtrlRead($RB_Full) = $GUI_CHECKED Then

Opt("MouseCoordMode", 1)

Opt("PixelCoordMode", 1)

$pos=MouseGetPos()

$color=PixelGetColor($pos[0],$pos[1])

GUICtrlSetData($MousePosX, $pos[0])

GUICtrlSetData($MousePosY, $pos[1])

GUICtrlSetData($PixelColor,$color)

$HEX6=StringRight(Hex($color),6)

GUICtrlSetData($hexColor,"0x"&$HEX6)

GUICtrlSetBkColor($MostrarColor,"0x"&Hex($color))

Else

Opt("MouseCoordMode", 0)

Opt("PixelCoordMode", 0)

Opt("WinTitleMatchMode",1)

$win = WinGetPos("")

$pos=MouseGetPos()

If $pos[0] >= 0 And $pos[0] <= $win[2] and $pos[1] >= 0 And $pos[1] <= $win[3] Then

$color=PixelGetColor($pos[0],$pos[1])

GUICtrlSetData($MousePosX, $pos[0])

GUICtrlSetData($MousePosY, $pos[1])

GUICtrlSetData($PixelColor,$color)

$HEX6=StringRight(Hex($color),6)

GUICtrlSetData($hexColor,"0x"&$HEX6)

GUICtrlSetBkColor($MostrarColor,"0x"&Hex($color))

Else

GUICtrlSetData($MousePosX, "----")

GUICtrlSetData($MousePosY, "----")

GUICtrlSetData($PixelColor,"")

GUICtrlSetData($hexColor,"")

EndIf

EndIf

WEnd

EndFunc

 

Func TogglePause()

$Paused = NOT $Paused

While $Paused

sleep(10)

$msg=GUIGetMsg()

Select

Case $msg=$GUI_EVENT_CLOSE

Exit

EndSelect

WEnd

EndFunc

 

Func MAG()

$MyHDC = DLLCall("user32.dll","int","GetDC","hwnd",$MyhWnd)

If @error Then Return

$DeskHDC = DLLCall("user32.dll","int","GetDC","hwnd",0)

If Not @error Then

$xy = MouseGetPos()

If Not @error Then

$l = $xy[0]-10

$t = $xy[1]-10

DLLCall("gdi32.dll","int","StretchBlt","int",$MyHDC[0],"int",0,"int",0,"int",100,"int",100,"int",$DeskHDC[0],"int",$l,"int",$t,"int",20,"int",20,"long",$SRCCOPY)

If $xy[0]<(@DesktopWidth-120) then

$XArea= $xy[0] + 20

Else

$XArea= $xy[0] - 120

EndIf

If $xy[1]<(@DesktopHeight-120) then

$YArea= $xy[1] + 20

Else

$YArea= $xy[1] - 120

EndIf

WinMove($myhwnd, "",$XArea,$YArea , 100, 100)

If GUICtrlRead($Solid)=$GUI_CHECKED Then

CrossHairsSOLID($MyHDC[0])

EndIf

If GUICtrlRead($Inver)=$GUI_CHECKED Then

CrossHairsINV($MyHDC[0])

EndIf

EndIf

DLLCall("user32.dll","int","ReleaseDC","int",$DeskHDC[0],"hwnd",0)

EndIf

DLLCall("user32.dll","int","ReleaseDC","int",$MyHDC[0],"hwnd",$MyhWnd)

EndFunc

 

Func Ayuda()

MsgBox(0,"Pomoc","*Użyj przybliżenia dla większej precyzji." & @CRLF & "" & @CRLF & "*Użyj opcji 'Steruj klawiaturą' dla większej precyzji." & @CRLF & " -Trzymanie wciśniętych klawiszy strzałek zwiększa prędkość przemieszczania się kursora." & @CRLF & " -Shift+'klawisz strzałki' zwiększa szybkość przemieszczania się kursora." & @CRLF & "" & @CRLF & "*Użyj opcji 'Wpisz pozycję' aby przenieść kursor na odpowiedni piksel." & @CRLF & @CR&"*Wciśnij klawisz PAUSE aby zablokować lub odblokować program." & @CRLF & "" & @CRLF &"*Wciśinij klawisz INSERT aby skopiowac kod HEX do schowka.")

EndFunc

 

Func Saltar()

Do

$SaltarCord=InputBox("Wpisz pozycję","Wpisz pozycję piksela, do którego chcesz przenieść kursor."&@CRLF&"Przykład: 123,420",MouseGetPos(0)&","&MouseGetPos(1),"",150,150)

$CoordsM=StringSplit($SaltarCord,",")

Until @error OR ($CoordsM[1]<=@DesktopWidth AND $CoordsM[2]<=@DesktopHeight)

if not @error Then

BlockInput(1)

MouseMove($CoordsM[1],$CoordsM[2])

BlockInput(0)

EndIf

EndFunc

 

Func MouseKeyb()

 

HotKeySet("+{UP}", "_UpArrow")

HotKeySet("{UP}", "_UpArrow")

HotKeySet("+{DOWN}", "_DownArrow")

HotKeySet("{DOWN}", "_DownArrow")

HotKeySet("+{LEFT}", "_LeftArrow")

HotKeySet("{LEFT}", "_LeftArrow")

HotKeySet("+{RIGHT}", "_RightArrow")

HotKeySet("{RIGHT}", "_RightArrow")

EndFunc

 

Func MouseKeybNO()

HotKeySet("+{UP}")

HotKeySet("{UP}")

HotKeySet("+{DOWN}")

HotKeySet("{DOWN}")

HotKeySet("+{LEFT}")

HotKeySet("+{LEFT}")

HotKeySet("{LEFT}")

HotKeySet("+{RIGHT}")

HotKeySet("{RIGHT}")

EndFunc

 

Func nada()

EndFunc

 

Func _copyHEX()

ClipPut(Guictrlread($hexColor))

EndFunc;==>_ShowInfo

 

Func _UpArrow()

Local $MousePos = MouseGetPos()

If _IsPressed(10) Then

$i = 10

Else

$i = 1

EndIf

 

If $MousePos[1] > 0 Then

_BoostMouseSpeed()

MouseMove($MousePos[0], $MousePos[1] - ($MouseModifier * $i), 1)

EndIf

EndFunc;==>_UpArrow

 

Func _DownArrow()

If _IsPressed(10) Then

$i = 10

Else

$i = 1

EndIf

 

Local $MousePos = MouseGetPos()

If $MousePos[1] < @DesktopHeight Then

_BoostMouseSpeed()

MouseMove($MousePos[0], $MousePos[1] + ($MouseModifier * $i),1)

EndIf

EndFunc;==>_DownArrow

 

Func _LeftArrow()

If _IsPressed(10) Then

$i = 10

Else

$i = 1

EndIf

 

Local $MousePos = MouseGetPos()

If $MousePos[0] > 0 Then

_BoostMouseSpeed()

MouseMove($MousePos[0] - ($MouseModifier * $i), $MousePos[1],1)

EndIf

EndFunc;==>_LeftArrow

 

Func _RightArrow()

If _IsPressed(10) Then

$i = 10

Else

$i = 1

EndIf

 

Local $MousePos = MouseGetPos()

If $MousePos[0] < @DesktopWidth Then

_BoostMouseSpeed()

MouseMove($MousePos[0] + ($MouseModifier * $i), $MousePos[1],1)

EndIf

EndFunc;==>_RightArrow

 

Func _BoostMouseSpeed()

If IsInt($PressedTime / 10) Then

$MouseModifier = $MouseModifier + 1

$PressedTime = $PressedTime + 1

Else

$PressedTime = $PressedTime + 1

EndIf

EndFunc

 

Func _ResetSpeed()

$MouseModifier = 1

$PressedTime = 1

EndFunc;==>_ResetSpeed

 

Func CrossHairsSOLID(ByRef $hdc)

Local $hPen, $hPenOld

$hPen = DllCall("gdi32.dll","hwnd","CreatePen","int",0,"int",5,"int",0x555555)

$hPenOld = DllCall("gdi32.dll","hwnd","SelectObject","int",$hdc,"hwnd",$hPen[0])

DLLCall("gdi32.dll","int","MoveToEx","int",$hdc,"int",52,"int",0,"ptr",0)

DLLCall("gdi32.dll","int","LineTo","int",$hdc,"int",52,"int",46)

DLLCall("gdi32.dll","int","MoveToEx","int",$hdc,"int",52,"int",58,"ptr",0)

DLLCall("gdi32.dll","int","LineTo","int",$hdc,"int",52,"int",100)

DLLCall("gdi32.dll","int","MoveToEx","int",$hdc,"int",0,"int",52,"ptr",0)

DLLCall("gdi32.dll","int","LineTo","int",$hdc,"int",46,"int",52)

DLLCall("gdi32.dll","int","MoveToEx","int",$hdc,"int",58,"int",52,"ptr",0)

DLLCall("gdi32.dll","int","LineTo","int",$hdc,"int",100,"int",52)

DllCall("gdi32.dll","hwnd","SelectObject","int",$hdc,"hwnd",$hPenOld[0])

DllCall("gdi32.dll","int","DeleteObject","hwnd",$hPen[0])

EndFunc

 

Func CrossHairsINV(ByRef $hdc)

;~ Local CONST $NOTSRCCOPY = 0x3300087

DLLCall("gdi32.dll","int","BitBlt","int",$hdc,"int",50,"int",0,"int",5,"int",49,"int",$hdc,"int",50,"int",0,"int",$NOTSRCCOPY)

DLLCall("gdi32.dll","int","BitBlt","int",$hdc,"int",50,"int",56,"int",5,"int",49,"int",$hdc,"int",50,"int",56,"int",$NOTSRCCOPY)

DLLCall("gdi32.dll","int","BitBlt","int",$hdc,"int",0,"int",50,"int",49,"int",5,"int",$hdc,"int",0,"int",50,"int",$NOTSRCCOPY)

DLLCall("gdi32.dll","int","BitBlt","int",$hdc,"int",56,"int",50,"int",44,"int",5,"int",$hdc,"int",56,"int",50,"int",$NOTSRCCOPY)

EndFunc

 

Func _exit()

Exit

EndFunc

Kocham mpcforum.pl!!!

18706.png

rebel9191 Nowicjusz

rebel9191

Opublikowano
Nowicjusz

rebel9191

Opublikowano

dzieki pobawie sie :D

dobra dobra mam coordy ale one sa krotsze niz te w kodzie i sa tylko 2 a w kodzie sa 3 jak to ugryzc i gdzie wstawic ? bo po dziesiatkach prob bocik lowi ale musze manewrowac oberazem w gore i w dol zeby dzialalo cos niecos.

KURPIQ Pasjonat

KURPIQ

Opublikowano
Pasjonat

KURPIQ

Opublikowano

Do testu f6 na kolorowym pasku

f7 gdzieś na tle (statycznym nie ruchomym) - pauza wlacza sie automatycznie jak wyskoczy okienko

f8 start

f5 wylaczenie

f3 pauza

po złowieniu ryby musisz dac pauze inaczej będzize ciagnal wędkę po zarzuceniu i vice versa

szkoda trochę że pasek jest stale umieszczony

 

mała instrukcja

f7 na statycznym tle

f6 na kolorowym pasku

f8 jak mamy oba zaznaczone

i teraz jak wyskoczy okno sama wlacza sie pauza

następne łowienie odbywa się tak:

zarzucasz

czekasz az zlapie

wciskasz spację a następnie f3

Global $gar, $dp, $mp, $var, $paused
HotKeySet("{F6}", "coord3")
HotKeySet("{F7}", "coord2")
HotKeySet("{F8}", "work")
HotKeySet("{F5}", "End")
HotKeySet("{F3}","TogglePaused")
$P1=true
MsgBox(4096, "By kurpiq", "Bot wykonany w 100% przezemnie, jeśli pobrałeś to z innego miejsca niż mpcforum to znaczy że osoba umieszczająca to bez mojej zgody jest złodziejem. zastrzegam sobię prawa do tego bota //KURPIQ", 5)
$czas = InputBox("Program", "Czas trzymania spacji w górze: ", "5")
$grass = InputBox("Program", "Czas czekania po odświerzeniu (w sek) ", "20")
$ass = InputBox("Program", "Czas co jaki ma nastąpić reset (w min): ", "10")
;;;; Body of program would go here ;;;;
While 2
Sleep(1000)
WEnd
;;;;;;;;
Func coord2()
Sleep(200)
						 $mp = MouseGetPos()
						 $var = PixelGetColor($mp[0], $mp[1])
						 Sleep(200)
													 TrayTip("ok", 2, 1)
												 EndFunc
Func coord3()
	 Sleep(200)
					 $dp = MouseGetPos()
					 $gar = PixelGetColor($dp[0], $dp[1])
Sleep(200)
													 TrayTip("ok", 2, 1)
	 EndFunc
Func Work()
While 1
													 $marmolada = PixelSearch($dp[0] - 50 , $dp[1] - 50 , $dp[0] + 50 , $dp[1] + 50 , $gar)
																	 If Not @error Then
																					 Send("{SPACE up}")
																					 Sleep($czas)
			 Else
			 Send("{SPACE down}")
			 EndIf
$seed = PixelSearch($mp[0] - 50 , $mp[1] - 50 , $mp[0] + 50 , $mp[1] + 50 , $var)
																		 If $seed = 0 Then
TogglePaused()
EndIf
			 WEnd
			 EndFunc
Func TogglePaused()
$Paused = Not $Paused
While $Paused
	 Sleep(100)
	 TrayTip("Script is Paused", "Nacisnij ponownie F3 aby odpazowac", 1)
WEnd
TrayTip("Pauza wyłączona ", "Gra wznowiona",1)
EndFunc
Func End()
	 Exit 0
EndFunc

( ͡° ͜ʖ ͡°) bitches

Over the last 3 years, you've spent 2547.3 hours playing this selection, which includes 384 items, is valued at $4724.12, and requires 1506.9 GB

kamol1123 Pomocnik

kamol1123

Opublikowano
Pomocnik

kamol1123

  • Autor
Opublikowano

Przetestowałem go i daje radę, jednak trochę bez sensu że jak wyłowi, nic dalej nie robi i dlatego postanowiłem go przerobić + close okienek i działa idealnie na spining :) Zaraz założę temat...

Kocham mpcforum.pl!!!

18706.png

KURPIQ Pasjonat

KURPIQ

Opublikowano
Pasjonat

KURPIQ

Opublikowano

jego głównym założeniem jest tylko wyciąganie ryb nic więcej...

( ͡° ͜ʖ ͡°) bitches

Over the last 3 years, you've spent 2547.3 hours playing this selection, which includes 384 items, is valued at $4724.12, and requires 1506.9 GB

KURPIQ Pasjonat

KURPIQ

Opublikowano
Pasjonat

KURPIQ

Opublikowano

sam w głównym temacie napisałeś ze tak on działa ja zrobiłem go po prostu w najłatwiejszy sposob

( ͡° ͜ʖ ͡°) bitches

Over the last 3 years, you've spent 2547.3 hours playing this selection, which includes 384 items, is valued at $4724.12, and requires 1506.9 GB

rebel9191 Nowicjusz

rebel9191

Opublikowano
Nowicjusz

rebel9191

Opublikowano

kurde czegos nie lapie.....po odpaleniu bocika lowie mam zaciecie i jak pasek skacze to musze F3 wdusic zeby wyciagnol rybe sam ? To sem ne da pane havranek -jak pociagnie duza sztuka to nie mam czasu na reakcje -czyli wciskania 2 klawiszy -myslalem ze po pojawieniu sie paska sam przejmie wyciaganie i jak wyciagnie to sie spauzuje. Ide na testy........

KURPIQ Pasjonat

KURPIQ

Opublikowano
Pasjonat

KURPIQ

Opublikowano

po zarzucie (nie musi brac ryba)

( ͡° ͜ʖ ͡°) bitches

Over the last 3 years, you've spent 2547.3 hours playing this selection, which includes 384 items, is valued at $4724.12, and requires 1506.9 GB

rebel9191 Nowicjusz

rebel9191

Opublikowano
Nowicjusz

rebel9191

Opublikowano

po testach kilkugodzinnych:wniosek

instrukcja jest nieco pokrecona ale kwestia przyzwyczajenia sie odpalamy bota klikamy w tlo i F7 potem zarzucamy czekamy na branie jak wezmie to kolorowy pasek F6 .Odpalamy F8 i lowimy jak wezmie ryba to trzeba zaciac spacja lub myszka i wcisnac F3 zeby automat ciagnol .......tak to ma wygladac?

dostrajalem pasek ,szybkosc spacji i najwiekszy okaz bez dopingu 278 kg -wieksze niestety sie wyrywaja z paska -nie wiem co mozna poprawic ale i tak dzieki za to dzielo znacznie ulatwia zabawe :D

KURPIQ Pasjonat

KURPIQ

Opublikowano
Pasjonat

KURPIQ

Opublikowano

myślę że jak ryba bierze to f3 a nie spacje f3 i będzie gites

( ͡° ͜ʖ ͡°) bitches

Over the last 3 years, you've spent 2547.3 hours playing this selection, which includes 384 items, is valued at $4724.12, and requires 1506.9 GB

rebel9191 Nowicjusz

rebel9191

Opublikowano
Nowicjusz

rebel9191

Opublikowano

tak sobie pomyslalem moznaby zwiekszyc ilosc "klikow" w spacje na sekunde? jak zaczynam mysza klikac to jade pospiesznym jak przelacze na bota to zwalnia wiec moze zwiekszenie czestotliwosci przyniosloby pozadany efekt ?

KURPIQ Pasjonat

KURPIQ

Opublikowano
Pasjonat

KURPIQ

Opublikowano

jak użyjesz mojego bota to jest wszystko ok :))

( ͡° ͜ʖ ͡°) bitches

Over the last 3 years, you've spent 2547.3 hours playing this selection, which includes 384 items, is valued at $4724.12, and requires 1506.9 GB

kamol1123 Pomocnik

kamol1123

Opublikowano
Pomocnik

kamol1123

  • Autor
Opublikowano

Coś takiego zrobiłeś ?

 

while 1

sleep (1)

PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, 10908675)

If Not @error Then

Send("{space down}")

EndIf

PixelSearch(0, 0, @DesktopWidth, @DesktopHeight,12575241)

If Not @error Then

Send("{space up}")

EndIf

wend

Kocham mpcforum.pl!!!

18706.png

rebel9191 Nowicjusz

rebel9191

Opublikowano
Nowicjusz

rebel9191

Opublikowano

poczekaj az stestuje na ciezszych wodach :D

 

ok juz widze feler----punkty na pasku sa tak ustawione ze przy braniu wyrywa sie za skale trzeba je przesunac na srodek i bedzie ok a wyciaga dynamicznie :D

Zarchiwizowany

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

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