1 Тема от islamsaab (изменено: islamsaab, 2013-01-21 03:50:30)

  • islamsaab
  • Участник
  • Неактивен

Тема: AHK: Рандомный текст.

Здраствуйте, меня интересует как сделать на клавишу (рандомную) печать текста. Вот например

Numpad0::Send, Вариант номер 1{enter}

Это мне позволяет отправить сообщение Вариант номер 1, но как сделать, чтобы на одну кнопку вариантов было множество и главное рандомно. Если нельзя сделать рандомно, то можно ли сделать, чтобы на одну клавишу разный текст поочередно шел? Если хоть какой-то вариант возможен, то дайте пожалуйста что-нибудь рабочее, чтобы я смог по шаблону использовать скрипт. Спасибо.

2 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: AHK: Рандомный текст.

TextArray := ["Вариант номер 1"
            , "Вариант номер 2"
            , "Вариант номер 3"
            , "Вариант номер 4"]

Numpad0::
   Random, Var, 1, 4
   SendInput, % TextArray[Var] . "{Enter}"
   return

islamsaab, обрати внимание на оформление кода.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

3 Ответ от islamsaab

  • islamsaab
  • Участник
  • Неактивен

Re: AHK: Рандомный текст.

Хорошо.
Выдает ошибку illegal character... program will exit.

4 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: AHK: Рандомный текст.

Обнови AHK до актуальной версии.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

5 Ответ от islamsaab (изменено: islamsaab, 2013-01-21 05:24:24)

  • islamsaab
  • Участник
  • Неактивен

Re: AHK: Рандомный текст.

Спасибо большое. Работает изумительно.
Теперь у меня следующая проблема возникла:

TextArray := ["Вариант номер AAA1"
            , "Вариант номер AAA2"
            , "Вариант номер AAA3"
            , "Вариант номер AAA4"]

Numpad0::
   Random, Var, 1, 4
   SendInput, % TextArray[Var] . "{Enter}"
   return

TextArray := ["Вариант номер BBB1"
            , "Вариант номер BBB2"
            , "Вариант номер BBB3"
            , "Вариант номер BBB4"]

Numpad1::
   Random, Var, 1, 4
   SendInput, % TextArray[Var] . "{Enter}"
   return

Мне нужно, чтобы в одном скрипте была возможность на разные клавиши повесить рандомные действия. Но почему то и Numpad1 и Numpad0 ссылаются на "Вариант номер ВВВ№".  Я подумал, что нужно после TextArray поставить простой обозначитель:

TextArray := ["Вариант номер AAA1"
            , "Вариант номер AAA2"
            , "Вариант номер AAA3"
            , "Вариант номер AAA4"]

Numpad0::
   Random, Var, 1, 4
   SendInput, % TextArray[Var] . "{Enter}"
   return

TextArrayBBB := ["Вариант номер BBB1"
            , "Вариант номер BBB2"
            , "Вариант номер BBB3"
            , "Вариант номер BBB4"]

Numpad1::
   Random, Var, 1, 4
   SendInput, % TextArrayBBB[Var] . "{Enter}"
   return

чтобы Numpad1 знал на какой TextArray ссылаться, но не сработало. Просто пустая строка и Enter срабатывает. Клавишь у меня будет много с рандомным выводом текста и делать на каждую отдельный скрипт и запускать по отдельности не реально для меня.

6 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: AHK: Рандомный текст.

Определение обоих массивов должно находиться в секции автовыполнения.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

7 Ответ от islamsaab

  • islamsaab
  • Участник
  • Неактивен

Re: AHK: Рандомный текст.

Немножко трудно было, но по первым тестам вроде работает. Спасибо еще раз.


Numpad0::
   Random, Var, 1, 4
   SendInput, % TextArray[Var] . "{Enter}"

TextArray := ["Вариант номер AAA1"
            , "Вариант номер AAA2"
            , "Вариант номер AAA3"
            , "Вариант номер AAA4"]

   Exit


Numpad1::
   Random, Var, 1, 4
   SendInput, % TextArray2[Var] . "{Enter}"

TextArray2 := ["Вариант номер BBB1"
            , "Вариант номер BBB2"
            , "Вариант номер BBB3"
            , "Вариант номер BBB4"]

   Exit