Jak zmienić IP?
Czy wiesz jak szybko zmienić IP?..
CyberGhost VPN
Wypróbuj darmowe narzędzie do anonimowego korzystania z internetu..
Jak stworzyć silne i bezpieczne hasło?
Wszyscy dobrze wiemy jak ważne jest posiadanie dobrego hasła..
Tor Browser Bundle
Sprawdź darmowe narzędzie do ochrony danych użytkownika i całego komputera..
Pokaż wyniki od 1 do 12 z 12

Temat: AutoIt- Pyt.

  1. #1
    Użytkownik
    Dołączył
    04-05-2009
    Posty
    20

    Domyślnie

    Dzisiaj czytałem ciekawy kurs dotyczący AutoIt.
    Napisałem taki prog.:
    Kod:
    HotKeySet("{END}","PRZERWANIE")
    #include <GUIConstant***.au3>
    $szerokosc = 200
    $wysokosc = 150
    $tytul = "Spamer"
    GUICreate($tytul,$szerokosc,$wysokosc)
    $kord_X = 10
    $kord_Y = 20
    $szerokosc_inp = $szerokosc - 2*$kord_X
    $wysokosc_inp = 20
    
    
    $CZAS = GUICtrlCreateInput("",$kord_X+100,$kord_Y+30,$szerokosc_inp-100,$wysokosc_inp,0x2000)
    $opis_czas = "Czas:"
    GUICtrlCreateLabel($opis_czas,$kord_X+70,$kord_Y+33)
    $max_c = 4
    GUICtrlSetLimit($CZAS, $max_c)
    ;----button
    $nazwa = "Start"
    $btn_szer = 60
    $btn_wys = 40
    $Start = GUICtrlCreateButton($nazwa,$kord_X,$kord_Y+30,$btn_szer,$btn_wys)
    ;^^^^^button
    GUISetState(@SW_SHOW)
    $przerwanie = 0;--- zmienna sterująca przerwaniem
    While 1
    ****$msg = GUIGetMsg()
    ****Select
    ********Case $msg = $GUI_EVENT_CLOSE
    ************Exit;----zamyka botka
    ********Case $msg = $Start
    ************$licznik = 10
    ****************Do ;---odliczanie
    ********************ToolTip("Zacznę spamowac za: "&$licznik,500,400,$tytul,1)
    ********************Sleep(1000)
    ********************$licznik = $licznik - 1
    ****************Until $licznik = 0
    ****************ToolTip("")
    ********************Send("{ENTER}");--otwiera czat
    
    ****************SPAM()
    ****************** ;---przerwanie
    ****************If $przerwanie =1 Then
    ********************$przerwanie = 0
    ********************ExitLoop
    ****************EndIf
    ****************** ;^^^przerwanie
    ****************$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal);---realizuje zadane opóźnienie
    
    ****EndSelect
    WEnd
    Func SPAM()
    
    ****Send("a")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("b")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("c")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("d")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("e")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("f")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("g")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("h")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("i")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("j")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("k")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("l")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("m")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("n")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("o")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("p")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("r")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("s")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("t")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("w")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("z")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    
    
    
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ********Send("aa")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ab")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ac")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ad")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ae")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("af")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ag")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ah")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ai")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("aj")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ak")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("al")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("am")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("an")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ao")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ap")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("ar")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("as")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ****Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("at")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("aw")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    ********Send("{ENTER}")
    ****Send("{ENTER}")
    ****Send("az")
    ****Send("{ENTER}")
    ****$interwal = GUICtrlRead($CZAS)*1000
    ****************Sleep($interwal)
    
    
    
    
    
    EndFunc
    Func PRZERWANIE()
    ****$przerwanie = 1
    EndFunc
    I chcę go wykorzystać do łamania haseł.
    Da się to zrobić automatycznie (nie ręcznie)??
    Bo tak w koło pisać
    Send("{ENTER}")
    Send("{ENTER}")
    Send("az")
    Send("{ENTER}")
    $interwal = GUICtrlRead($CZAS)*1000
    Sleep($interwal)

    to trochę by to czasu zajęło

  2. Pani Haker
    Avatar Pani Haker Moderator

    Dołączył
    05-03-2009
    Skąd
    Internet
    Postów
    666
    Pochwał
    0
  3. #2

    Domyślnie

    Przecierz mozna wrzucuc to w pętle nie bedziesz musiał tego powtarzać tak, bo tak sie nie robi:P
    [B]repeat[/B]
    Messagebox(handle, [COLOR="Blue"]'Szacunek Ludzi Ulicy'[/COLOR], [COLOR="Blue"]'UltrasGS'[/COLOR], MB_OK);
    [B]Until [/B] [COLOR="Red"]Brak Warunku zakończenia[/COLOR]
    __________________

  4. #3
    Użytkownik
    Dołączył
    04-05-2009
    Posty
    20

    Domyślnie

    Nie rozumiem
    Ja nie chcę powtarzać tego tylko chcę żeby literki leciały zgodnie z alfabetem czyli:
    a
    b
    c
    ...
    aa
    ab
    ac
    ...
    bbb
    bbc
    bbd
    bbe

    Jeżeli o to ci chodzi, to jaka będzie to pętla??
    Bo ja dopiero dzisiaj czytałem kurs i nie wiele wiem o tym j. :/

  5. #4
    Dawni Moderatorzy Avatar discovery44
    Dołączył
    14-08-2007
    Posty
    726

    Domyślnie

    Kod:
    #include <iostream>
    char znak, znak2, znak3;
    int main()
    {
    for(znak = &#39;a&#39;; znak < &#39;z&#39;; znak++)
    {
    std::cout << znak << std::endl;
    
    for(znak2 = &#39;a&#39;; znak2 < &#39;z&#39;; znak2++)
    {
    std::cout << znak << znak2 << std::endl;
    }
    
    for(znak3 = &#39;a&#39;; znak3 < &#39;z&#39;; znak3++)
    {
    std::cout << znak << znak2 << znak2 << std::endl;
    }
    
    }
    }
    Tak w C++ wygląda.

  6. #5
    Użytkownik
    Dołączył
    04-05-2009
    Posty
    20

    Domyślnie

    Ale to bedzie pasowało do kodu AutoIt??

  7. #6

    Domyślnie

    NIE, to jest kod C++, ale AutoIt chyba też ma pętle...

  8. #7
    Użytkownik
    Dołączył
    04-05-2009
    Posty
    20

    Domyślnie

    Spr. jest ale zmienne nie mogą przechowywać liter :/
    I pętla działa tylko na liczby :/

  9. #8

    Domyślnie

    No to naucz się programować

  10. #9
    Dawni Moderatorzy
    Dołączył
    29-05-2004
    Skąd
    Memento finis.
    Posty
    694

    Domyślnie

    C/C++/PHP + cURL.

  11. #10
    Użytkownik
    Dołączył
    04-05-2009
    Posty
    20

    Domyślnie

    PHP umiem, ale da się jakos połączyć te języki ;p?

  12. #11

    Domyślnie

    Da się, ale najłatwiej Ci będzie połączyć to z cURLem...

  13. #12
    Użytkownik
    Dołączył
    04-05-2009
    Posty
    20

    Domyślnie

    Nauczyłem się juz cos nieco o cURL
    ale jak niby mam odczytać Zmienna POST w AutoIt?

Podobne wątki

  1. AutoIT - dobry wybor?
    Przez Vanil
    w forum Dla początkujących
    Odpowiedzi: 3
    Ostatni post / autor: 24-12-2013, 16:37
  2. Wykrywalność w AutoIt
    Przez Pragrom
    w forum Inne
    Odpowiedzi: 4
    Ostatni post / autor: 07-09-2013, 16:27
  3. AutoIt v3 - Download
    Przez Pragrom
    w forum Inne
    Odpowiedzi: 2
    Ostatni post / autor: 20-08-2013, 18:33
  4. [AutoIT]BOT
    Przez Juri_gag
    w forum Inne
    Odpowiedzi: 2
    Ostatni post / autor: 19-09-2009, 20:58

Uprawnienia

  • Nie możesz zakładać nowych tematów
  • Nie możesz pisać wiadomości
  • Nie możesz dodawać załączników
  • Nie możesz edytować swoich postów
  •