Автор: Vizunchik 7.1.2011, 18:13
Название: Weather
Описание скрипта: Выводит в чат Прогноз погоды
Переписан под Verlihub: Vizunchik ps Akvilon
Библиотека: Для работы скрипта требуется библиотека LuaSocket
Изменения:
- Добавил возможность для вывода погоды для нескольких городов
- По просьбам перевёл дни недели и месяцы
- Улучшил способ добавления городов
- Теперь меню автоматический будет создаваться по таблице городов
Настройки скрипта:Код
--Ниже находится то, что можно настраивать
local sBotName = "" -- Имя бота. Если "" то имя основного бота хаба.
local sMenu = "Меню хаба\\Погода\\" -- Название меню
local sMenuOn = false -- Включить либо Выключить Меню ( false - Выключить / true - Включить)
local sMinClass = 1 -- Минимальный класс пользователей, которым доступен меню
local sCmdWeat = "погода" -- Команда для получения погоды
local iExpireTimeSuccess = 60*60*6 -- 6 часов Время обновления в случае удачного получения данных
local iExpireTimeFail = 60*30 -- 1 минута - Интервал повторения попыток, если получить данные не удалось
local lVirScriptMaxTimer = 60*5 -- минимальный интервал повторного запроса (в секундах)
local sUpChar="•" -- Символ-заполнитель верхней и нижней строк
local iUpChar = 75*4 -- Кол-во символов-заполнителей верхней и нижней строк. Нужно подобрать, если будет изменен символ-заполнитель.
local sMidChar = "" -- Символ-заполнитель для разделителя. У меня убрано, т.к. мне кажется, что мешает.
local iMidChar = 152 -- Кол-во символов-заполнителей разделителя. Нужно подобрать, если будет изменен символ-заполнитель.
tCities = { -- Здесь вы пишите Ваш город и код города.
["Уфа"] = "28722",
["Ишимбай"] = "99741",
["Нефтекамск"] = "99975",
["Оренбург"] = "35121",
["Орск"] = "35138",
["Октябрьский"] = "28429",
["Салават"] = "99418",
["Стерлитамак"] = "28825",
}
--Выше находится то, что можно настраивать
Код
[20:12:17] <Погода>
•••••••••••••••••••••••••••••••••••••••••••••••ПРОГНОЗ ПОГОДЫ••••••••••••••••••••••••••••••••••••••••••••••
Уфа: День 17 Ноября, Четверг Пасмурно, температура -5..-7 С, давление 741..743 мм рт.ст., ветер Западный, 3 м/с
Уфа: Вечер 17 Ноября, Четверг Пасмурно, температура -9..-11 С, давление 741..743 мм рт.ст., ветер Южный, 3 м/с
Уфа: Ночь 18 Ноября, Пятница Пасмурно, температура -7..-9 С, давление 738..740 мм рт.ст., ветер Южный, 6 м/с
Уфа: Утро 18 Ноября, Пятница Пасмурно, температура -6..-8 С, давление 734..736 мм рт.ст., ветер Южный, 6 м/с
•••••••••••••••••••••••••••••••••••••••••••••••ПРОГНОЗ ПОГОДЫ••••••••••••••••••••••••••••••••••••••••••••••
В файле codes_for_towns.txt коды городов