[POMOCY] Autoklikacz?

[p3i2o1]

Witam,

 

Szukałem po necie ale nie mogłem za bardzo znaleźć. Potrzebuje wykonać takiego autoklikacza który będzie wpisywał np. blabla123 i zatwierdzi enterem.

Chciałbym aby dokonywało się to o 4:30 w nocy automatycznie. Da radę coś takiego zrobić?

[Wasiij Iwanowic]

Obczaj stronę pod adresem

http://www.mpcforum.pl/topic/373678-spis-najwaniejszych-tematw/

Ja ci nie napisze nie ,że nie umiem ale mi się nie chce

[p3i2o1]

Hmm... kiedyś coś takiego wykonałem ale zapomniałem jak. Polegało to na klikaniu F12 bo tylko to potrzebowałem i było co 1 sek.

 

Pamiętam że to był krótki kodzik... Nie miał dużo linijek, około 10. Odpalałem i ciągle walił F12 co 1 sek. Wyłączałem przez procesy. Coś takiego...

[Wasiij Iwanowic]

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

while 1
send({F12})
Sleep(1000)
wend

Func _Exit
Exit
EndFunc

[p3i2o1]

No... o To chodziło. Tylko jak by to zrobić żeby się odpaliło o 4:30... Sleep'a takiego długiego wyliczyć? Żeby szybciej było?

[Wasiij Iwanowic]

W linku wyżej dałem takie coś

http://www.mpcforum.pl/topic/104881-tut-uruchamianie-skryptu-o-wybranej-godzinie/

Wymodz coś

 

Dobra na pefno dasz sobie rade bo ja sobie dałem...

Może i to nie jest najlepsze rozwiązanie ale jest

[p3i2o1]

To ma być moja druga praca. Pierwszą wykonałem... 6 lat temu?

[Wasiij Iwanowic]

Dobra już dam ci ten kod

 

HotKeySet ( "{ESC}" , "Terminate" )
Func Terminate()
Exit 0
EndFunc
Do
Sleep(30000)
Send("{F12}")		
$m=@MIN
$h=@HOUR			
Until $h = 04 And $m = 30
while 1

 

Przypomnij sobie pentle While,Wend,For,to,Next,Do,Until.

Dodaj bajery bo mi się nie chce

 

I nie płacz

[p3i2o1]

Zamiast:

Send("{F12}")

Może być:

Send("blabla123")

???

 

Bo chcę aby po 4:30 po wyskoczeniu okna logowania wpisało hasło i zapodało enterem. ;p

 

Przykład:

 

HotKeySet ( "{ESC}" , "Terminate" )
Func Terminate()
  Exit 0
EndFunc
Do
  Sleep(30000)
  Send("blabla123")
  Send("{ENTER}")
  $m=@MIN
  $h=@HOUR						
Until   $h = 04   And   $m = 30
while 1

[Wasiij Iwanowic]

To w tej pętli wpakuj

 

Send("kutas666")
Send("haslo123")
Send("{ENTER}")

 

Te klamry {} między ENTER to jest po to aby nie mylił się i nie wpisywał poprostu ENTER tylko naciskał enter

 

Tylko musisz dodać coś do tego aby nie wpisywał kutas666 i haslo123 do tego samego pola.

Polecam AutoIt Window info i ControlClick

[p3i2o1]

Ale to ma być wpisane w jedno pole. Wiem że około 4:25 wyskakuje to pole. I w nim o 4:30 ma zostać wpisane blabla123. Czyli napisany przez Ciebie i zmieniony przeze mnie kodzik tak zrobi?

 

 

HotKeySet ( "{ESC}" , "Terminate" )
Func Terminate()
Exit 0
EndFunc
Do
Sleep(30000)
Send("blabla123")
Send("{ENTER}")
$m=@MIN
$h=@HOUR
Until $h = 04 And $m = 30
while 1

[Wasiij Iwanowic]

Dam jutro odpowiez.

dobranoc

[p3i2o1]

Bez takich, chcę to dzisiaj odpalić na noc.

[RobeM]

masakra, pisanie kodu i składni AutoIt by się przydało bo kto widział kończyć skrypt pustym WHILE !

 

prościej załączyć zwykły budzik

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

Func Terminate()
   Exit
EndFunc

While 1
   If @HOUR = 4 And @MIN = 30 Then

       Sleep(1000)
       Send("blabla123")
       Sleep(1000)
       Send("{ENTER}")
       Sleep(1000)

   EndIf

   Sleep(1000)
   ToolTip("CZEKA", "", "", "Budzik", 1, 1)
   Sleep(1000)

WEnd

[p3i2o1]

Dobra...

 

Oficjalnie wybieram kodzik robem'a. Wygląda na bardzo wygodny i taki jest. Wprowadziłem jedną zmiankę,

 

 

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

Func Terminate()
       Exit
EndFunc

While 1
       If @HOUR = 4 And @MIN = 30 Then

               Sleep(1000)
               Send("blabla123")
               Sleep(1000)
               Send("{ENTER}")
               Sleep(60000) - Zamiast 1000 Dałem 60000 aby hasło zostało wpisane jeden raz a nie ileś tam.
       EndIf

       Sleep(1000)
       ToolTip("Aktywny (GODZ: 4:30)", "", "", "AutoLogin", 1, 1)
       Sleep(1000)

WEnd

Teamat do zamknięcia, dziękuje.

[RobeM]

skrypt nie jest mój , tylko przerobiony skrypt ze strony autoit Time Machine, warto się zapoznać z tematami na forum i AutoIt Wiki

[Wasiij Iwanowic]

Gdzie ty tam w moim kodzie While widziałeś?

Ja wywaliłem tą pętle na budziku bo jest niepotrzebna.

A wszystko mieści się w pięknym Do Until

[p3i2o1]

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

Func Terminate()

Exit 0

EndFunc

Do

Sleep(30000)

Send("{F12}")

$m=@MIN

$h=@HOUR

Until $h = 04 And $m = 30

while 1 - po jakiego to?

 

 

Zresztą tak jak mówię, temat do zaknięcia.