1 Тема от Sergeant

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

Тема: AHK: ПМ флудер

Здравствуйте.
помогите написать код для отправки сообщений в ПМ

у меня есть простой код для отправки сообщений в чат

!3::
Sendplay, {f6}строка текста 1{enter}
Sleep 500 ;
Sendplay, {f6}строка текста 2{enter}
Return

хотелось бы отправлять этиже 2 строки в ПМ
примерно так

!3::
Sendplay, {f6}/pm id строка текста 1{enter}
Sleep 500 ;
Sendplay, {f6}/pm id строка текста 2{enter}
Return

проблема в том, чтоб вместо id стояли цифры от 0 и дальше.
т.е надо ввести некую переменную, которая бы увеличивалась на еденицу и зациклить это всё, пока число не дойдет, например, до 30.

помогите с кодом

2 Ответ от YMP

  • YMP
  • Разработчик
  • Неактивен

Re: AHK: ПМ флудер

!3::
    Loop, 30
    {
        id := A_Index - 1
        Sendplay, {f6}/pm %id% строка текста 1{enter}
        Sleep 500
        Sendplay, {f6}/pm %id% строка текста 2{enter}
        Sleep 500
    }
Return
DynamicWrapperX

3 Ответ от Sergeant

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

Re: AHK: ПМ флудер

спасибо большое


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

+4::
    if clipboard = 
        {
        }
    else
        {if StrLen = 1
                {            
                Sendplay, {f6}/pm %clipboard% строка текста 1{enter}
                Sleep 500 ;
                Sendplay, {f6}/pm %clipboard% строка текста 2{enter}
                Sleep 500 ;
                clipboard = 
                Return
                }
        Return
        }
Return

4 Ответ от alexii

  • alexii
  • Разработчик
  • Неактивен

Re: AHK: ПМ флудер

Sergeant, пишите, пожалуйста, предложения с заглавной буквы.

5 Ответ от YMP

  • YMP
  • Разработчик
  • Неактивен

Re: AHK: ПМ флудер

Проще всего так, наверно:

+4::
    if StrLen(Clipboard) = 1
                {            
                Sendplay, {f6}/pm %clipboard% строка текста 1{enter}
                Sleep 500 ;
                Sendplay, {f6}/pm %clipboard% строка текста 2{enter}
                Sleep 500 ;
                clipboard = 
                }
Return
DynamicWrapperX