[Pomoc] Prośba O Krótkiego Bota

[100Jaboli]

Witam, gracie w plemiona? Potrzebny mi jest bot do wysyłania ataków synchronicznych z przeglądarki opera

 

Bot ma klikać na przemian " "(space) i "2" . wygodna była by wersja okienkowa, która ma możliwość wyboru ilość powtórzeń tego cyklu(spacja i 2 w takiej właśnie kolejności) oraz opcją ustawienia czasu czekania pomiędzy pojedynczymi kliknięciami i przycisk "start".

 

odwdzięczyć mogę się plusikiem i 5*

[wojtekch]

Napisz bibliotekę sterującą Opera.au3 to mogę Ci takiego napisać

[Fli_PL]

Do takiej tandety trzeba aż Opera.au3?

[ps19]

Tu masz, krótkiego Bota + Code wystarczy to trochę zmodyfikować.wystarczy przeczytać tut by Maciek134 i będziesz wiedział o co biega.

 

Bota pisałem na pocżątku mojej przygody z AutoIT więc jest dosyć prosty.

 

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

Edytowane 23 Marca 2011 przez ps19

[100Jaboli]

thx, poradze sobie. łap +

[100Jaboli]

po natrafieniu na pewien kanał na YT z tutkami o AutoIt napisałem coś takiego i jestem z siebie zadowolony

 

 

 

include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

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

$Form3 = GUICreate("Bot", 113, 211, 302, 218)

$Button1 = GUICtrlCreateButton("2 Ataki", 16, 16, 75, 25)

$Button2 = GUICtrlCreateButton("3 Ataki", 16, 56, 75, 25)

$Button3 = GUICtrlCreateButton("5 Ataków", 16, 136, 75, 25)

$Button4 = GUICtrlCreateButton("4 Ataki", 16, 96, 75, 25)

$Label1 = GUICtrlCreateLabel("Created for JA", 20, 176, 108, 33)

GUISetState(@SW_SHOW)

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

 

While 1

$Msg = GUIGetMsg()

if $msg = $Button1 then ataki2()

if $msg = $Button2 then ataki3()

if $msg = $Button3 Then atakow5()

If $msg = $Button4 then ataki4()

Switch $Msg

Case $GUI_EVENT_CLOSE

Exit

 

EndSwitch

WEnd

 

 

 

 

func ataki2()

GUIsetstate(@SW_MINIMIZE)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Sleep (200)

MsgBox(0, "YEA", "Poszło, odświerz stronę ")

exit

EndFunc

 

Func ataki3()

GUIsetstate(@SW_MINIMIZE)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Sleep (200)

MsgBox(0, "YEA", "Poszło, odświerz stronę ")

exit

EndFunc

 

Func atakow5()

GUIsetstate(@SW_MINIMIZE)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Sleep (200)

MsgBox(0, "YEA", "Poszło, odświerz stronę ")

exit

EndFunc

 

func ataki4()

GUIsetstate(@SW_MINIMIZE)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Send( " " )

Sleep(5)

Send( "2" )

sleep(5)

Sleep (200)

MsgBox(0, "YEA", "Poszło, odświerz stronę ")

exit

EndFunc

 

 

do wszystkich geniuszy AutoIt: To mój pierwszy bot więc proszę o sugestie co i jak poprawić a nie mieszanie mnie z błotem. wiem że to strasznie amatorski bot który można skrócić do kilku linijek kodu , w końcu to mój pierwszy program :rolleyes:

[lokuxd]

wez sobie daj to w for zeby tyle nie pisac

 

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

i masz robi co to 5 razy a mniej piszesz