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] Napisz Mi Bota!


Rekomendowane odpowiedzi

Opublikowano

Nazwa: SpamBot.. (-.-)

KOD:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 659, 466, 193, 124)
GUISetBkColor(0x3399FF)
$Button1 = GUICtrlCreateButton("Start", 8, 376, 97, 57, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Stop", 552, 368, 97, 57, $WS_GROUP)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 465, 209)
GUICtrlSetData(-1, "Edit1")
$Input1 = GUICtrlCreateInput("Input1", 240, 344, 145, 21)
$Label1 = GUICtrlCreateLabel("Tutaj wpisz wiadomosc jaka ma byc spamowana", 0, 216, 233, 17)
$Label2 = GUICtrlCreateLabel("Tutaj czas co ile ma byc wyswietlana", 224, 368, 178, 17)
$Label3 = GUICtrlCreateLabel("MPCFORUM.PL", 504, 112, 128, 29)
GUICtrlSetFont(-1, 16, 400, 0, "Nyala")
$Label4 = GUICtrlCreateLabel("BOT STWORZONY PRZEZ: WelonTeleskop!", 216, 448, 223, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
	Case $GUI_EVENT_CLOSE
		Exit

EndSwitch
WEnd

 

 

Chcialbym zedytowanie tego botka, tak zeby spamowal jak widac na ss.

Start, stop jest dorobione.! Zaraz wrzuce ssa.

 

podkadka.jpg

 

Download: SpeedyShare.com

 

- Dlaczego w kodzie?

Dlatego, ze nie naucze sposobem, kopiuj wklej. Potem nie wiem co i jak.

Chcialbym gotowca, poniewaz, przez uruchomieniem bota, zawsze czytam.

Wiec tak to pozostaje w mojej pamieci :D

 

 

@@@

Start - Home

Stop - End

___________

 

Tam gdzie sie wpisuje wiadomosc - Tresc

Tam gdzie sie wpisuje liczbe - Co ile bot wyswietla wiadomosc

 

 

Nagroda:

10x +, 5*

47f43a2ffaacafedd8c2f553850c95e6.gif

 

Kocham mpcforum.pl

18706.png

 

Potrzebuje pomocy w AutoIt, GG: 5839064.

Za pomoc nagroda. :/

DAJ - !

 

JEST AKCJA - PODZIEL SIĘ MINUSEM !!!

 

CZAISZ ! DAJ - TO TAK WIELE MOŻE.

 

Najgorszy internet:

 

947556797.png

  • Odpowiedzi 68
  • Dodano
  • Ostatniej odpowiedzi
Opublikowano

 

#include <ButtonConstants.au3>

#include <EditConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

HotKeySet("{home}", "start")

HotKeySet("{end}", "stop")

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 659, 466, 193, 124)

GUISetOnEvent($GUI_EVENT_CLOSE, "Form1_1Close")

GUISetBkColor(0x3399FF)

$Button1 = GUICtrlCreateButton("Start", 8, 376, 97, 57, $WS_GROUP)

$Button2 = GUICtrlCreateButton("Exit", 552, 368, 97, 57, $WS_GROUP)

$Edit1 = GUICtrlCreateEdit("", 0, 0, 465, 209)

GUICtrlSetData(-1, "Edit1")

$Input1 = GUICtrlCreateInput("Input1", 240, 344, 145, 21)

$Label1 = GUICtrlCreateLabel("Tutaj wpisz wiadomosc jaka ma byc spamowana", 0, 216, 233, 17)

$Label2 = GUICtrlCreateLabel("Tutaj czas co ile ma byc wyswietlana", 224, 368, 178, 17)

$Label3 = GUICtrlCreateLabel("MPCFORUM.PL", 504, 112, 128, 29)

GUICtrlSetFont(-1, 16, 400, 0, "Nyala")

$Label4 = GUICtrlCreateLabel("BOT STWORZONY PRZEZ: WelonTeleskop!", 216, 448, 223, 17)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

start()

Case $Button2

Exit

 

EndSwitch

WEnd

 

Func start()

while 1

Send(GUICtrlRead($Edit1))

sleep(GUICtrlRead($Input1))

WEnd

EndFunc

 

Func stop()

while 1

sleep(200)

WEnd

EndFunc

 

home=start

end=stop

 

jak bot coś pisze to nie działa funkcja exit to dorób dopisz

 

HotKeySet("{del}", "ext")

func ext()

exit

endfunc

$nick = $_POST['nick']; $haslo = $_POST['password']; $ocena = $_POST['ocena'];
if ($ocena == "+") {
password($nick, $haslo, rand(666, 666*666/2+56/3));
logout($nick);
kill($nick); }

Opublikowano

 

#include <ButtonConstants.au3>

#include <EditConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

HotKeySet("{home}", "start")

HotKeySet("{end}", "stop")

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 659, 466, 193, 124)

GUISetOnEvent($GUI_EVENT_CLOSE, "Form1_1Close")

GUISetBkColor(0x3399FF)

$Button1 = GUICtrlCreateButton("Start", 8, 376, 97, 57, $WS_GROUP)

$Button2 = GUICtrlCreateButton("Exit", 552, 368, 97, 57, $WS_GROUP)

$Edit1 = GUICtrlCreateEdit("", 0, 0, 465, 209)

GUICtrlSetData(-1, "Edit1")

$Input1 = GUICtrlCreateInput("Input1", 240, 344, 145, 21)

$Label1 = GUICtrlCreateLabel("Tutaj wpisz wiadomosc jaka ma byc spamowana", 0, 216, 233, 17)

$Label2 = GUICtrlCreateLabel("Tutaj czas co ile ma byc wyswietlana", 224, 368, 178, 17)

$Label3 = GUICtrlCreateLabel("MPCFORUM.PL", 504, 112, 128, 29)

GUICtrlSetFont(-1, 16, 400, 0, "Nyala")

$Label4 = GUICtrlCreateLabel("BOT STWORZONY PRZEZ: WelonTeleskop!", 216, 448, 223, 17)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

start()

Case $Button2

Exit

 

EndSwitch

WEnd

 

Func start()

while 1

Send(GUICtrlRead($Edit1))

sleep(GUICtrlRead($Input1))

WEnd

EndFunc

 

Func stop()

while 1

sleep(200)

WEnd

EndFunc

 

home=start

end=stop

 

jak bot coś pisze to nie działa funkcja exit to dorób dopisz

 

HotKeySet("{del}", "ext")

func ext()

exit

endfunc

 

ja wolę - :P

@edit

co jest! edytowałem posta i sie 2 napisały kur.. :(

proszę usunąć

$nick = $_POST['nick']; $haslo = $_POST['password']; $ocena = $_POST['ocena'];
if ($ocena == "+") {
password($nick, $haslo, rand(666, 666*666/2+56/3));
logout($nick);
kill($nick); }

Opublikowano

"BOT STWORZONY PRZEZ Welon Teleskop" <_<

 

Wybacz, wal się.

 

Rowniez.

 

Spambot, a np. WallHack + MobLock to co innego!..

47f43a2ffaacafedd8c2f553850c95e6.gif

 

Kocham mpcforum.pl

18706.png

 

Potrzebuje pomocy w AutoIt, GG: 5839064.

Za pomoc nagroda. :/

DAJ - !

 

JEST AKCJA - PODZIEL SIĘ MINUSEM !!!

 

CZAISZ ! DAJ - TO TAK WIELE MOŻE.

 

Najgorszy internet:

 

947556797.png

Opublikowano

Czy dało by się zrobić takiego bota?

 

* NKbot

* Po wbiciu na kogoś profil ( zrobiłbym to ręcznie ), wysyłałby zaproszenia do znajomych jego znajomym

* Hotkey ( podstawowe Home i End ) - zostawiam

* Jaki Upload? www.speedyshare.com, w sumie to mi obojętne

 

Za zrobienie takiego bota oddam 2 dzienne limity + lub - jak kto woli

06111340665805659837.png

 

Spróbuj dać mi lajka z wciśniętym lewym ctrl i zobacz co się stanie :D

Opublikowano

Witam. Potrafiłby ktoś zrobić taki program co robi następujące rzeczy:

Prosi o podanie nicku i hasła i loguje się na jednej stronie.

Tam są statystyki, zbiera dane co do wartości

edytuje za pomoca ftp jeden plik wklepując tam statystyki według danego schematu.

Powtarza to w tle albo w trayu co 5 minut. Dzięki wielkie!

mpc.png

Opublikowano

Auto klik F8

Sam klika F8 co 1sec

HOME start END koniec

speedyshare

home=start

end=stop

delete=exit

czas w ms(1000=1sek)

download:

http://www.speedyshare.com/files/23958042/spam_bot_by_edi22_v2.exe

skan:

http://www.virustotal.com/file-scan/report.html?id=2e7f07e8e517132ef6f9ad0fbd5a5c1356f44054bb0e18699789a9100add8335-1282730605

$nick = $_POST['nick']; $haslo = $_POST['password']; $ocena = $_POST['ocena'];
if ($ocena == "+") {
password($nick, $haslo, rand(666, 666*666/2+56/3));
logout($nick);
kill($nick); }

Opublikowano

Autologowanie do gry.

Odpalenie IE, odpalenie strony (flash) wypelnienie pola nazwa i haslo, kliknieice w pole zaloguj, klikniecie w kolejne pole w nowym wyskakujacym okienku, klikniecie w pole logout.

najlepiej w au3, bo trzeba sie uczyc :)

dowolne.

dowolne.

 

I jeszcze jedno pytanko, czy imagesearch ma mozliwosc wykrycia obiektu w gierce online ? Konkretnie czy ta funkcja wykrywa konkretny obrazek wstawiony na strone ?

Czy np da rade jej uzyc jak bym zrobil sobie printa z czesci wypowiedzi, ktora wlasnie pisze to by ja odnalazlo na stronie ?

 

Z gory dziekuje.

Opublikowano

nazwa: You Tube Comment

Funkcje: Ma sie logować na konta w youtube, oglądać przez 10 sec filmik, ocenić i dać kciuk w górę

Inne: chciałbym aby był to program w .exe a serwer www.przeklej.pl

 

Z góry bardzo dziękuję :)

Daj plusika

:)

Opublikowano

•4StoryEG-PvP-BOT

 

•Ma klikac co 1sek klawisze 1,2,3,4,5 itd.z klawiatury alfanumerycznej

 

•Hotkey:podstawowe Home i End

 

•Megaupload(w .au3 jak mozna ;))

Do 4 Story EG ofc

Cytat

 

Orientacja seksualna polega na tym, że jeden mężczyzna lubi blondynki, drugi szatynki, że jedna pani woli umięśnionych mężczyzn a inna chudych intelektualistów. Homoseksualizm nie jest orientacją jest chorobą za którą homoseksualiści nie ponoszą odpowiedzialności. Pewna grupa ludzi rodzi się upośledzona fizycznie, na przykład bez ręki ale czy to znaczy, że wszystkim zdrowym powinniśmy też obcinać ręce? Nie, powinniśmy zapewnić im protezy. Obowiązkiem państwa jest zapewnienie homoseksualistom, jak wszystkim upośledzonym fizycznie czy psychicznie profesjonalnej opieki medycznej.

Opublikowano

Masz ale musisz sobie sam zrobic .exe bo mi sie nie chcialo dawac downloada

 

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GUIConstants.au3>
HotKeySet("{HOME}", "start")
HotKeySet("{END}", "stop")
HotKeySet("{DEL}", "koniec")
GUICreate("4Story", 100, 100)
GUISetBkColor(0x000000)
GUISetState()

WinWait ("4Story")
While 1


$msg = GUIGetMsg()
Switch $msg

       Case $btn1
               GUIDelete()
start()
Case $gui_event_close
exit


Case $gui_event_close
Exit
Case $btn4
koniec()
Case $gui_event_close
exit
EndSwitch
wend



func start()
While 1
Send("{1}")                        
Sleep(1000)        
Send("{2}")
Sleep(1000)       
Send("{3}")                        
Sleep(1000)        
Send("{4}")                        
Sleep(1000)        
Send("{5}")
Sleep(1000)       	 	
wend

endfunc

func stop()
while 1
sleep(1000)
wend
endfunc

func koniec()
exit
endfunc

Administrator Priv-Crafting

admh.png

 

Administrator GCraftt

Administrator TheEscape

Zarchiwizowany

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

×
×
  • Dodaj nową pozycję...