Версия для печати темы
Нажмите сюда для просмотра этой темы в обычном формате
MyDC.ru _ Помощь по скриптам для PtokaX _ Скрипт: Бот который отвечает в лс
Автор: мамин_парень 10.11.2017, 11:46
Как сделать скрипт чтоб БОТ при отсылке ему в лс, отсылал лс в ответ, например меню, я хочу сделать Тех. Поддержу или типа того , при любом написание текста ему в личку получать менюшку?
Автор: Ksan 10.11.2017, 12:21
мамин_парень, текст ваш какой-то невнятный.. Напишите, что хотите получать от бота
в личку, сообщение с каким содержанием?
Автор: мамин_парень 10.11.2017, 18:26
Цитата(Ksan @ 10.11.2017, 13:21) 
мамин_парень, текст ваш какой-то невнятный.. Напишите, что хотите получать от бота
в личку, сообщение с каким содержанием?
в личку, сообщение с каким содержанием?
Исправил вопрос (браузер подвисал прост)
Содержание ТЕХ.БОТа типа такое:
список хабов внутри сети-
1. лялял
2 лялял
3. ляля
Частый вопросы -
Почему это..
Почему то....
Примернинько так но тока красивее
Автор: dimetro 10.11.2017, 19:43
Цитата(мамин_парень @ 10.11.2017, 18:26)
Исправил вопрос (браузер подвисал прост)
Содержание ТЕХ.БОТа типа такое:
список хабов внутри сети-
1. лялял
2 лялял
3. ляля
Частый вопросы -
Почему это..
Почему то....
Примернинько так но тока красивее
Содержание ТЕХ.БОТа типа такое:
список хабов внутри сети-
1. лялял
2 лялял
3. ляля
Частый вопросы -
Почему это..
Почему то....
Примернинько так но тока красивее
тебе уже делали бота, который рассылает всем в лс сообщение при написании боту в приват.. там чуть изменить, можнож и самому )
CODE
bot = "Почтальон2"
botDesc = "Бот - gjvjoybr" --Описание бота
botTag = "Version 2.0" --Тэг бота
botEmail = "your@mail.me" --еМайл бота
OnStartup = function()
Core.RegBot(bot, botDesc.."<"..botTag..">", botEmail, true)
end
ToArrival = function(user, data)
data = data:sub(1,-2)
local sBot, nick, msg = data:match"$To:%s+(%S+)%s+From:%s+(%S+)%s+$%b<>%s+(.*)"
if sBot == bot then
Core.SendPmToUser(user, bot, "\n\t\t ЗДЕСЬ пишем тест и \r\n\t\t офрмлениие делаем сами.")
return true
end
end
botDesc = "Бот - gjvjoybr" --Описание бота
botTag = "Version 2.0" --Тэг бота
botEmail = "your@mail.me" --еМайл бота
OnStartup = function()
Core.RegBot(bot, botDesc.."<"..botTag..">", botEmail, true)
end
ToArrival = function(user, data)
data = data:sub(1,-2)
local sBot, nick, msg = data:match"$To:%s+(%S+)%s+From:%s+(%S+)%s+$%b<>%s+(.*)"
if sBot == bot then
Core.SendPmToUser(user, bot, "\n\t\t ЗДЕСЬ пишем тест и \r\n\t\t офрмлениие делаем сами.")
return true
end
end
Вот выше код исправленный!
На будущее сам хоть немного подумай
Автор: мамин_парень 11.11.2017, 5:57
Дай Бог тебе здоровья