Нужна помощь в правке скрипта.

Помощь в написании скриптов
n0n5top
Posts: 4
Joined: 27 Apr 2019, 09:33

Нужна помощь в правке скрипта.

27 Apr 2019, 10:14

Уважаемые профессионалы!

Помогите пожалуйста до делать или переделать скрипт.

Code: Select all

$*vk45::
	while (GetKeyState("vk45", "P"))
             {
          	if (GetKeyState("Shift", "P"))
		send, {Shift Down}{vk45}{Shift Up}

                  send, {vk45}

		sleep, 150
             }
return
В общем обычный холд баттн спам скрипт. Не устраивает что с зажатым шифтом, идет спам сразу двух {vk*}, большой и маленькой.
Думаю понятно чего добиваюсь. Нужно чтоб с зажатым шифтом был спам большой буквы, а без зажатого маленькой.

Буду очень благодарен за вашу помощь.
serzh82saratov
Posts: 80
Joined: 01 Jul 2017, 03:04

Re: Нужна помощь в правке скрипта.

27 Apr 2019, 10:50

Code: Select all

$*vk45::
	while (GetKeyState("vk45", "P"))
             {
          	if (GetKeyState("Shift", "P"))
		send, {Shift Down}{vk45}{Shift Up}
																																																																																																																						else
                  send, {vk45}

		sleep, 150
             }
return
n0n5top
Posts: 4
Joined: 27 Apr 2019, 09:33

Re: Нужна помощь в правке скрипта.

27 Apr 2019, 12:09

serzh82saratov Спасибо!
А какая была правка?
Правку увидел! А возможно теперь это как то оптимизировать и добавить зажатые {vk*} c Ctrl и Alt?
serzh82saratov
Posts: 80
Joined: 01 Jul 2017, 03:04

Re: Нужна помощь в правке скрипта.

27 Apr 2019, 20:49

Правку увидел!
Чтобы сразу видеть, соблюдайте табуляцию.

Code: Select all

$*vk45::  ;	E
	while (GetKeyState("vk45", "P"))
	{
		p1 := "", p2 := ""
		for k, v in {"Ctrl":"LCtrl","Shift":"LShift","Alt":"LAlt","LWin":"LWin","RWin":"RWin"}
			GetKeyState(k, "P") && (p1 .= "{" v " Down}") && (p2 .= "{" v " Up}")
		send, %p1%{vk45}%p2% 
		sleep, 150
	}
	return
Или так.

Code: Select all

$*vk45::  ;	E
	while (GetKeyState("vk45", "P"))
	{
		Send {Blind}{vk45}
		sleep, 150
	}
	return
n0n5top
Posts: 4
Joined: 27 Apr 2019, 09:33

Re: Нужна помощь в правке скрипта.

28 Apr 2019, 18:09

Серж сп вам большое за отзыв и помощь.
2й вариант ок, а 1й с ошибкой.

Закрывайте!
n0n5top
Posts: 4
Joined: 27 Apr 2019, 09:33

Re: Нужна помощь в правке скрипта.

30 Apr 2019, 05:14

При запуске AHK файла, говорит ошибка в 5й строчке. Думаю это уже не важно. А вариант с БЛАЙНДом оч нравится, оч долго искал что то подобное.

Return to “Помощь”

Who is online

Users browsing this forum: No registered users and 6 guests