वोल्फग्राम क्लाउड में टेलीग्रामबॉट

परिचय

वह समय बीत चुका है जब हब्रब्र पर हर दूसरा लेख अपने टेलीग्राम बॉट को लिखने के लिए समर्पित था। इसके अलावा, समय की एक अवधि बीत गई जब कठिनाइयों के बिना बॉट आपके कंप्यूटर या रूस में होस्टिंग पर रखा जा सकता है। छह महीने पहले, मेरा बॉट सिर्फ एक लैपटॉप पर शुरू हुआ था और एपीआई से जुड़ने में किसी भी समस्या का अनुभव नहीं किया था। लेकिन अब, जब मैंने उसे काम पर वापस लाने के बारे में सोचा, तो मैंने महसूस किया कि यह इतना आसान नहीं होगा। मैं प्रॉक्सी सर्वर को खोजना और कॉन्फ़िगर नहीं करना चाहता था, और इससे भी अधिक विदेश में। इसके अलावा, इससे पहले कि मैंने वुल्फ्राम भाषा में बॉट लिखा था और मुझे पता नहीं था कि प्रॉक्सी सर्वर के साथ भाषा कैसे काम करती है, क्योंकि मैंने अभी तक उनका उपयोग नहीं किया है। और फिर एक महान विचार आया! वुल्फ्राम क्लाउड का उपयोग करें। इस लेख में मैं यह बताना चाहता हूं कि पंजीकरण के साथ कितना सरल है, लेकिन एसएमएस के बिना आप वुल्फराम भाषा में लिखे गए अपने सरल टेलीग्राम बॉट को शुरू कर सकते हैं। टूल्स में से आपको केवल एक ब्राउज़र की आवश्यकता है।

वुल्फ्राम बादल के बारे में थोड़ा सा

क्लाउड तक पहुंचने के लिए आपको वुल्फ्राम अकाउंट बनाने की आवश्यकता है। ऐसा करने के लिए, https://account.wolfram.com पर जाएं और Create One बटन पर क्लिक करने के बाद निर्देशों का पालन करें।

किए गए सभी जोड़तोड़ के बाद, https://www.wolframcloud.com पर क्लाउड के मुख्य पृष्ठ पर सभी उत्पादों और उनके उपयोग की योजनाएं प्रदर्शित की जाएंगी। आपको डेवलपमेंट प्लेटफ़ॉर्म चुनना होगा और एक नया नोटबुक बनाना होगा।

बाद में दिए गए सभी कोड को इस विशेष क्लाउड नोटबुक में निष्पादित किया जाएगा।

टेलीग्राम बॉट्स के बारे में काफी कुछ

उनके लिए समर्पित कई लेख हैं। यहां केवल यह कहना आवश्यक है कि आगे की सभी क्रियाएं करने से पहले, बॉट को मानक तरीके से बनाया जाना चाहिए। यही है, बस @BotFather bot के साथ एक चैट शुरू करें और उसे कमांड भेजें:

/newbot 

फिर आपको बस निर्देशों का पालन करने और नाम दर्ज करने और लॉगिन करने की आवश्यकता है। उसका नाम वोल्फ्रम क्लाउड बॉट और लॉगिन @ वुल्फ्रेमक्लाड 5973827Bot है।

एपीआई कार्यान्वयन

हम @BotFather की सिफारिशों का लाभ उठाते हैं और टेलीग्राम बॉट्स के HTTP एपीआई की संक्षिप्त जांच करते हैं। संपूर्ण API को कार्यान्वित करने का कार्य अभी तक इसके लायक नहीं है। एक बॉट लिखने के लिए, केवल एक छोटा सा हिस्सा पर्याप्त है। जांचें कि एपीआई सुलभ है और ऊपर निर्दिष्ट टोकन के साथ बॉट मौजूद है। ऐसा करने के लिए, बस एक पंक्ति करें:

 URLExecute["https://api.telegram.org/bot753681357:AAFqdRFN_QoODJxsBy3VN2sVwWTPKJEqteY/getMe"] 

 {"ok" -> True, "result" -> {"id" -> 753681357, "is_bot" -> True, "first_name" -> "Wolfram Cloud Bot", "username" -> "WolframCloud5973827Bot"}} 

ऊपर का आदेश वुल्फराम भाषा से एक HTTP अनुरोध करने का सबसे आसान तरीका है। लेकिन चलो इसे थोड़ा जटिल करते हैं ताकि अन्य सभी एपीआई तरीकों को लागू करना आसान हो। आइए एक एपीआई अनुरोध को निष्पादित करने के लिए एक सामान्य विधि बनाएं:

 TelegramBot::usage = "TelegramBot[token]"; $telegramAPI = "https://api.telegram.org"; telegramExecute[ TelegramBot[token_String], method_String, parameters: {(_String -> _)...}: {} ] := Module[{ request, requestURL, requestRules, requestBody, response, responseBody }, requestURL = URLBuild[{$telegramAPI, "bot" <> token, method}]; requestRules = DeleteCases[parameters, _[_String, Automatic | Null | None]]; requestBody = ImportString[ExportString[requestRules, "JSON"], "Text"]; request = HTTPRequest[requestURL, <| Method -> "POST", "ContentType" -> "application/json; charset=utf-8", "Body" -> requestBody |>]; response = URLRead[request]; responseBody = response["Body"]; Return[ImportString[responseBody, "RawJSON"]] ] 

जांचें कि क्या यह पहले से ही परीक्षण की गई विधि पर काम करता है:

 token = "753681357:AAFqdRFN_QoODJxsBy3VN2sVwWTPKJEqteY"; bot = TelegramBot[token]; telegramExecute[bot, "getMe"] 

 <|"ok" -> True, "result" -> <|"id" -> 753681357, "is_bot" -> True, "first_name" -> "Wolfram Cloud Bot", "username" -> "WolframCloud5973827Bot"|>|> 

बहुत बढ़िया। चलो बॉट चेक करने के लिए एक अलग फ़ंक्शन बनाते हैं:

• getMe - बॉट जानकारी

 getMe::usage="getMe[bot]"; TelegramBot /: getMe[bot_TelegramBot] := telegramExecute[bot, "getMe"] getMe[bot] 

 <|"ok" -> True, "result" -> <|"id" -> 753681357, "is_bot" -> True, "first_name" -> "Wolfram Cloud Bot", "username" -> "WolframCloud5973827Bot"|>|> 

अब, इसी तरह, यह उन मूल तरीकों को जोड़ने के लिए है जो क्लाउड में बॉट बनाने के लिए आवश्यक हैं:

• getUpdates - बॉट को लिखे गए सभी नवीनतम संदेश प्राप्त करता है

 getUpdates::usage = "getUpdates[bot, opts]"; Options[getUpdates] = { "offset" -> Automatic, "limit" -> Automatic, "timeout" -> Automatic, "allowed_updates" -> Automatic }; TelegramBot /: getUpdates[bot_TelegramBot, opts: OptionsPattern[getUpdates]] := telegramExecute[bot, "getUpdates", Flatten[{opts}]] 

• setWebhook - प्रोसेसिंग अपडेट के लिए सर्वर एड्रेस सेट करता है

 setWebhook::usage = "setWebhook[bot, url, opts]"; Options[setWebhook] = { "certificate" -> Automatic, "max_connections" -> Automatic, "allowed_updates" -> Automatic }; TelegramBot /: setWebhook[bot_TelegramBot, url_String, opts: OptionsPattern[setWebhook]] := telegramExecute[bot, "setWebhook", Join[{"url" -> url}, Flatten[{opts}]]] 

• deleteWebhook - एक हैंडलर निकालता है

 deleteWebhook::usage = "deleteWebhook[bot]"; TelegramBot /: deleteWebhook[bot_TelegramBot] := telegramExecute[bot, "deleteWebhook"] 

• getWebhookInfo - हैंडलर के बारे में जानकारी

 getWebhookInfo::usage = "getWebhookInfo[bot]"; TelegramBot /: getWebhookInfo[bot_TelegramBot] := telegramExecute[bot, "getWebhookInfo"] 

• sendMessage - एक चैट संदेश भेजें

 sendMessage::usage = "sendMessage[bot, chat, text]"; Options[sendMessage] = { "parse_mode" -> Automatic, "disable_web_page_preview" -> Automatic, "disable_notification" -> Automatic, "reply_to_message_id" -> Automatic, "reply_markup" -> Automatic }; TelegramBot /: sendMessage[bot_TelegramBot, chat_Integer, text_String, opts: OptionsPattern[sendMessage]] := telegramExecute[ bot, "sendMessage", Join[{"chat_id" -> chat, "text" -> text}, Flatten[{opts}]] ] 

एपीआई का न्यूनतम संस्करण तैयार है। आइए देखें कि संदेश भेजना और अपडेट प्राप्त करना कैसे काम करता है। ऐसा करने के लिए, हमारे बॉट के साथ एक चैट बनाएं। जब बॉट बनाया जाता है, तो पहला संदेश / स्टार्ट टेक्स्ट के साथ भेजा जाएगा। आइए देखें कि क्या यह अपडेट की सूची में शामिल है:

 updates = getUpdates[bot] 

 <|"ok" -> True, "result" -> {<|"update_id" -> 570790461, "message" -> <|"message_id" -> 1, "from" -> <|"id" -> 490138492, "is_bot" -> False, "first_name" -> "Kirill", "last_name" -> "Belov", "username" -> "KirillBelovTest"|>, "chat" -> <|"id" -> 490138492, "first_name" -> "Kirill", "last_name" -> "Belov", "username" -> "KirillBelovTest", "type" -> "private"|>, "date" -> 1542182547, "text" -> "/start", "entities" -> {<|"offset" -> 0, "length" -> 6, "type" -> "bot_command"|>}|>|>}|> 

आप अद्यतन की सूची से नवीनतम अद्यतन डेटा प्राप्त कर सकते हैं:

 lastUpdate = updates["result"][[-1]] 

 <|"update_id" -> 570790461, "message" -> <|"message_id" -> 1, "from" -> <|"id" -> 490138492, "is_bot" -> False, "first_name" -> "Kirill", "last_name" -> "Belov", "username" -> "KirillBelovTest"|>, "chat" -> <|"id" -> 490138492, "first_name" -> "Kirill", "last_name" -> "Belov", "username" -> "KirillBelovTest", "type" -> "private"|>, "date" -> 1542182547, "text" -> "/start", "entities" -> {<|"offset" -> 0, "length" -> 6, "type" -> "bot_command"|>}|>|> 

और यह है कि आप उस चैट को प्राप्त कर सकते हैं जिससे संदेश आया था और संदेश पाठ स्वयं:

 chat = lastUpdate["message", "chat", "id"] text = lastUpdate["message", "text"] 

 490138492 /start 

जैसा कि आप परिणाम से देख सकते हैं, सब कुछ जगह में है। अब हम SendMessage का उपयोग करके बॉट की ओर से एक संदेश भेजेंगे।

 sendMessage[bot, chat, "hello"] 

 <|"ok" -> True, "result" -> <|"message_id" -> 2, "from" -> <|"id" -> 753681357, "is_bot" -> True, "first_name" -> "Wolfram Cloud Bot", "username" -> "WolframCloud5973827Bot"|>, "chat" -> <|"id" -> 490138492, "first_name" -> "Kirill", "last_name" -> "Belov", "username" -> "KirillBelovTest", "type" -> "private"|>, "date" -> 1542182601, "text" -> "hello"|>| > 

सामान्य तौर पर, फ़ंक्शन का यह सेट पहले से ही पर्याप्त है। हालांकि, गेटअपडेट्स विधि का उपयोग करना बहुत सुविधाजनक नहीं है। आपको webhook का उपयोग करके संदेशों को संभालने का एक तरीका आना चाहिए।

वेबहुक बनाना

वोल्राम लैन्गॉज का एक विशेष प्रकार का फ़ंक्शन है जो एपीफ़ंक्शन का उपयोग करके बनाया गया है। यहाँ इनमें से एक का उदाहरण दिया गया है:

 apiFunc = APIFunction[{"n" -> "Integer"}, Plot[Sin[#n * x], {x, -2Pi, 2Pi}]&, "PNG"]; apiFunc[{"n"->3}] 

इन विशेषताओं को विशेष रूप से क्लाउड में परिनियोजन के लिए डिज़ाइन किया गया है। यह फ़ंक्शन इनपुट के रूप में एक अनुरोध पैरामीटर स्वीकार करेगा। इसे क्लाउड में परिनियोजित करने के लिए, केवल फ़ंक्शन को क्लाउडडेप्लो पर स्थानांतरित करें।

 apiObject = CloudDeploy[apiFunc, "Deploy/apiObject"] 

 CloudObject[https://www.wolframcloud.com/objects/kirillbelovtest/apiObject] 

फिर आप ब्राउज़र में लिंक का अनुसरण कर सकते हैं और एक क्वेरी पैरामीटर जोड़ सकते हैं:

ऊपर दिए गए फ़ंक्शन ने अनुरोध पैरामीटर को संभाला। तो आपको टेलीग्राम बॉट से आने वाले HTTP रिक्वेस्ट के बॉडी को अपडेट ऑब्जेक्ट के रूप में प्रोसेस करने के लिए एक ही फंक्शन बनाने की जरूरत है। पता उत्पन्न करने के लिए, हम क्लाउड ऑब्जेक्ट तक पहुंचने के लिए एक टोकन का उपयोग करते हैं जो अधिक कठिन था। आपको यह भी इंगित करना होगा कि ऑब्जेक्ट की सार्वजनिक पहुंच है, अन्यथा टेलीग्राम वेबहूक पर नहीं मिल पाएंगे।

 deployWebhook[bot_TelegramBot, handler_] := CloudDeploy[APIFunction[{}, handler[HTTPRequestData["Body"]] &], "Deploy/Webhooks/" <> Hash[bot, "SHA", "HexString"], Permissions -> "Public" ] 

हैंडलर एक और फंक्शन हैंडलर है। हैंडलर अनुरोध निकाय के स्ट्रिंग को एक एसोसिएशन में बदल दें, वहां से चैट पहचानकर्ता प्राप्त करें और "हैलो" शब्द वापस भेजें।

 handlerHello[bot_TelegramBot][body_String] := Block[{json = ImportString[body, "RawJSON"], chat}, chat = json["message", "chat", "id"]; sendMessage[bot, chat, "hello"]; ] 

अब बादल में फंकी तैनात करें।

 webhookObject = deployWebhook[bot, handlerHello[bot]] 

 CloudObject[https://www.wolframcloud.com/objects/kirillbelovtest/Deploy/Webhooks/b9bd74f89348faecd6b683ba02637dd4d4028a28] 

और आखिरी कदम इस वस्तु के पते को टेलीग्राम बॉट में स्थानांतरित करना है।

 setWebhook[bot, webhookObject[[1]]] 

 <|"ok" -> True, "result" -> True, "description" -> "Webhook was set"|> 

अब हम बॉट के लिए कुछ लिखेंगे और देखेंगे कि यह क्या कहता है:

संवाद को वैध माना जा सकता है। किसी मौजूदा हैंडलर के तर्क को बदलने के लिए, बस क्लाउड ऑब्जेक्ट को पुनः डिज़ाइन करें। उसी समय, बॉट के लिए एक वेबहूक स्थापित करना अब आवश्यक नहीं है।

उत्तरों का तर्क

वुल्फ्राम क्लाउड में बॉट बनाने की प्रक्रिया में यह अंतिम भाग होगा। आगे, उसी तरह, आप तर्क को जटिल कर सकते हैं और नए एपीआई तरीके जोड़ सकते हैं। अब संवाद के बारे में ही। मान लीजिए कि / स्टार्ट कमांड भेजने के बाद, बॉट "हैलो" प्रतिक्रिया देता है और उपयोगकर्ता के कीबोर्ड को बदलता है। कीबोर्ड में केवल दो बटन रहते हैं: "हैलो" और "आप कौन हैं?" हमें एक संघ के रूप में संवाद का एहसास है। उपयोगकर्ता द्वारा बॉट को भेजे जाने वाले कमांड की कुंजी होगी। प्रमुख मूल्य बॉट प्रतिक्रिया और नए कीबोर्ड हैं। इस मामले में, कई चाबियाँ और बटन बिल्कुल मेल खाना चाहिए। अन्यथा, एक स्थिति उत्पन्न हो सकती है जब बॉट को पता नहीं है कि क्या जवाब देना है। ऐसे मामलों में, निश्चित रूप से, आप एक डिफ़ॉल्ट उत्तर जोड़ सकते हैं।

 keyboard[buttons : {__String}] := {"keyboard" -> {Table[{"text" -> button}, {button, buttons}]}, "resize_keyboard" -> True} $answers = <| (*user_text-><|"answer"->bot_text,"keyboard"->next_text|>*) "/start"-><|"answer"->"","keyboard"-> keyboard[{""," ?"}]|>, ""-><|"answer"->" ?", "keyboard" -> keyboard[{" ?"}]|> , " ?"-><|"answer"->"", "keyboard" -> keyboard[{""}]|> , " ?"-><|"answer"->"   Wolfram Language   ", "keyboard"->keyboard[{" ?"," ?"}]|> , " ?"-><|"answer"->"   :\nhttps://habr.com/post/422517/", "keyboard"->keyboard[{""," ?"}]|> , " ?"-><|"answer"->"  :\n@KirillBelovTest", "keyboard"->keyboard[{" ?",""}]|> , ""-><|"answer"->"", "keyboard"->keyboard[{""," ?"}]|> |>; answer[text_String] /; KeyExistsQ[$answers, text] := $answers[text] 

अब एक हैंडलर बनाएं:

 handlerAbout[bot_TelegramBot][body_String] := Block[{json = ImportString[body, "RawJSON"], chat, text}, chat = json["message", "chat", "id"]; text = json["message", "text"]; sendMessage[bot, chat, answer[text]["answer"], "reply_markup" -> answer[text]["keyboard"]]; ] 

और क्लाउड ऑब्जेक्ट को फिर से तैयार करें:

 deployWebhook[bot, handlerAbout[bot]]; 

आइए देखें कि बॉट के साथ बातचीत में क्या हुआ। लेकिन पहले, संदेश इतिहास को स्पष्ट करें:

कार्य विस्तार

अब तक, मौजूदा बॉट की भारी संख्या से कोई बुनियादी अंतर नहीं हैं। शायद इसे पीने का कोई मतलब नहीं है? ऊपर किए गए सभी कार्यों का अर्थ होगा, यदि आप समझते हैं कि ऐसे बॉट के फायदे क्या हैं! आखिरकार, वह वुल्फ्राम लैंग्वेज और वोल्फ्रैम क्लाउड की सभी विशेषताओं का उपयोग कर सकता है। क्या रोबोट के लिए समीकरणों को हल करना आवश्यक है? यह बहुत आसान है! आपको बस उत्तर को फिर से परिभाषित करने की आवश्यकता है!

 answer[text_String]["keyboard"] /; StringContainsQ[text, "  "] := Automatic answer[text_String]["answer"] /; StringContainsQ[text, "  "] := ToString[Flatten[Block[{args = StringSplit[text, "  "]}, Solve[ToExpression[args[[1]]], ToExpression[args[[2]]]] ]]] deployWebhook[bot, handlerAbout[bot]]; 

यदि किसी को अतिरिक्त रूप से क्लाउड की क्षमताओं में रुचि है, तो इसकी कार्यक्षमता का एक अच्छा विवरण यहां है ।

प्रतिबंध

वोल्फ्राम क्लाउड एक ऐसा मंच है जो आपको मुफ्त में वुल्फ्राम भाषा का उपयोग करने की अनुमति देता है, जबकि वोल्फ्राम रिसर्च का मुख्य उत्पाद, मैथेमेटिका, पैसा खर्च करता है। तदनुसार, उपयोग पर प्रतिबंध हैं और मेरी राय में वे बहुत मजबूत हैं। विकास मंच के मुफ्त संस्करण का उपयोग करते समय, एक उपयोगकर्ता को प्रति माह 1000 क्लाउड क्रेडिट दिए जाते हैं। प्रत्येक क्लाउड ऋण एक अलग प्रकार की गणना करने के लिए समय देता है। चूंकि आलेख CloudDeploy + APIFunction के बारे में बात करता है, इसलिए क्लाउड में संग्रहीत ऐसी वस्तुएँ कंप्यूटिंग समय के 0.1 सेकंड में 1 क्रेडिट खर्च करती हैं। यह गणना करना आसान है कि उपयोगकर्ता को अपने एप्लिकेशन के संचालन के लिए केवल 1 मिनट और 40 सेकंड का सर्वर समय दिया जाता है (इस मामले में, बॉट)। मुझे यहां जोड़ने के लिए कुछ भी नहीं है - यह बहुत, बहुत छोटा है। मुख्य जोर उन उपयोगकर्ताओं पर है जो एक ब्राउज़र का उपयोग करके डेवलपमेंट प्लेटफ़ॉर्म में स्वतंत्र रूप से काम करते हैं। दरअसल, इस मोड में कोई समय सीमा नहीं है, लेकिन केवल सत्र की अवधि और आवंटित संसाधनों के अनुसार। इस उपयोग के साथ, विकास मंच लगभग पूर्ण गणितज्ञ है, लेकिन स्थापना और लाइसेंस की आवश्यकता नहीं है।

→ वुल्फ्राम क्लाउड में अनुच्छेद और कोड