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

Bot Pijaczek v2.1.1


KURPIQ

Rekomendowane odpowiedzi

  • Odpowiedzi 366
  • Dodano
  • Ostatniej odpowiedzi
Opublikowano

każda jedna.

( ͡° ͜ʖ ͡°) 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

Opublikowano

trzeba dobrze go ustawić trochę samemu pokobinować optymalne ułożenie 99% problemów jest przez złe ustawienie f7 (nie patrz koniecznie na rysunek) albo f6 (musi być centralnie na środku paska)

reszta nie ma większego znaczenia.

 

po nocy:

287mln na koncie

63 i 3/4 lvl.

( ͡° ͜ʖ ͡°) 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

Opublikowano

@KURPIQ Jestem zielony z autoit, moglbys powiedziec, lub dopisac w tucie co i jak trzeba zrobic z tym autoitem? Bylbym wdzieczny :)

 

Lub moze by ktos zrobi mini filmik na YT :)

 

dalem bota do exe ale jak zaznaczyc te f5/6/7 itp ?

 

 

@EDIT Juz poradzilem sobie sam :) wszystko pieknie dziala dzieki leci like :)

 

 

Mozna zminimalizowac okno lub robic cos innego? na innes stronie?

 

Rybka sie strasznie rwie, kazda teraz jak to zmienic ?

 

 

@KRUPIQ Dobra ale ryba mi sie strasznie rwie jak to naprawic?

Opublikowano

Pobierz full instalke (google) instujesz wlaczasz script editor wklejasz kod zapisujesz uruchamiasz zapisane i gotowe

( ͡° ͜ʖ ͡°) 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

Opublikowano

Brak edycji w telefonie.

Nie mozna nic robic w trakcie

( ͡° ͜ʖ ͡°) 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

Opublikowano

Pisz pod moimi postami nie edytuj.

Rwie czyli zrywa ? Jak tak to kombinuj z f7 tak by bylo optymalnie .

jak bd w domu to zrobie nowe foto

( ͡° ͜ʖ ͡°) 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

Opublikowano

kombinuj z pozycjami patrz do góry na 1 post na obrazek (zmienilem)

( ͡° ͜ʖ ͡°) 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

Opublikowano

Dzieki wielkie teraz smiga idealnie :D i nawet rekordy lowi :D

 

Ale mam kolejny problem

 

http://imageshack.us/f/407/22222ea.jpg/

 

Jak to naprawic? moze przez przypadek w skrypcie czegos nie skopiowalem?

Opublikowano

f4 ustaw w przeglądarce na odświeżaniu .

( ͡° ͜ʖ ͡°) 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

Opublikowano

Dziala jak nalezy :) dziekiza czitka ^^ jestes PRO xD

 

 

Jest jakas mozliwosc zmiany kasy? dodanie sobie?^^ Czy cheat engine daje tylko wizualna zmiane ktore w systemie nic nie daje? :D

 

Czy da sie odblokowac jakos poziomy wetek? spinningow? hehe :D jak czitowac to na calego xD

 

A i w ile wbiles 64 lvl ? :D

Opublikowano

Niestety ale cheat engine daje tylko i wyłącznie złudzenie, odświeżysz stronę i jest jak poprzednio :) Każdy by miał co by chciał więc no trochę bez sensu byłaby ta gra :) Odblokować niestety ale wędek się się nie da. Musisz wbijać poziom :D

Kocham mpcforum.pl!!!

18706.png

Opublikowano

od założenia 1 posta o bocie w wersji 2.1 to jest : 30.09.2012 (grałem ciągle na bocie praktycznie noc i dzień + dodałem opcje brania bonusów (dostępnych w przynętach np. +20% mocniejsza wędka itp... które wcześniej trzeba kopić) wersja testowa oto ona :

 

 

OPCJE TE CO WCZEŚNIEJ +

4 OKNO W KTÓRYM PISZEMY 0 LUB 1 (0 - NIE BIERZE BONUSÓW 1- BIERZE) JAK DAMY 0 NIE TRZEBA USTAWIAC F3.

F3 - RAZ U GÓRY PO PRAWEJ W OKIENKO Z GWIAZDKAMI A NASTĘPNIE ZNOWU F3 NA UŻYJ (RZECZY KTÓRĄ CHCEMY) - UWAGA UŻYWAĆ BĘDZIE AŻ SKOŃCZY SIĘ WSZYSTKO CO MAMY (JUTRO ZROBIĘ TO INACZEJ TZN. BY PATRZAL NA PIXEL NA OBRAZKU BOOSTA).

 

Global $mp ,$gar, $dp, $var ,$ap ,$sp ,$sar, $x, $y, $aaaa, $bsad, $cp, $car, $bp
HotKeySet("{F3}", "coorde")
HotKeySet("{F4}", "coord")
HotKeySet("{F5}", "coord4")
HotKeySet("{F7}", "coord2")
HotKeySet("{F6}", "coord3")
HotKeySet("{F8}", "start")
HotKeySet("{F9}", "End")
$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")
$aaaa= 1
$bsad= InputBox("Program", "zrobić (1) czy nie (0) branie dopalaczy ", "0")
;;;; Body of program would go here ;;;;
While 2
Sleep(1000)
WEnd
Func start()
adlibregister("zmien1", $ass*60000)
while 1
if $P1 then
vest()
else
rese()
$P1=true
endif
wend
EndFunc
Func rese()
MouseClick ( "left" , $ap[0], $ap[1],1,1 )
Sleep($grass*1000)
 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
Send("{ESC}")
Sleep(500)
 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
Sleep(500)
Send("{ESC}")
	 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
 Sleep(500)
 Send("{ESC}")
	 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
 Sleep(500)
 Send("{ESC}")
 $aaaa=1
		 cap()
	 EndFunc
func zmien1()
$P1=false
endfunc
;;;;;;;;
Func cap()
If $bsad=2 Then
MouseClick ( "left" , $mp[0], $mp[1],1,1 )
	 Sleep(500)
	 Send("{ESC}")
	 MouseClick("left", $bp[0],$bp[1],1,1)
	 Sleep(500)
	 $assda = PixelSearch($cp[0] - 10 , $cp[1] - 10 , $cp[0] + 10 , $cp[1] + 10, $car)
								 If Not @error Then
		 MouseClick("left",$cp[0],$cp[1],1,1)
		 Sleep(500)
	 Else
		 Send("{ESC}")
		 Sleep(500)
		 $bsad=0
	 EndIf
	 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
	 Sleep(500)
	 Send("{ESC}")
	 Sleep(500)
	 Send("{ESC}")
	 Sleep(500)
	 Send("{ESC}")
	 Sleep(500)
	 EndIf
	 EndFunc
Func coorde()
If $bsad=2 Then
$cp = MouseGetPos()
$car = PixelGetColor($cp[0], $cp[1])
TrayTip("ok 2", 2, 1)
EndIf
If $bsad=1 Then
$bp = MouseGetPos()
$bsad=2
TrayTip("ok 1", 2, 1)
EndIf
EndFunc
Func coord()
Sleep(200)
		 $ap = MouseGetPos()
		 Sleep(200)
						 TrayTip("ok", 2, 1)
 EndFunc
Func coord4()
Sleep(200)
		 $sp = MouseGetPos()
		 $sar = PixelGetColor($sp[0], $sp[1])
		 Sleep(200)
						 TrayTip("ok", 2, 1)
 EndFunc
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 vest()
If $aaaa=1 Then
zarzut()
Else
work()
EndIf
EndFunc
Func Work()
						 $marmolada = PixelSearch($dp[0] - 100 , $dp[1] - 100 , $dp[0] + 100 , $dp[1] + 100, 0x46b434)
								 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
										 Send("{esc}")
	 Sleep(1000)
													 Send("{esc}")
	 Sleep(1000)
													 Send("{esc}")
	 Sleep(1000)
	 $aaaa=1
	 Else
	 $aaaa=0
								 EndIf
	 EndFunc
Func zarzut()
$abadar = PixelSearch($sp[0] - 30 , $sp[1] - 30 , $sp[0] + 30 , $sp[1] + 30 , $sar)
If Not @error Then
Send("{SPACE}")
$aaaa=0
Sleep(1000)
EndIf
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

Opublikowano

tak jest to możliwe ja osobiście kupiłem wszystkie pojazdy (tak wszystkie) na wyprzedaży -70% z okazji błędu z zakupem $ który organizował twórca gry.

 

DODAŁEM OPCJE "WYBORU BONUSU" INSTRUKCJA:

WSZYSTKO JAK WCZEŚNIEJ TYLE ŻE

F3(1) - OKIENKO Z GWIAZDKAMI (GÓRA PRAWO)

F3(2) - OBRAZEK BONUSU (DOKŁADNIE W MIEJSCU GDZIE MA BYĆ)

F3(3) - NA PRZYCISKU POD BONUSEM

 

NIETESTOWANY CZY DZIAŁA WIĘC MOŻE BYĆ BŁĄD ALE NIE MUSI :)

 

 

Global $mp ,$gar, $dp, $var ,$ap ,$sp ,$sar, $x, $y, $aaaa, $bsad, $cp, $car, $bp, $sape
HotKeySet("{F3}", "coorde")
HotKeySet("{F4}", "coord")
HotKeySet("{F5}", "coord4")
HotKeySet("{F7}", "coord2")
HotKeySet("{F6}", "coord3")
HotKeySet("{F8}", "start")
HotKeySet("{F9}", "End")
$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")
$aaaa= 1
$bsad= InputBox("Program", "zrobić (1) czy nie (0) branie dopalaczy ", "0")
;;;; Body of program would go here ;;;;
While 2
Sleep(1000)
WEnd
Func start()
adlibregister("zmien1", $ass*60000)
while 1
if $P1 then
vest()
else
rese()
$P1=true
endif
wend
EndFunc
Func rese()
MouseClick ( "left" , $ap[0], $ap[1],1,1 )
Sleep($grass*1000)
 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
Send("{ESC}")
Sleep(500)
 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
Sleep(500)
Send("{ESC}")
	 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
 Sleep(500)
 Send("{ESC}")
	 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
 Sleep(500)
 Send("{ESC}")
 $aaaa=1
		 cap()
	 EndFunc
func zmien1()
$P1=false
endfunc
;;;;;;;;
Func cap()
If $bsad=3 Then
MouseClick ( "left" , $mp[0], $mp[1],1,1 )
	 Sleep(500)
	 Send("{ESC}")
	 MouseClick("left", $bp[0],$bp[1],1,1)
	 Sleep(500)
	 $assda = PixelSearch($cp[0] - 10 , $cp[1] - 10 , $cp[0] + 10 , $cp[1] + 10, $car)
								 If Not @error Then
		 MouseClick("left",$sape[0],$sape[1],1,1)
		 Sleep(500)
	 Else
		 Send("{ESC}")
		 Sleep(500)
		 $bsad=0
	 EndIf
	 MouseClick ( "left" , $mp[0], $mp[1],1,1 )
	 Sleep(500)
	 Send("{ESC}")
	 Sleep(500)
	 Send("{ESC}")
	 Sleep(500)
	 Send("{ESC}")
	 Sleep(500)
	 EndIf
	 EndFunc
Func coorde()
If $bsad=2 Then
$cp = MouseGetPos()
$car = PixelGetColor($cp[0], $cp[1])
$bsad=3
TrayTip("ok 2", 2, 1)
EndIf
If $bsad=1 Then
$bp = MouseGetPos()
$bsad=2
TrayTip("ok 1", 2, 1)
EndIf
If $bsad=3 Then
$sape = MouseGetPos()
TrayTip("ok 3", 2, 1)
EndIf
EndFunc
Func coord()
Sleep(200)
		 $ap = MouseGetPos()
		 Sleep(200)
						 TrayTip("ok", 2, 1)
 EndFunc
Func coord4()
Sleep(200)
		 $sp = MouseGetPos()
		 $sar = PixelGetColor($sp[0], $sp[1])
		 Sleep(200)
						 TrayTip("ok", 2, 1)
 EndFunc
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 vest()
If $aaaa=1 Then
zarzut()
Else
work()
EndIf
EndFunc
Func Work()
						 $marmolada = PixelSearch($dp[0] - 100 , $dp[1] - 100 , $dp[0] + 100 , $dp[1] + 100, 0x46b434)
								 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
										 Send("{esc}")
	 Sleep(1000)
													 Send("{esc}")
	 Sleep(1000)
													 Send("{esc}")
	 Sleep(1000)
	 $aaaa=1
	 Else
	 $aaaa=0
								 EndIf
	 EndFunc
Func zarzut()
$abadar = PixelSearch($sp[0] - 30 , $sp[1] - 30 , $sp[0] + 30 , $sp[1] + 30 , $sar)
If Not @error Then
Send("{SPACE}")
$aaaa=0
Sleep(1000)
EndIf
EndFunc
Func End()
 Exit 0
EndFunc

 

 

poprawiona 1 linijka od wrzucenia !!!!

( ͡° ͜ʖ ͡°) 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

Opublikowano

wpisz na fb let's fish

wlsanie zakupilem najlepszy sprzęt za kase z gry (do170kg)

oraz jakies 125 gwiazdek na expa

:))

( ͡° ͜ʖ ͡°) 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

Opublikowano

1.Sciagasz autoit v3

2.Instalujesz

3.Otwierasz "SciTE Script Editor.exe"

4.Kopiujesz kod ktory jest na 1 stronie

5.Zapisujesz to na pulpicie pod nazwa np "bot do nk/fb"

6.klikasz na to 2 razy i otwiera ci sie bot

 

^^

Opublikowano

prawdopodobnie dzialajacy kod z bonusami :

 

Global $mp ,$gar, $dp, $var ,$ap ,$sp ,$sar, $x, $y, $aaaa, $bsad, $cp, $car, $bp, $sape
HotKeySet("{F3}", "coorde")
HotKeySet("{F4}", "coord")
HotKeySet("{F5}", "coord4")
HotKeySet("{F7}", "coord2")
HotKeySet("{F6}", "coord3")
HotKeySet("{F8}", "start")
HotKeySet("{F9}", "End")
$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")
$aaaa= 1
$bsad= InputBox("Program", "zrobić (1) czy nie (0) branie dopalaczy ", "0")
;;;; Body of program would go here ;;;;
While 2
  Sleep(1000)
  WEnd
Func start()
  adlibregister("zmien1", $ass*60000)
   while 1
   if $P1 then
   vest()
   else
   rese()
   $P1=true
   endif
wend
EndFunc
   Func rese()
   MouseClick ( "left" , $ap[0], $ap[1],1,1 )
 Sleep($grass*1000)
       MouseClick ( "left" , $mp[0], $mp[1],1,1  )
       Send("{ESC}")
       Sleep(500)
               MouseClick ( "left" , $mp[0], $mp[1],1,1  )
               Sleep(500)
               Send("{ESC}")
                       MouseClick ( "left" , $mp[0], $mp[1],1,1  )
                       Sleep(500)
                       Send("{ESC}")
                               MouseClick ( "left" , $mp[0], $mp[1],1,1  )
                               Sleep(500)
                               Send("{ESC}")
                               $aaaa=1
                                       cap()
                                       EndFunc
   func zmien1()
   $P1=false
   endfunc
;;;;;;;;
Func cap()
  If $bsad=3 Then
     MouseClick ( "left" , $mp[0], $mp[1],1,1  )
                                       Sleep(500)
                                       Send("{ESC}")
                                       MouseClick("left", $bp[0],$bp[1],1,1)
                                       Sleep(4000)
                                       $assda = PixelSearch($cp[0] - 10 , $cp[1] - 10 , $cp[0] + 10 , $cp[1] + 10, $car)
								    If Not @error Then
                                          MouseClick("left",$sape[0],$sape[1],1,1)
                                          Sleep(1000)
                                       Else
                                          Send("{ESC}")
                                          Sleep(500)
                                          $bsad=0
                                       EndIf
                                       MouseClick ( "left" , $mp[0], $mp[1],1,1 )
                                       Sleep(500)
                                       Send("{ESC}")
                                       Sleep(500)
                                       Send("{ESC}")
                                       Sleep(500)
                                       Send("{ESC}")
                                       Sleep(500)
                                    EndIf
                                    EndFunc
Func coorde()
If $bsad=3 Then
   $sape = MouseGetPos()
   TrayTip("ok 3", 2, 1)
   EndIf
If $bsad=2 Then
  $cp = MouseGetPos()
  $car = PixelGetColor($cp[0], $cp[1])
  $bsad=3
  TrayTip("ok 2", 2, 1)
  EndIf
If $bsad=1 Then
$bp = MouseGetPos()
$bsad=2
TrayTip("ok 1", 2, 1)
EndIf
EndFunc
Func coord()
Sleep(200)
		    $ap = MouseGetPos()
		    Sleep(200)
						   TrayTip("ok", 2, 1)
                           EndFunc
Func coord4()
Sleep(200)
		    $sp = MouseGetPos()
		    $sar = PixelGetColor($sp[0], $sp[1])
		    Sleep(200)
						   TrayTip("ok", 2, 1)
                           EndFunc
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 vest()
If $aaaa=1 Then
  zarzut()
Else
  work()
EndIf
EndFunc
Func Work()
						    $marmolada = PixelSearch($dp[0] - 100 , $dp[1] - 100 , $dp[0] + 100 , $dp[1] + 100, 0x46b434)
								    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
										    Send("{esc}")
                                               Sleep(1000)
                                               											    Send("{esc}")
                                               Sleep(1000)
                                               											    Send("{esc}")
                                               Sleep(1000)
                                               $aaaa=1
                                            Else
                                               $aaaa=0
								    EndIf
                                    EndFunc
Func zarzut()
  $abadar = PixelSearch($sp[0] - 30 , $sp[1] - 30 , $sp[0] + 30 , $sp[1] + 30 , $sar)
  If Not @error Then
     Send("{SPACE}")
     $aaaa=0
     Sleep(1000)
     EndIf
     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

Zarchiwizowany

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

×
×
  • Dodaj nową pozycję...