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

Rekomendowane odpowiedzi

Opublikowano

Witam mam taki problem ponieważ chce stworzyc bota i narazie sie uczę , niewiem jak zrobić żeby wpisać login i hasło na początku i żeby bot potem wpisał sam

A 2 sprawa żeby bot działał zminimalizowany

SOURCE:

#include <ButtonConstants.au3>

#include <EditConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

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

$Form1 = GUICreate("FTBocik v1.0", 608, 426, 192, 124)

$Button1 = GUICtrlCreateButton("WlaczBota v1.0", 216, 224, 161, 41, $WS_GROUP)

$NazwaUzytkownika = GUICtrlCreateInput("NazwaUzytkownika", 184, 80, 273, 21)

$Haslo = GUICtrlCreateInput("Haslo", 184, 104, 273, 21)

$Pic1 = GUICtrlCreatePic("C:\Users\Komputerek\Desktop\FT\stadion.jpg", 0, 0, 625, 441, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))

GUISetState(@SW_SHOW)

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Case $Button1

MsgBox(0, "FTBocik v1.0", "FTBocik Gooo...")

#include <GUIConstants.au3>

#Include <IE.au3>

GUICreate("FTBocik v1.0",1280,960)

GUISetBkColor(0xAED57F)

GUISetState(@SW_SHOW)

$Edit=GUICtrlCreateInput("www.footballteam.pl",20,20,1000,20)

$Text=GUICtrlCreateLabel("By TheAdio @ 2010",600,1,100,20)

$Vai=GUICtrlCreateButton("Przejdz",1050,10,150,50)

$oIE = ObjCreate("Shell.Explorer.2")

GUICtrlCreateObj($oIE, 10, 90,1178, 800)

$Linknavigazione=GUICtrlRead($Edit)

_IENavigate($oIE,($Linknavigazione))

GUICtrlSetData($Edit,$Linknavigazione)

$login = "XXX"

$haslo = XXX"

MouseMove(1092,60)

MouseClick(1)

Send("{enter}")

Sleep(1000)

MouseMove(852,396)

MouseClick("")

Send($login)

Sleep(1000)

MouseMove(848,424)

MouseClick("")

Send($haslo)

MouseMove(1012,428)

MouseClick("")

Sleep(1500)

While 1

$msg=GUIGetMsg()

Switch $msg

Case $Vai

$Linknavigazione=GUICtrlRead($Edit)

_IENavigate($oIE,($Linknavigazione))

GUICtrlSetData($Edit,$Linknavigazione)

Case $GUI_EVENT_CLOSE

Exit

EndSwitch

WEnd

exit

EndSwitch

WEnd

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

 

To nie jest cały bot tylko zkrócony tylko chce sie dowiedzieć jak to zrobić

^^^

Nagroda:limit ++++

ronaldosygna.jpg

Sygna by me

Opublikowano

If, End i Exit to nie funkcje tylko słowa kluczowe.

 

Manderigon:

Ini* nie ma tutaj nic do rzeczy.

 

@Topic:

Podpierdoliłeś komuś kod (lub użyłeś czyjś kod zupełnie bezmyślnie) i rządasz, żebyśmy my teraz przerabiali.

Zapomnij.

Idź się uczyć. Niedługo matura.

Test szóstoklasisty...?

Ta sygnatura jest pusta.

Opublikowano

Dobra dzięki wszystkim za pomoc ++ już all wiem niedługo zaprezentuje bota może

@UP

Uczę się, niechciałem na tacy,chciałem żeby ktoś mi wytłumaczył bo nie znalazłem tematu ,ale są jeszcze wyrozumiali ludzie którzy pomogli mi zrobić to!!!

I jeszcze Up jak chcesz dam cały kod ale wtedy wszyscy bedą mogli se zgapić bez wysiłku ale jak chcesz wyśle ci na PW jak nie wierzysz

ronaldosygna.jpg

Sygna by me

Opublikowano

od razu ci powiem, jak dalej zamierzasz zrobic tego bota by działał na zminimalizowanym to sobie odpuśc bo akcje myszką i udf do nich nie masz tak wysoko opanowanych by działały

zresztą nie znam nikogo kto by się tym pochwalił na tym forum że mu działa

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

Opublikowano

Poza tym taki bocik już jest, o 3 nieba lepszy.

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
...

×
×
  • Dodaj nową pozycję...