Skocz do zawartości

[problem]Funkcja i hotkey


Rekomendowane odpowiedzi

hej, jestem po małej przerwie z AutoIT i chciałbym zrobić spam bota v 3 (zrobiłem 2 inne lecz ten chce na hotkeya, a nie na liczbę wysyłanych wiadomości)

 

mój kod z wersji 2

 

 

 

#include <GUIConstantsEx.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("SpamBot by Michal", 394, 133, 289, 368)
$spam = GUICtrlCreateButton("Start SpamBot", 16, 8, 129, 49)
$Input1 = GUICtrlCreateInput("Co ma spamować", 8, 64, 369, 21)
$ile_wiadomosci_ma_wyslac = GUICtrlCreateInput("Ile wiadomości ma wysłać", 8, 96, 369, 21)
$Wylacz = GUICtrlCreateButton("Wylacz", 160, 8, 129, 49)
$Label1 = GUICtrlCreateLabel("SpamBot by Michal", 296, 8, 91, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
				Case $spam
				sleep(100)
				GUISetstate(@SW_MINIMIZE)
				for $i = 1 to GUiCtrlRead($ile_wiadomosci_ma_wyslac) step +1
				send(guictrlread($input1))
				Send (""& "{Enter}")
				sleep(35)
				next
				Case $Wylacz
				Exit
	EndSwitch
WEnd

 

 

 

i próbowałem takiego rozwiązania lecz są błędy :

 

 

#include <GUIConstantsEx.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("SpamBot by Michal", 394, 133, 289, 368)
$spam = GUICtrlCreateButton("Start SpamBot", 16, 8, 129, 49)
$Input1 = GUICtrlCreateInput("Co ma spamować", 8, 64, 369, 21)
$ile_wiadomosci_ma_wyslac = GUICtrlCreateInput("Ile wiadomości ma wysłać", 8, 96, 369, 21)
$Wylacz = GUICtrlCreateButton("Wylacz", 160, 8, 129, 49)
$Label1 = GUICtrlCreateLabel("SpamBot by Michal", 296, 8, 91, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
                    Case $spam
                    HotKeySet ("f2","spam")
                    Case $Wylacz
                Exit
    EndSwitch
WEnd


Func spam ()
                sleep(500)
                GUISetstate(@SW_MINIMIZE)
                for $i = 1 to GUiCtrlRead($ile_wiadomosci_ma_wyslac) step +1
                send(guictrlread($input1))
                Send (""& "{Enter}")
                sleep(35)
                next
endfunc
 

 

 

 

@edit

dopiero zaczynam przygodę z autoit więc prosze, nie hejtujcie mnie, że nie umiem ustawić na hotkeya.

@edit2

chodzi mi bardziej o nakierowanie, co poprawić itd.

qxv1fr.jpg


by NovusOrdo


It is better to keep your mouth closed and let people think you are a fool than to open it and remove all doubt. ~Mark Twain

Odnośnik do komentarza
Udostępnij na innych stronach

niechcący usunąłem for, sec zaraz poprawię :P

@edit

poprawione. lecz nadal gdy kliknę f2 nic się nie dzieje.

qxv1fr.jpg


by NovusOrdo


It is better to keep your mouth closed and let people think you are a fool than to open it and remove all doubt. ~Mark Twain

Odnośnik do komentarza
Udostępnij na innych stronach


#include <GUIConstantsEx.au3>

HotKeySet ("{F2}","spam")

$Form1 = GUICreate("SpamBot by Michal", 394, 133, 289, 368)

$spam = GUICtrlCreateButton("Start SpamBot", 16, 8, 129, 49)

$Input1 = GUICtrlCreateInput("Co ma spamować", 8, 64, 369, 21)

$ile_wiadomosci_ma_wyslac = GUICtrlCreateInput("Ile wiadomości ma wysłać", 8, 96, 369, 21)

$Wylacz = GUICtrlCreateButton("Wylacz", 160, 8, 129, 49)

$Label1 = GUICtrlCreateLabel("SpamBot by Michal", 296, 8, 91, 17)

GUISetState(@SW_SHOW)

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $spam

spam()

Case $Wylacz

Exit

EndSwitch

WEnd

 

 

Func spam ()

sleep(500)

GUISetstate(@SW_MINIMIZE)

for $i = 1 to GUiCtrlRead($ile_wiadomosci_ma_wyslac) step +1

send(guictrlread($input1))

Send (""& "{Enter}") ;tu do końca nie wiem, co bot ma kliknąć.. ma wpisać ten znaczek i klikać enter?

sleep(35)

next

endfunc

 

1329036830-U154499.png
Odnośnik do komentarza
Udostępnij na innych stronach

ehh, zapomniałem, że hotkey ma być pierw ustawiony a później wpisywać ;P

@up

dzięki, mniej i więcej o coś takiego chodziło, teraz sam spróbuję zrobić włączanie i wyłączanie na f2, temat można cls.

a w tym co nie wiesz o co chodzi to o to, że ma wciskać enter. a & oddziela

qxv1fr.jpg


by NovusOrdo


It is better to keep your mouth closed and let people think you are a fool than to open it and remove all doubt. ~Mark Twain

Odnośnik do komentarza
Udostępnij na innych stronach

Zarchiwizowany

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

Gość
Ten temat został zamknięty. Brak możliwości dodania odpowiedzi.
  • Ostatnio przeglądający forum [problem]Funkcja i hotkey   0 użytkowników
    • Brak zarejestrowanych użytkowników przeglądających tę stronę.
×
×
  • Dodaj nową pozycję...