кликер какой то или хз

[olo)LOLO]

очень нужна помощь с поиском решения.

задача:

есть текстовый файл, в нем инфа. примерно 7 сотен коротких строк. мне нужно каждую строку по отдельности скопипастить. т.е. я открываю программу и в нее каждую строчку по очереди должно вставляться <мой текст(всегда одинаковый)> + <строка n> через пробел.

или хотя бы просто каждая строка по очереди должна paste + enter в мою программу.

еще нужны паузы. например 1 строку раз в 3 секунды. или 5 строк раз в секунду и перерыв на 10с. и т.п.

 

у меня пока даже нет представления как это можно сделать. буду благодарен за любые советы.

[VOVA_RADIANCE]

напиши любому школьнику, еще лучше дотеру, купи яшку и рарку на любимого героя, профит

Изменено 16 марта 2014 пользователем VOVA_RADIANCE

[justice_st]

напишу тебе прогу на вин7 за полтос на киве

[olo)LOLO]

напиши

[Ramil]

пфф задание уровня 10 класса информатики

на любом языке пятиминутное дело

Изменено 18 марта 2014 пользователем Ramil

[olo)LOLO]

ну ты чо? ты чо? ты чо, а? помог бы раз так просто

[Ramil]

ну ладно попробую как время будет

[Ramil]

автохоткей

ProgName - запускаешь AU3_Spy.exe, находящийся в папке автохоткея, открываешь свою прогу и смотришь ahk_class

f8 - пауза

f9 - заново

 

Path = D:\huy.txt	;путь до файла, с которого считываем строки
s = 2			;количество строк за t
t = 100			;раз в t милисекунд
p = 1000		;пауза в милисекундах
ProgName = Notepad	;ahk_class программы, куда надо вставлять
text := "123"		;свой текст

i=1
Loop
{
FileReadLine, line, %Path%, %i%
if ErrorLevel
	break
clipboard:=text line
IfWinExist, ahk_class Notepad
		WinActivate
else
		{
		MsgBox, Окно не найдено
		break
	}
SendInput ^v
ClipWait
SendInput {enter}
a:=mod(i, s)
if a=0
	sleep, %p%
else
	sleep, %t%
;MsgBox %a%
i:=i+1
}
MsgBox, Достигнут конец файла или возникла проблема чтения.
Return

f8::pause
f9::reload

 

5 строк раз в секунду и перерыв 10 сек: s=5, t=1000, p=10000

Изменено 19 марта 2014 пользователем Ramil

[olo)LOLO]

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

[Ramil]

a ctrl+v в твоей проге работает?

окно проги активно становится?

[olo)LOLO]

да и да. чат канала в вк3

[Ramil]

проверь копирует ли в блокнот

 

вместо sendinput попробуй send

проверь мб курсор не там стоит

[olo)LOLO]

в блокнот тоже. вставляет символ v

если ^v взять в фигурные скобки, то просто прыгает по строчкам

c Send тоже самое

 

после SendInput запятую поставил и начал вставлять в блокнот.

а в варик не хочет (

Изменено 19 марта 2014 пользователем olo)LOLO

[Ramil]

попробуй вместо ^v - {Ctrl Down}v{Ctrl Up}

[olo)LOLO]

в варик никак не хочет

[Ramil]

блять там вместо "IfWinExist, ahk_class Notepad" надо "IfWinExist, ahk_class %ProgName%"

 

и лучше юзать конструкцию SendInput, {ctrl down}v{ctrl up}

[olo)LOLO]

ну я там прописывал Warcraft III вместо нотпада

ща прописал %ProgName%

ничего не поменялось.он варик (запущен в окне) разворачивает и все. курсор в строке чата, но не вставляет

[Ramil]

нашел у себя варик, попробовал - работает

 

Path = D:\huy.txt	   ;путь до файла, с которого считываем строки
s = 2				   ;количество строк за t
t = 100				 ;раз в t милисекунд
p = 3000				;пауза в милисекундах
ProgName:= "Warcraft III"	  ;ahk_class программы, куда надо вставлять
text := "123"		   ;свой текст



i=1
Loop
{
	FileReadLine, line, %Path%, %i%
	if ErrorLevel
			break
	clipboard:=text line
	IfWinExist, ahk_class %ProgName%
					WinActivate
	else
					{
					MsgBox, Окно не найдено
					break
			}
	SendInput, {ctrl down}v{ctrl up}
	ClipWait
	SendInput {enter}
	a:=mod(i, s)
	if a=0
			sleep, %p%
	else
			sleep, %t%
	;MsgBox %a%
	i:=i+1
}
MsgBox, Достигнут конец файла или возникла проблема чтения.
Return

f8::pause
f9::reload

 

кинь файл из которого надо вставлять

мб там русское а варик английский и не хочет принимать хз

Изменено 19 марта 2014 пользователем Ramil

[olo)LOLO]

в файле список ников

http://rghost.ru/pri...252c284acb20dfe

 

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

Изменено 19 марта 2014 пользователем olo)LOLO

[Ramil]

попробуй вставлять так: SendInput, {shift down}{ins}{shift up}

 

чисто для проверки сделай скрипт "a::SendInput, abc"

напишет что-нибудь в варе при нажатии а?