В 이전 간행물 우리는 봇을 생성하는 방법을 알아냈고, 클래스의 인스턴스를 초기화했습니다. Bot 그것을 이용하여 메시지를 보내는 방법에 익숙해졌습니다.

이 기사에서는 이 주제를 계속하므로 읽은 후에만 이 기사를 읽기 시작하는 것이 좋습니다. 첫 번째 부분.

이번에는 봇을 부활시키고 명령 지원을 추가하는 방법과 클래스에 대해 알아 보겠습니다. Updater.

기사가 진행되는 동안 우리는 몇 가지 간단한 봇을 작성할 것이며, 후자는 주어진 날짜와 국가 코드를 기반으로 생산 일정에 따라 특정 국가의 하루가 주말인지 근무일인지 결정합니다. 그러나 이전과 마찬가지로 이 기사의 목적은 패키지 인터페이스에 익숙해지는 것입니다. telegram.bot 자신의 문제를 해결하기 위해.

"R로 텔레그램 봇 작성" 시리즈의 모든 기사

1. 우리는 봇을 만들고 그것을 사용하여 텔레그램으로 메시지를 보냅니다.
2. 봇에 명령 지원 및 메시지 필터 추가

내용

데이터 분석에 관심이 있다면 제 글에도 관심이 있으실 겁니다. 전보 и 유튜브 채널. 대부분의 콘텐츠는 R 언어에 전념합니다.

1. 업데이터 클래스
2. 핸들러 - 핸들러
3. 봇, 명령 처리기에 첫 번째 명령을 추가합니다.
4. 문자 메시지 프로세서 및 필터
5. 매개변수가 있는 명령 추가
6. 백그라운드에서 봇 실행
7. 결론

업데이터 클래스

Updater 텔레그램 봇을 보다 쉽게 ​​개발할 수 있도록 해주는 클래스이며 내부적으로 클래스를 사용합니다. Dispetcher. 수업 과제 Updater 봇으로부터 업데이트를 수신하는 것입니다(이전 기사에서는 이 목적으로 이 방법을 사용했습니다). getUpdates()), 이를 다음으로 더 전송합니다. Dispetcher.

차례로 Dispetcher 당신이 만든 핸들러를 포함합니다. 클래스 객체 Handler.

핸들러 - 핸들러

핸들러를 추가하면 Dispetcher 다양한 이벤트에 대한 봇의 반응. 이 글을 쓰는 시점에는 telegram.bot 다음 유형의 핸들러가 추가되었습니다.

• MessageHandler — 메시지 핸들러
• CommandHandler — 명령 핸들러
• CallbackQueryHandler — 인라인에서 전송된 키보드용 데이터 핸들러
• ErrorHandler — 봇에서 업데이트를 요청할 때 오류 처리기

봇, 명령 처리기에 첫 번째 명령을 추가합니다.

이전에 봇을 사용해 본 적이 없고 명령이 무엇인지 모르는 경우 슬래시를 사용하여 봇에 대한 명령을 전송해야 합니다. / 접두사로.

간단한 명령부터 시작하겠습니다. 봇에게 명령에 따라 인사하도록 가르치자 /hi.

코드 1: 봇에게 인사하도록 가르치기

library(telegram.bot)

# создаём экземпляр класса Updater
updater <- Updater('ТОКЕН ВАШЕГО БОТА')

# Пишем метод для приветсвия
say_hello <- function(bot, update) {

  # Имя пользователя с которым надо поздароваться
  user_name <- update$message$from$first_name

  # Отправка приветственного сообщения
  bot$sendMessage(update$message$chat_id, 
                  text = paste0("Моё почтение, ", user_name, "!"), 
                  parse_mode = "Markdown")

}

# создаём обработчик 
hi_hendler <- CommandHandler('hi', say_hello)

# добаляем обработчик в диспетчер
updater <- updater + hi_hendler

# запускаем бота
updater$start_polling()

'YOUR BOT TOKEN'을 봇을 생성할 때 받은 실제 토큰으로 바꾼 후 위의 코드 예제를 실행하세요. 봇 아버지 (저는 봇을 만드는 것에 대해 이야기했습니다. 첫 번째 기사).

방법 start_polling() 클래스 Updater코드 끝에 사용되는 는 봇에서 업데이트를 요청하고 처리하는 끝없는 루프를 시작합니다.

이제 Telegram을 열고 봇에 첫 번째 명령을 작성해 보겠습니다. /hi.

이제 우리 봇은 명령을 이해합니다. /hi, 그리고 우리에게 인사하는 방법을 알고 있습니다.

이러한 간단한 봇을 구축하는 과정을 개략적으로 표현하면 다음과 같습니다.

1. 클래스의 인스턴스 만들기 Updater;
2. 우리는 메소드를 생성합니다. 우리 봇이 수행할 기능. 코드 예제에서 이것은 함수입니다. say_hello(). 봇 메서드로 사용할 함수에는 두 가지 필수 인수가 있어야 합니다. 포구 и 최신 정보, 그리고 하나는 선택 사항입니다 - 인수. 논쟁 포구, 이것은 귀하의 봇입니다. 도움을 받아 메시지에 답장하거나, 메시지를 보내거나, 봇에서 사용할 수 있는 다른 방법을 사용할 수 있습니다. 논쟁 최신 정보 이는 봇이 사용자로부터 받은 내용입니다. 실제로 첫 번째 기사에서 다음 방법을 사용하여 받은 내용입니다. getUpdates(). 논쟁 인수 명령과 함께 사용자가 보낸 추가 데이터를 처리할 수 있습니다. 잠시 후에 이 주제로 돌아오겠습니다.
3. 우리는 핸들러를 생성합니다. 일부 사용자 작업을 이전 단계에서 생성된 메서드와 연결합니다. 기본적으로 핸들러는 일부 봇 기능을 호출하는 이벤트인 트리거입니다. 이 예에서는 이러한 트리거가 명령을 보냅니다. /hi이며 팀에서 구현합니다. hi_hendler <- CommandHandler('hi', say_hello). 첫 번째 함수 인수 CommandHandler() 우리의 경우에는 명령을 지정할 수 있습니다. hi, 봇이 응답합니다. 두 번째 인수를 사용하면 봇 메서드를 지정할 수 있습니다. 우리는 해당 메서드를 호출합니다. say_hello, 사용자가 첫 번째 인수에 지정된 명령을 호출하면 실행됩니다.
4. 다음으로 생성된 핸들러를 클래스 인스턴스의 디스패처에 추가합니다. Updater. 여러 가지 방법으로 핸들러를 추가할 수 있습니다. 위의 예에서는 기호를 사용하여 가장 간단한 방법을 사용했습니다. +즉, updater <- updater + hi_hendler. 메소드를 사용하여 동일한 작업을 수행할 수 있습니다. add_handler(), 이는 클래스에 속합니다. Dispatcher, 다음과 같이 이 방법을 찾을 수 있습니다. updater$dispatcher$add_handler();
5. 명령을 사용하여 봇을 시작하십시오. start_polling().

문자 메시지 프로세서 및 필터

우리는 봇에 명령을 보내는 방법을 알아냈지만 때로는 명령뿐만 아니라 일부 일반 문자 메시지에도 응답하기 위해 봇이 필요합니다. 이렇게 하려면 메시지 처리기를 사용해야 합니다. 메시지 핸들러.

표준 메시지 핸들러 들어오는 모든 메시지에 절대적으로 응답합니다. 따라서 메시지 처리기는 종종 필터와 함께 사용됩니다. 봇에게 명령에 의해서만 인사하는 것이 아니라 인사하도록 가르치자 /hi, 또한 봇에 보낸 메시지에 hello, hello, salute, hai, bonjour 단어 중 하나가 나타날 때마다 표시됩니다.

지금은 새로운 메소드를 작성하지 않을 것입니다. 왜냐하면... 우리는 이미 봇이 우리에게 인사하는 방법을 가지고 있습니다. 우리가 해야 할 일은 필요한 필터와 메시지 처리기를 만드는 것뿐입니다.

코드 2: 문자 메시지 처리기 및 필터 추가

library(telegram.bot)

# создаём экземпляр класса Updater
updater <- Updater('ТОКЕН ВАШЕГО БОТА')

# Пишем метод для приветсвия
## команда приветвия
say_hello <- function(bot, update) {

  # Имя пользователя с которым надо поздароваться
  user_name <- update$message$from$first_name

  # Отправляем приветсвенное сообщение
  bot$sendMessage(update$message$chat_id, 
                  text = paste0("Моё почтение, ", user_name, "!"),
                  parse_mode = "Markdown",
                  reply_to_message_id = update$message$message_id)

}

# создаём фильтры
MessageFilters$hi <- BaseFilter(function(message) {

  # проверяем, встречается ли в тексте сообщения слова: привет, здравствуй, салют, хай, бонжур
  grepl(x           = message$text, 
        pattern     = 'привет|здравствуй|салют|хай|бонжур',
        ignore.case = TRUE)
  }
)

# создаём обработчик 
hi_hendler <- CommandHandler('hi', say_hello) # обработчик команды hi
hi_txt_hnd <- MessageHandler(say_hello, filters = MessageFilters$hi)

# добаляем обработчики в диспетчер
updater <- updater + 
             hi_hendler +
             hi_txt_hnd

# запускаем бота
updater$start_polling()

'YOUR BOT TOKEN'을 봇을 생성할 때 받은 실제 토큰으로 바꾼 후 위의 코드 예제를 실행하세요. 봇 아버지 (저는 봇을 만드는 것에 대해 이야기했습니다. 첫 번째 기사).

이제 앞서 나열된 인사말이 포함된 여러 메시지를 봇에 보내 보겠습니다.

그래서 우선 우리는 봇에게 인사하는 것뿐만 아니라 인사에 응답하는 것도 가르쳤습니다. 우리는 인수를 사용하여 이 작업을 수행했습니다. reply_to_message_id, 이는 메소드에서 사용 가능합니다. sendMessage(), 응답하려는 메시지의 ID를 전송해야 합니다. 다음과 같이 메시지 ID를 얻을 수 있습니다. update$message$message_id.

하지만 우리가 한 가장 중요한 일은 다음 기능을 사용하여 봇에 필터를 추가하는 것이었습니다. BaseFilter():

# создаём фильтры
MessageFilters$hi <- BaseFilter( 

  # анонимная фильтрующая функция
  function(message) {

    # проверяем, встречается ли в тексте сообщения слова приветствия
    grepl(x           = message$text, 
          pattern     = 'привет|здравствуй|салют|хай|бонжур',
          ignore.case = TRUE)
  }

)

눈치채셨겠지만, 객체에 필터를 추가해야 합니다. 메시지 필터, 처음에는 이미 작은 기성 필터 세트가 포함되어 있습니다. 우리의 예에서는 객체에 메시지 필터 요소를 추가했습니다 hi, 이것은 새로운 필터입니다.

기능에서 BaseFilter() 필터 기능을 전달해야 합니다. 기본적으로 필터는 메시지 인스턴스를 수신하고 반환하는 함수일 뿐입니다. TRUE 또는 그릇된. 이 예에서는 기본 함수를 사용하여 간단한 함수를 작성했습니다. grepl() 메시지 텍스트를 확인하고 정규식과 일치하는지 확인합니다. привет|здравствуй|салют|хай|бонжур 반환 TRUE.

다음으로 메시지 핸들러를 만듭니다. hi_txt_hnd <- MessageHandler(say_hello, filters = MessageFilters$hi). 첫 번째 함수 인수 MessageHandler() 핸들러를 호출하는 메소드이고, 두 번째 인수는 핸들러가 호출되는 필터입니다. 우리의 경우 이것은 우리가 만든 필터입니다. MessageFilters$hi.

결국 우리는 생성된 핸들러를 디스패처에 추가합니다. hi_txt_hnd.

updater <- updater + 
             hi_hendler +
             hi_txt_hnd

위에서 쓴 것처럼 패키지에 telegram.bot 그리고 객체 메시지 필터 사용할 수 있는 기본 제공 필터 세트가 이미 있습니다.

• 모두 — 모든 메시지
• text — 문자 메시지
• 명령 — 명령, 즉 다음으로 시작하는 메시지 /
• reply — 다른 메시지에 대한 답장인 메시지
• audio — 오디오 파일이 포함된 메시지
• document — 보낸 문서가 포함된 메시지
• photo - 전송된 이미지가 포함된 메시지
• 스티커 — 보낸 스티커가 포함된 메시지
• video — 영상이 포함된 메시지
• 음성 - 음성 메시지
• contact — 사용자의 전보 내용이 포함된 메시지
• location — 지리적 위치가 포함된 메시지
• 장소 — 전달된 메시지
• 게임 — 게임

하나의 핸들러에 일부 필터를 결합하려면 기호를 사용하십시오. | - 논리적으로 또는, 그리고 서명 & 논리적으로 И. 예를 들어 봇이 비디오, 이미지 또는 문서를 수신할 때 동일한 메서드를 호출하도록 하려면 다음 예제를 사용하여 메시지 처리기를 만듭니다.

handler <- MessageHandler(callback, 
  MessageFilters$video | MessageFilters$photo | MessageFilters$document
)

매개변수가 있는 명령 추가

우리는 명령이 무엇인지, 명령을 생성하는 방법, 봇이 원하는 명령을 실행하도록 강제하는 방법을 이미 알고 있습니다. 그러나 어떤 경우에는 명령 이름 외에도 명령을 실행하기 위해 일부 데이터를 전달해야 합니다.

다음은 주어진 날짜와 국가가 주어지면 생산 달력에서 요일 유형을 반환하는 봇의 예입니다.

아래 봇은 생산 달력 API를 사용합니다. isdayoff.ru.

코드 3: 날짜 및 국가별로 보고하는 봇

library(telegram.bot)

# создаём экземпляр класса Updater
updater <- Updater('1165649194:AAFkDqIzQ6Wq5GV0YU7PmEZcv1gmWIFIB_8')

# Пишем метод для приветсвия
## команда приветвия
check_date <- function(bot, update, args) {

  # входящие данные
  day     <- args[1]  # дата
  country <- args[2]  # страна

  # проверка введённых параметров
  if ( !grepl('\d{4}-\d{2}-\d{2}', day) ) {

    # Send Custom Keyboard
    bot$sendMessage(update$message$chat_id, 
                    text = paste0(day, " - некорреткная дата, введите дату в формате ГГГГ-ММ-ДД"),
                    parse_mode = "Markdown")

  } else {
    day <- as.Date(day)
    # переводим в формат POSIXtl
    y <- format(day, "%Y")
    m <- format(day, "%m")
    d <- format(day, "%d")

  }

  # страна для проверки
  ## проверяем задана ли страна
  ## если не задана устанавливаем ru
  if ( ! country %in% c('ru', 'ua', 'by', 'kz', 'us') ) {

    # Send Custom Keyboard
    bot$sendMessage(update$message$chat_id, 
                    text = paste0(country, " - некорретктный код страны, возможнные значения: ru, by, kz, ua, us. Запрошены данные по России."),
                    parse_mode = "Markdown")

    country <- 'ru'

  }

  # запрос данных из API
  # компоновка HTTP запроса
  url <- paste0("https://isdayoff.ru/api/getdata?",
                "year=",  y, "&",
                "month=", m, "&",
                "day=",   d, "&",
                "cc=",    country, "&",
                "pre=1&",
                "covid=1")

  # получаем ответ
  res <- readLines(url)

  # интрепретация ответа
  out <- switch(res, 
                "0"   = "Рабочий день",
                "1"   = "Нерабочий день",
                "2"   = "Сокращённый рабочий день",
                "4"   = "covid-19",
                "100" = "Ошибка в дате",
                "101" = "Данные не найдены",
                "199" = "Ошибка сервиса")

  # отправляем сообщение
  bot$sendMessage(update$message$chat_id, 
                  text = paste0(day, " - ", out),
                  parse_mode = "Markdown")

}

# создаём обработчик 
date_hendler <- CommandHandler('check_date', check_date, pass_args = TRUE)

# добаляем обработчик в диспетчер
updater <- updater + date_hendler

# запускаем бота
updater$start_polling()

'YOUR BOT TOKEN'을 봇을 생성할 때 받은 실제 토큰으로 바꾼 후 위의 코드 예제를 실행하세요. 봇 아버지 (저는 봇을 만드는 것에 대해 이야기했습니다. 첫 번째 기사).

우리는 무기고에 단 하나의 방법만 가진 봇을 만들었습니다. check_date, 이 메소드는 동일한 이름의 명령에 의해 호출됩니다.

그러나 이 방법을 사용하려면 명령 이름 외에도 국가 코드와 날짜라는 두 가지 매개변수를 입력해야 합니다. 다음으로 봇은 지정된 국가의 특정 날짜가 주말인지, 단축일인지, 공식 생산 일정에 따라 근무일인지 확인합니다.

우리가 생성한 메소드가 명령과 함께 추가 매개변수를 허용하도록 하려면 인수를 사용하십시오. pass_args = TRUE 기능에서 CommandHandler(), 메서드를 생성할 때 필수 인수 외에 포구, 최신 정보 선택적인 것을 만드세요 - 인수. 이런 방식으로 생성된 메서드는 명령 이름 뒤에 봇에 전달하는 매개 변수를 허용합니다. 매개변수는 공백으로 구분되어야 하며 텍스트 벡터로 메서드에 전송됩니다.

봇을 실행하고 테스트해 보겠습니다.

백그라운드에서 봇 실행

완료해야 할 마지막 단계는 백그라운드에서 봇을 시작하는 것입니다.

이렇게 하려면 아래에 설명된 알고리즘을 따르십시오.

1. 확장자가 R인 파일에 봇 코드를 저장합니다. RStudio에서 작업할 때 메뉴를 통해 수행됩니다. 입양 부모로서의 귀하의 적합성을 결정하기 위해 미국 이민국에, 팀 다른 이름으로 저장.
2. R 언어를 설치한 폴더에 있는 bin 폴더의 경로를 Path 변수에 추가합니다. 여기에.
3. 한 줄을 쓰는 일반 텍스트 파일을 만듭니다. R CMD BATCH C:UsersAlseyDocumentsmy_bot.R... 대신에 C:사용자AlseyDocumentsmy_bot.R 봇 스크립트의 경로를 작성하세요. 동시에, 도중에 키릴 문자나 공백이 없어야 한다는 것이 중요합니다. 이로 인해 봇을 실행할 때 문제가 발생할 수 있습니다. 저장하고 확장자를 다음으로 바꾸십시오. TXT 에 박쥐.
4. 작업 스케줄러 열기 Windows이 작업을 수행하는 방법은 여러 가지가 있습니다. 예를 들어, 아무 폴더나 열고 주소를 입력하면 됩니다. %windir%system32taskschd.msc /s. 다른 시작 방법을 찾을 수 있습니다 여기에.
5. 스케줄러의 오른쪽 상단 메뉴에서 "작업 만들기..."를 클릭하세요.
6. "일반" 탭에서 작업에 사용자 정의 이름을 지정하고 스위치를 "모든 사용자에 대해 실행" 상태로 전환합니다.
7. "작업" 탭으로 이동하여 "만들기"를 클릭하세요. "프로그램 또는 스크립트" 필드에서 "찾아보기"를 클릭하고 두 번째 단계에서 생성된 프로그램을 찾습니다. 박쥐 파일을 선택하고 확인을 클릭하세요.
8. 확인을 클릭하고 필요한 경우 운영 체제 계정의 비밀번호를 입력하십시오.
9. 스케줄러에서 생성된 작업을 찾아 선택하고 오른쪽 하단에 있는 "실행" 버튼을 클릭하세요.

우리 봇은 백그라운드에서 실행되며 사용자가 작업을 중지하거나 작업이 시작된 PC 또는 서버를 끌 때까지 작동합니다.

결론

이 기사에서는 메시지를 보낼 수 있을 뿐만 아니라 들어오는 메시지와 명령에 응답할 수 있는 본격적인 봇을 작성하는 방법을 알아냈습니다. 얻은 지식은 이미 대부분의 문제를 해결하기에 충분합니다.

다음 기사에서는 보다 편리한 작업을 위해 봇에 키보드를 추가하는 방법에 대해 설명합니다.

내 구독하기 전보 и 유튜브 채널.

출처 : habr.com