Серый форум — AHK: Поочередная отправка сообщений по команде

Re: AHK: Поочередная отправка сообщений по команде

2014-04-14T11:13:31Z

Что то типа такого:


#UseHook
max := 2, i := 1 
 
Text_a_1 = Остановка "Полиция LS 
Text_b_1 = Осторожно, двери закрываются. Следующая остановка "Клуб ALHAMBRA" 

Text_a_2 = Остановка "Клуб ALHAMBRA" 
Text_b_2 = Осторожно, двери закрываются. Следующая остановка "Ж/Д вокзал LS"  
    
0:: i := 1 
1:: i := i = 1 ? max : --i 
2:: i := i = max ? 1 : ++i  
3:: SendPlay( Text_a_%i%, Text_b_%i%)
 
SendPlay(text1,text2)  {  
    SendPlay, {F6}%text1%{enter}
    Sleep 1000 
    SendPlay, {F6}%text2%{enter}
    Sleep 3000
    Random, I, 1, 5 
    SendPlay, % "{F6}" Mess%I% "{enter}" 
}

Re: AHK: Поочередная отправка сообщений по команде

2014-04-14T10:39:42Z

letopisec пишет:

Мне кажется,или я намудрил.

Так это Я Вам. А Вы уже Ему поможете.

Re: AHK: Поочередная отправка сообщений по команде

2014-04-14T10:12:17Z

serzh82saratov, я не думаю что сударь, тобишь топик стартер, поймет.

Re: AHK: Поочередная отправка сообщений по команде

2014-04-12T19:07:45Z

Всё дошло, не хватало директивы UseHook:


#UseHook
max := 30, i := 1

Loop % max
    Text%A_Index% := "Текст " A_Index  
    
0:: i := 1 
1:: i := i = 1 ? max : --i 
2:: i := i = max ? 1 : ++i  
3:: SendInput % "{Raw}" Text%i%

Re: AHK: Поочередная отправка сообщений по команде

2014-04-12T09:05:03Z

D-r_Safiullin, Я просто привел пример на основе вашего скрипта, а количество текста можете забить сколько хотити,хоть в сам скрипт,хоть в отдельный файлик,но при этом придется чутка подправить сам скрипт.

Re: AHK: Поочередная отправка сообщений по команде

2014-04-12T08:57:19Z

Должно так работать:


max := 30, i := 1

Loop % max
    Text%A_Index% := "Текст " A_Index 
  
0:: i := 1
1:: i := i = 1 ? max : --i
2:: i := i = max ? 1 : ++i 
3:: SendInput % "{Raw}" Text%i%

но у меня почему то неработает... А у Вас?

Re: AHK: Поочередная отправка сообщений по команде

2014-04-11T12:53:37Z

Насколько я понял из этого скрипта, он рассчитан только на два текста, но на деле их около 30

Re: AHK: Поочередная отправка сообщений по команде

2014-04-11T12:04:30Z

Мне кажется,или я намудрил.

Count=1
Text1={F6}Остановка "Полиция LS"{enter}
Text2={F6}Осторожно, двери закрываются. Следующая остановка "Клуб ALHAMBRA"{enter}
main(t,tt)
{
global Count
SendPlay,%t%
Sleep 10000
SendPlay,%tt%
Sleep 3000
Random, I, 1, 5 
SendPlay, % "{F6}" Mess%I% "  {enter}"

}
Numpad0::Count=1
Numpad1::Count -=2
Numpad2::Count +=2
Numpad3::
Text := Text%Count%
Count++
Textt := Text%Count%
Count--
main(Text,Textt)
return

AHK: Поочередная отправка сообщений по команде

2014-04-11T07:57:46Z

Доброго дня. Сразу скажу, что скриптер из меня никакой, поэтому обращаюсь к вам. Значит есть код для GTA SA:MP, которые помогает в работе водителем автобуса. Фрагмент выглядит примерно так:

numpad3::
     SendPlay, {F6}Остановка "Полиция LS"{enter}
     Sleep 10000
     SendPlay, {F6}Осторожно, двери закрываются. Следующая остановка "Клуб ALHAMBRA"{enter}
     Sleep 3000
     Random, I, 1, 5 
     SendPlay, % "{F6}" Mess%I% "  {enter}"
     Return
numpad4::
     SendPlay, {F6}Остановка "Клуб ALHAMBRA"{enter}
     Sleep 10000
     SendPlay, {F6}Осторожно, двери закрываются. Следующая остановка "Ж/Д вокзал LS"{enter}
     Sleep 3000
     Random, I, 1, 5 
     SendPlay, % "{F6}" Mess%I% "  {enter}"
Return

Мне, собственно, нужно, чтобы эти сообщения отправлялись не при нажатии отдельной клавиши, а переключались между собой по очереди кнопками "numpad1" - назад и "numpad2" - вперед. Кнопка "numpad3" - отправить само сообщение в чат. Кнопка "numpad0" возвращала бы в самое начало.
Заранее спасибо