добавление НоваяКнопкаОтправитьКонтакт

добавление НоваяКнопкаОтправитьМестоположение добавлена возможность отправлять уведомления добавление НовыйПринудительныйОтвет
pallid · Jun 20, 2018 · dabcc05 · dabcc05
1 parent a74c553
commit dabcc05
Show file tree

Hide file tree

Showing 3 changed files with 53 additions and 2 deletions.
diff --git a/opm-metadata.xml b/opm-metadata.xml
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="utf-8"?>
 <opm-metadata xmlns="http://oscript.io/schemas/opm-metadata/1.0">
     <name>telegrambot</name>
-    <version>0.0.2</version>
+    <version>0.0.3</version>
     <depends-on name="json" />
     <depends-on name="logos" />
 </opm-metadata>
diff --git a/src/ТелеграмАПИ.os b/src/ТелеграмАПИ.os
@@ -20,6 +20,24 @@
 
 КонецФункции
 
+Функция НоваяКнопкаОтправитьКонтакт(ТекстКнопки) Экспорт
+
+	Соответствие = НоваяКнопка(ТекстКнопки) ;
+	Соответствие.Вставить("request_contact", Истина);
+
+	Возврат Соответствие;
+
+КонецФункции
+
+Функция НоваяКнопкаОтправитьМестоположение(ТекстКнопки) Экспорт
+
+	Соответствие = НоваяКнопка(ТекстКнопки) ;
+	Соответствие.Вставить("request_location", Истина);
+
+	Возврат Соответствие;
+
+КонецФункции
+
 // для инлайн клавиатуры
 Функция НоваяУРЛКнопка(ТекстКнопки, УРЛ) Экспорт
 
@@ -128,6 +146,21 @@
 
 КонецФункции
 
+Функция НовыйКоллбекОтветНаЗапрос(ЗапросИД, Текст, ПоказыватьУведомление = Ложь, УРЛ = Неопределено) Экспорт
+
+	Ответ = Новый Соответствие;
+	Ответ.Вставить("callback_query_id", ЗапросИД);
+	Ответ.Вставить("text", Текст);
+	Ответ.Вставить("show_alert", ПоказыватьУведомление);
+
+	Если УРЛ <> Неопределено Тогда
+		Ответ.Вставить("url", УРЛ);
+	КонецЕсли;
+
+	Возврат Ответ;
+
+КонецФункции
+
 Функция РедактироватьТекст(Сообщение, ТекстСообщения) Экспорт
 
 	Сообщение.Вставить("text", ТекстСообщения);
@@ -146,4 +179,15 @@
 
 	Сообщение.Вставить("parse_mode", Формат);
 
-КонецПроцедуры
+КонецПроцедуры
+
+Функция НовыйПринудительныйОтвет(Избирательно = Ложь) Экспорт
+
+	СоответствиеВнутреннее  = Новый Соответствие;
+
+	СоответствиеВнутреннее.Вставить("force_reply", Истина);
+	СоответствиеВнутреннее.Вставить("selective", Избирательно);
+
+	Возврат СоответствиеВнутреннее;
+
+КонецФункции
diff --git a/src/ТелеграмБот.os b/src/ТелеграмБот.os
@@ -95,6 +95,13 @@
 
 КонецФункции
 
+Функция ОправитьОтветНаКоллбекЗапрос(Сообщение) Экспорт
+
+	Команда = "answerCallbackQuery";
+	Возврат ОтправитьДанные(Сообщение, Команда);
+
+КонецФункции
+
 #КонецОбласти
 
 #Область СлужебныеПроцедурыИФункции