Помогите создать скрипт

[Karabas]

Помогите создать скрипт, собственно, проблема в основном с таймером, однако и остальное делаю как мне кажется по колхозному, загружая комп процессами. так что если не трудно помогите.

Алгоритм следующий:
1. в 6:00 запускается гугл хром
2. запускается контакт
3. вводится лог и пас
2. в адресную строку вводится адрес http://vk....
3. производится LCLICK (964,338)
4. браузер закрывается

[Karabas]

Ваще для небес скрипт уже есть... этот скрипт хотел для трофейной рыбалки, играю в неё редко,  и по тому постоянно забываю зайти забрать золото за базы... думал скрипт мне поможет если на одном из компов будет висеть кликер в трее. а так как комп одного из членов семьи у которого тоже есть контакт. хотел что бы логин и пас вводились из файла.

[Karabas]

 надо предупреждать, что вам для небес и аккаунтов куча.

а что это меняет ? 

[Karabas]

Code: (clickermann) [Select]

1:


LCLICK(218,748) //запуск хрома с рабочего стола
WAIT(5)



LCLICK(144,40) //клик в адресную строку
wait(2)

KEYSTRING("vk.com")   //ввод адреса
wait(2)

KEYDOWN(#enter)
wait(5)

FOR ($count, $count<TFCOUNT("vk.txt"))
$str = TFREAD ("vk.txt", $count+1)
$log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
$pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))

LCLICK(300,166)
waitms(50)

TOCLIP($log) // ввести логин
WAIT (1)
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#V)
WAIT (1)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (50)

LCLICK(300,219)
waitms(50)

TOCLIP($pass) // ввести пароль
WAITMS (50)
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (50) 

LCLICK(343,258) //клик войти
wait(5)

LCLICK(328,342)  // клик на приложение
wait(20)

LCLICK(964,339)
wait(1)

LCLICK(1119,99)
wait(1)
 
   
end_cycвот этот скрипт работает вот только если бы в 6:00 он сам включался

[Oraven]

Code: (clickermann) [Select]

EXECUTE("chrome.exe", "vk.com")  //запуск хрома
wait(5)

FOR ($count=0, $count<TFCOUNT("vk.txt"))
   $str = TFREAD ("vk.txt", $count+1)
   $log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
   $pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))
   
   LCLICK(300,166)
   waitms(50)
   
   TOCLIP($log) // ввести логин
   WAIT (1)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#V)
   WAIT (1)
   KEYUP (#V)
   KEYUP (#CTRL)
   WAITMS (50)
   
   LCLICK(300,219)
   waitms(50)
   
   TOCLIP($pass) // ввести пароль
   WAITMS (50)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#V)
   WAITMS (50)
   KEYUP (#V)
   KEYUP (#CTRL)
   WAITMS (50)
   
   LCLICK(343,258) //клик войти
   wait(5)
   
   LCLICK(328,342)  // клик на приложение
   wait(20)
   
   LCLICK(964,339)
   wait(1)
   
   LCLICK(1119,99)
   wait(1)   
   
end_cyc

HALT

[Karabas]

спс а с таймером я так понял не взлет, можно правда интервал в 24 часа поставить...

[Oraven]

Можно и с таймером

Code: (clickermann) [Select]

WHILE(($_time_h ! 6)|($_time_m ! 0)) // ждем 6:00
   WAITMS(100)
END_CYC

EXECUTE("chrome.exe", "vk.com")  //запуск хрома
wait(10)

FOR ($count=0, $count<TFCOUNT("vk.txt"))
   $str = TFREAD ("vk.txt", $count+1)
   $log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
   $pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))
   
   LCLICK(300,166)
   waitms(50)
   
   TOCLIP($log) // ввести логин
   WAIT (1)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#V)
   WAIT (1)
   KEYUP (#V)
   KEYUP (#CTRL)
   WAITMS (50)
   
   LCLICK(300,219)
   waitms(50)
   
   TOCLIP($pass) // ввести пароль
   WAITMS (50)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#V)
   WAITMS (50)
   KEYUP (#V)
   KEYUP (#CTRL)
   WAITMS (50)
   
   LCLICK(343,258) //клик войти
   wait(5)
   
   LCLICK(328,342)  // клик на приложение
   wait(20)
   
   LCLICK(964,339)
   wait(1)
   
   LCLICK(1119,99)
   wait(1)
   
end_cyc

WAIT(60)


[Karabas]

класс!!! спс

[security]

Karabas, Прошу прощения конечно, но вы не подумали о том, что может выскачить капча?

[Karabas]

Поддерживаю не разу не видел капчи... уже опробовал робит на ура...

[____]

Вопрос капчи никто не реализовывал ?