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

Edycja prostego kodu

ArtekXDPL

Rekomendowane odpowiedzi

ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

Opublikowano

Posiadam oto taki prosty kodzik. Proszę o dodanie do niego następującej funkcji:

W miejscu [send("transferXXXX")] znaki [XXXX] są zastępowane liczbami z zakresu (1-9). Liczby generowane są losowo.

HotKeySet("{F1}",          "Start")
HotKeySet("{ESC}",      "Wyjscie")

Func Start()
Send("transferXXXX")
EndFunc

Func Wyjscie()
Exit
EndFunc

While 1
Sleep(1000)
WEnd
wojtek19992 Pasjonat

wojtek19992

Opublikowano
Pasjonat

wojtek19992

Opublikowano

Myślę, iż pod funkcją start wystarczy wpisać
Send(random(1,9,1));

lub

Send(random(1,9));
lub coś takiego, nie znam funkcji random, ale jeżeli ktoś wyżej podał prawidłowo, to powinno tak działać

ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

  • Autor
Opublikowano

Rozbudowałem troszkę skrypt. Udało mi się zrobić, aby w drugim [send] w miejscu [XXXX] generowały się takie same liczby co w pierwszym [send].

Jednak dodałem jeszczę funkcję - "Poczta" i chciałbym, aby w tamten [send] wpisywał taki sam [send] który został wygenerowany w pierwszym [send] w funkcji "Start".

 

Cały kod:

HotKeySet("{F1}",          "Start")
HotKeySet("{F2}",          "Poczta")
HotKeySet("{ESC}",         "Wyjscie")

Func Start()
MouseClick("left", 1090, 480)
Sleep(2000)
Send("{PGDN}")

$var = random(1000,9999,1)
MouseClick("left", 390, 270)
Send("transfer" & $var)

MouseClick("left", 650, 270)
Send("transfer" & $var & "@teleworm.us")

MouseClick("left", 400, 320)
Send("artek123")

MouseClick("left",  680, 320)
Send("artek123")

FileWrite("Stworzone konta.txt", "Login:  transfer" & $var)
FileWrite("Stworzone konta.txt", @CRLF)
FileWrite("Stworzone konta.txt", "E-mail: transfer" & $var & "@teleworm.us")
FileWrite("Stworzone konta.txt", @CRLF)
FileWrite("Stworzone konta.txt", "Hasło:  artek123")
FileWrite("Stworzone konta.txt", @CRLF)
FileWrite("Stworzone konta.txt", @CRLF)

EndFunc

Func Poczta()
Send("^t")
Send("www.fakemailgenerator.com")
Send("{ENTER}")
Sleep(2000)

MouseClick("left",  520, 270)
Send("^a")
Send("{BACKSPACE}")

$var = random(1000,9999,1)
Send("transfer" & $var)
Send("{ENTER}")

EndFunc

Func Wyjscie()
Exit
EndFunc

While 1
Sleep(1000)
WEnd
MistrzMaster Specjalista

MistrzMaster

Opublikowano
Specjalista

MistrzMaster

Opublikowano

Najprościej zrobić zmienną globalną:

Global $var = 0
HotKeySet("{F1}",          "Start")
HotKeySet("{F2}",          "Poczta")
HotKeySet("{ESC}",       "Wyjscie")

Func Start()
MouseClick("left", 1090, 480)
Sleep(2000)
Send("{PGDN}")

$var = random(1000,9999,1)
MouseClick("left", 390, 270)
Send("transfer" & $var)

MouseClick("left", 650, 270)
Send("transfer" & $var & "@teleworm.us")

MouseClick("left", 400, 320)
Send("artek123")

MouseClick("left",  680, 320)
Send("artek123")

FileWrite("Stworzone konta.txt", "Login:  transfer" & $var)
FileWrite("Stworzone konta.txt", @CRLF)
FileWrite("Stworzone konta.txt", "E-mail: transfer" & $var & "@teleworm.us")
FileWrite("Stworzone konta.txt", @CRLF)
FileWrite("Stworzone konta.txt", "Hasło:  artek123")
FileWrite("Stworzone konta.txt", @CRLF)
FileWrite("Stworzone konta.txt", @CRLF)

EndFunc

Func Poczta()
Send("^t")
Send("www.fakemailgenerator.com")
Send("{ENTER}")
Sleep(2000)

MouseClick("left",  520, 270)
Send("^a")
Send("{BACKSPACE}")

Send("transfer" & $var)
Send("{ENTER}")

EndFunc

Func Wyjscie()
Exit
EndFunc

While 1
Sleep(1000)
WEnd

Bot do gry NosTale:


[bOT] NosBota 1.3v

ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

  • Autor
Opublikowano

Bardzo dziękuje, dzięki twojej wypowiedzi uzyskałem taki efekt jaki chciałem.

 

Poniżej przedstawiam taki oto kodzik. Jak ustawić, aby po naciśnięciu [$Button01] skrypt odczytywał zawartość pola [$Input01]. Analogicznie chcę tak samo zrobić dla Buttona nr. 2 oraz 3. Chcę też, aby skrypt wpisywał do np. notatnika tekst wpisany w pole np. [$Input01].

 

Z tego co mi się wydaje to funkcja do odczytania pola [$Imput01] to

GUICtrlRead($Input01)

Całość kodu:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\Artek\Desktop\4.kxf
GUICreate("Generator linków premium ", 363, 200, 293, 265)
$Input01 = GUICtrlCreateInput("", 8, 8, 345, 21)
$Input02 = GUICtrlCreateInput("", 8, 40, 345, 21)
$Input03 = GUICtrlCreateInput("", 8, 72, 345, 21)
$Button01 = GUICtrlCreateButton("DOWNLOAD #1", 8, 104, 345, 25)
$Button02 = GUICtrlCreateButton("DOWNLOAD #2", 8, 136, 345, 25)
$Button03 = GUICtrlCreateButton("DOWNLOAD #3", 8, 168, 345, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

HotKeySet("{ESC}",         "Wyjscie")

Func Pobieranie()
EndFunc

Func Wyjscie()
Exit
EndFunc

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

            Case $Button01
            GUICtrlRead($Input01)
            Run("notepad.exe")
            Sleep(1000)
            Send($Input01)

    EndSwitch
WEnd

While 1
Sleep(1000)
WEnd
ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

  • Autor
Opublikowano

To ja wiem. Ale ja chcę napisać premium link generatora. A dokładnie, chodzi mi o to, aby treść pola Input, została wpisana na stronie w odpowiednie miejsce.

Wiec potrzebuje: GUICtrlRead($Input01) i jakaś jeszcze komendę która działa  podobnie jak Send, z tym, że wpisuje nie to co ja wpiszę sam ręcznie w cudzysłowie , lecz zawszę ten sam tekst który napisany jest w polu [input01] na widoku GUI uruchomionego programu.

MistrzMaster Specjalista

MistrzMaster

Opublikowano
Specjalista

MistrzMaster

Opublikowano

No to najprościej byłoby to zrobić Send, tylko że okno musi być aktywne i musisz mieć kursor w dobry miejscu. Żeby działało zawsze do konkretnego miejsca musiałbyś się pobawić z jakimś api, np. firefoxa czy ie, szukasz inputa po jakiejś nazwie czy klasie i później edytujesz jego zawartość.

Bot do gry NosTale:


[bOT] NosBota 1.3v

ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

  • Autor
Opublikowano

Wiem, że to podstawy jednak, nie istnieje już strona z polskim forum o AutoIt, gdzie admin robił wszystko za mnie, więc muszę cię męczyć tu. Dzięki za pomoc, z każdym kodem który ktoś za mnie napiszę uczę się co raz więcej. - poznaje więcej komend które wykonują rożne polecenia. Jeszcze raz z góry dzięki.

 

Jeszcze jedno pytanie:

Dlaczego funkcja [Run] nie uruchamia wszystkich aplikacji?

Używam linijki: Run"(firefox.exe") lecz Mozilla Firefox się nie uruchamia, tak samo jest z Internet Explorer gdy używam linijki: Run"(iexplore.exe")

Natomiast już Notatnik - Run"(notepad.exe") uruchomiany jest poprawnie. Jak to naprawić? A może używam niewłaściwej komendy?

Ktosiu Znawca

Ktosiu

Opublikowano
Znawca

Ktosiu

Opublikowano

Nie uruchamia bo nie wpisujesz ścieżki do aplikacji, system nie zawsze wie gdzie jest aplikacja bo brak jej zmiennej w set path 

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

ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

  • Autor
Opublikowano

Jest taka możliwość, aby skrypt wykonywał funkcje w ukryciu? np otwiera przeglądarkę, wchodzi na podaną stronę. Ukrycie polega na tym że ja nie widzę tego na ekranie.

ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

  • Autor
Opublikowano

Pobrałem bibliotekę WinHttp.au3 oraz WinHttpConstants.au3. Dopisałem:

#include <WinHttp.au3>

lecz działania nadal są widoczne na ekranie.

ArtekXDPL Rekrut

ArtekXDPL

Opublikowano
Rekrut

ArtekXDPL

  • Autor
Opublikowano

Dobra kij w ten generator. To jest za trudne. Mam jeszcze jeden problem a mianowicie:

 

Mam załączonych kilka programów jednocześnie np. Mozille Firefox'a na którym przeglądam internet oraz np. Aimp 2.

W trakcie przeglądania sieci nie widzę na ekranie włączonego Aimp'a 2 gdyż zasłania go aktualnie Mozilla Firefox na pełnym ekranie.

Jaka jest komenda na: pokazanie programu Aimp 2 (ma to być taki samo, jak kliknę na program schowany na pasku zadań)

Zarchiwizowany

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

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