myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 
2 страниц V   1 2 >  
Ответить в данную темуНачать новую тему

> Джинглы "русского Радио", API2 | Вывод случайного джингла из текст.базы

Теги
Нет тегов для показа
SCALOlaz
сообщение 25.12.2008, 20:50
Сообщение #1


Начинающий
*

Группа: Пользователи
Сообщений: 21
Регистрация: 17.11.2008
Пользователь №: 1 116
Спасибо сказали: 9 раз




Джинглы "Русского Радио"
v.0.4
By SCALOlaz
API2
Исправлено 27.12.2008
(для тех кому лень качать снова, в скрипте перед function OpConnected(user) добавьте RegConnected=UserConnected)
Цитата
RegConnected=UserConnected -- Вот это ДОБАВИТЬ!!!

function OpConnected(user)
Core.GetUserAllData(user)
...


Поискал для сервера скрипт вывода анекдотов, ничего путного не нашел - все скрипты юзают внутренние массивы. Набросал небольшой скрипт, читающий строку из внешней текстовой базы. Делюсь с вами big_smile.gif
Скрипт выводит в чат случайную фразу (строку) с определенным интервалом. По умолчанию - 45 минут чтобы не флудил если в чате мало народу.
Прикрепленный файл  Jingles_0.4_API2.rar ( 29.01 килобайт ) Кол-во скачиваний: 429
(в архиве скрипт + база на 1311 фраз)
Прикрепленный файл  Jingles_0.4.lua ( 3.77 килобайт ) Кол-во скачиваний: 102
(отдельно скрипт)

- Управление через меню: Вкл/Выкл бота, Информация о боте. Для пользователей - вывод Джингла вручную
- Вывод Джингла пользователю при входе
- В автоматическом режиме количество Джинглов не выдается
- Исправлена ошибка разделения авторежима и ручного вывода
- Фикс: Джинглы могли видеть либо НЕзарегистрированные, либо администрация. ))
- Фикс: путь к базе by Wariner


Вид в ручном режиме:
Цитата
[02:36:19] <ДжинглBells> [ 212 : 1311 ]: Три дня скакал Иван Царевич. Пока скакалку не отобрали.

Чуть не забыл о настройке:
Цитата
INFBot = "ДжинглBells" -- Имя бота
INFPatch = "scripts/JINGLES/jingles.txt" -- Путь к текстовой базе
INFTimer = 45 -- Интервал в минутах
Удачи!

ЗЫ:
В базе первая строка зарезервирована под ремарку/описание. Тоесть скрипт ее читать не будет!
При обновлении скрипта, удалите предыдущую версию (чтобы не загромождать список скриптов), и в хабе нажмите CTRL+R
Вместо базы Джинглов можно использовать любую другую, где фраза ограничена одной строкой
Почитал правила )) Искаверкал пост, вроде все как положено ))


Спасибо сказали:
Go to the top of the page
+Quote Post
fly
сообщение 26.12.2008, 14:03
Сообщение #2


Начинающий
*

Группа: Пользователи
Сообщений: 20
Регистрация: 27.6.2008
Пользователь №: 90
Спасибо сказали: 3 раза




PtokaX 0.4.1.1
......\scripts\Jingles_0.4.lua:87: bad argument #2 to 'random' (interval is empty)
Go to the top of the page
+Quote Post
D'aspid
сообщение 26.12.2008, 17:14
Сообщение #3


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 280
Регистрация: 4.6.2008
Из: Россия
Пользователь №: 10
Спасибо сказали: 42 раза




Цитата
Управление через меню: Вкл/Выкл бота, Информация о боте. Для пользователей - вывод Джингла вручную

Где это меню?
Go to the top of the page
+Quote Post
SCALOlaz
сообщение 26.12.2008, 19:14
Сообщение #4


Начинающий
*

Группа: Пользователи
Сообщений: 21
Регистрация: 17.11.2008
Пользователь №: 1 116
Спасибо сказали: 9 раз




Цитата(fly @ 26.12.2008, 15:03) *
PtokaX 0.4.1.1
......\scripts\Jingles_0.4.lua:87: bad argument #2 to 'random' (interval is empty)

А вы уверены что у вас в наличии папка с базой? Будьте добры - путь scripts/JINGLES/jingles.txt Посмотрите на месте ли файл.
Другой вариант - вы самостоятельно заменили этот файл, но в нем всего одна (1) строка. Если открытый в блокноте файл выводит много строк - это еще не факт что в конце каждой стоит знак перевода каретки.

Цитата(Infernus-pro @ 26.12.2008, 18:14) *
Где это меню?

По правой клавише грызуна. Не зря рекомендуется давить сочетание CTRL+R, ибо только после перезахода появляются новые пункты в меню, это же касается ситуации, когда вам прикрутили права опа,модера а вы не знаете что с этим делать.
Вот скрины:
Прикрепленные файлы
Прикрепленный файл  002.jpg ( 16.78 килобайт ) Кол-во скачиваний: 188
Прикрепленный файл  001.jpg ( 13.19 килобайт ) Кол-во скачиваний: 176
 
Go to the top of the page
+Quote Post
fly
сообщение 26.12.2008, 20:13
Сообщение #5


Начинающий
*

Группа: Пользователи
Сообщений: 20
Регистрация: 27.6.2008
Пользователь №: 90
Спасибо сказали: 3 раза




Папка на месте, текстовый файл на месте. Ничего не менялось. )))))))
Go to the top of the page
+Quote Post
Wariner
сообщение 26.12.2008, 20:35
Сообщение #6


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




Если папка и файл на месте, а так же в файле есть несколько строчек инфы, то попробуй прописать пути:
Код
INFPatch = Core.GetPtokaXPath().."scripts/JINGLES/jingles.txt"


PS хотя у меня вроде работало(долго не тестил)
Go to the top of the page
+Quote Post
SCALOlaz
сообщение 26.12.2008, 21:00
Сообщение #7


Начинающий
*

Группа: Пользователи
Сообщений: 21
Регистрация: 17.11.2008
Пользователь №: 1 116
Спасибо сказали: 9 раз




Цитата(fly @ 26.12.2008, 21:13) *
Папка на месте, текстовый файл на месте. Ничего не менялось. )))))))

Ну если приведенный выше пример пути не поможет, есть только одно логичное объяснение: у вас в каком-то скрипте уже используется переменная "INFcount.
Увы, я использую flylinkdc++370, и собственно на нем тестирую все скрипты. И подобной ошибки не наблюдал, иначе бы пофиксил.
Go to the top of the page
+Quote Post
intlive
сообщение 26.12.2008, 21:01
Сообщение #8


Продвинутый участник
****

Группа: Пользователи
Сообщений: 134
Регистрация: 18.6.2008
Из: подземелье
Пользователь №: 41
Спасибо сказали: 7 раз




Спасибо, классная штука feel_good.gif
Go to the top of the page
+Quote Post
D'aspid
сообщение 26.12.2008, 21:30
Сообщение #9


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 280
Регистрация: 4.6.2008
Из: Россия
Пользователь №: 10
Спасибо сказали: 42 раза




Цитата
По правой клавише грызуна. Не зря рекомендуется давить сочетание CTRL+R, ибо только после перезахода появляются новые пункты в меню, это же касается ситуации, когда вам прикрутили права опа,модера а вы не знаете что с этим делать.

Поверь я прекрасно все это знаю big_smile.gif Дело в том что я скачал скрипт без меню, видать потом его доделали и выложили.
Go to the top of the page
+Quote Post
fly
сообщение 26.12.2008, 22:05
Сообщение #10


Начинающий
*

Группа: Пользователи
Сообщений: 20
Регистрация: 27.6.2008
Пользователь №: 90
Спасибо сказали: 3 раза




Цитата(Wariner @ 26.12.2008, 22:35) *
Если папка и файл на месте, а так же в файле есть несколько строчек инфы, то попробуй прописать пути:
Код
INFPatch = Core.GetPtokaXPath().."scripts/JINGLES/jingles.txt"


PS хотя у меня вроде работало(долго не тестил)

Также сделал. Работает.
Go to the top of the page
+Quote Post
Spongebob
сообщение 27.12.2008, 15:16
Сообщение #11


Начинающий
*

Группа: Пользователи
Сообщений: 24
Регистрация: 1.12.2008
Из: ●√ιק●E~N~G~E~L~S●√ιק●
Пользователь №: 1 262
Спасибо сказали: 1 раз




Скрипт работает...шутки зачетные...но почему только администратор может выбрать случайный джингл??? Мне кажется эта менюшка должна быть и у простых пользователей. Как это исправить? victory.gif
Go to the top of the page
+Quote Post
SCALOlaz
сообщение 27.12.2008, 15:58
Сообщение #12


Начинающий
*

Группа: Пользователи
Сообщений: 21
Регистрация: 17.11.2008
Пользователь №: 1 116
Спасибо сказали: 9 раз




Цитата(Spongebob @ 27.12.2008, 16:16) *
Скрипт работает...шутки зачетные...но почему только администратор может выбрать случайный джингл??? Мне кажется эта менюшка должна быть и у простых пользователей. Как это исправить? victory.gif
beat_plaster.gif
Спасибо, что заметили! Я даже и не предполагал что есть такая ошибка...
Джинглы могли видеть либо НЕзарегистрированные, либо администрация. ))

Добавьте в любое место скрипта, например перед функцией function OpConnected(user) вот это:
Цитата
RegConnected=UserConnected
Go to the top of the page
+Quote Post
Spongebob
сообщение 28.12.2008, 0:34
Сообщение #13


Начинающий
*

Группа: Пользователи
Сообщений: 24
Регистрация: 1.12.2008
Из: ●√ιק●E~N~G~E~L~S●√ιק●
Пользователь №: 1 262
Спасибо сказали: 1 раз




Нет, не в этом дело...просто хотелось что бы и простые Reg могли по желанию, через меню получить Джингл (Разное\\Случайный Джингл) А это меню у них неотображается...вот я и хотел спросить как это исправить? eyes_droped.gif
Go to the top of the page
+Quote Post
Wariner
сообщение 28.12.2008, 0:48
Сообщение #14


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




Ну неужели так сложно прочитать внимательно?!
Написали надо сделать так:
Код
function UserConnected(user)
    Core.GetUserAllData(user)
    INFUserRightclicker(user,data)
    INFTMR(user, true)
end

RegConnected = UserConnected
Go to the top of the page
+Quote Post
Spongebob
сообщение 28.12.2008, 8:36
Сообщение #15


Начинающий
*

Группа: Пользователи
Сообщений: 24
Регистрация: 1.12.2008
Из: ●√ιק●E~N~G~E~L~S●√ιק●
Пользователь №: 1 262
Спасибо сказали: 1 раз




Ой спасибо суслик) victory.gif
Go to the top of the page
+Quote Post
Sky2k
сообщение 28.12.2008, 15:30
Сообщение #16


Начинающий
*

Группа: Пользователи
Сообщений: 16
Регистрация: 21.12.2008
Из: Химки
Пользователь №: 1 508
Спасибо сказали: 0 раз




строчка скрипта if user.iProfile<=1 then
Core.SendToNick(user.sNick,"$UserCommand 1 3 Русское радио\\"..INFBot.."\\Интервал вывода фраз$<%[mynick]> !infrankingflood %[line:Укажите частоту флуда в минутах !ЧИСЛО (2-950)!]||")
end
зачем закоменнтили ? big_smile.gif

+ фраза *Интервал вывода фраз...* слишком длинная и не помещается полностью. Считаю целесообразным её переписать в виде * Время вывода фраз в чат в минутах.* Прмиерно такого плана. Это всё имхо.
А так, скрипт замечательный.
Go to the top of the page
+Quote Post
SCALOlaz
сообщение 28.12.2008, 19:30
Сообщение #17


Начинающий
*

Группа: Пользователи
Сообщений: 21
Регистрация: 17.11.2008
Пользователь №: 1 116
Спасибо сказали: 9 раз




все очень просто:
никак не придумаю проверочку - число или слово введено. Если ввести вместо минут, скажем FSD или любое слово (ну случайно может произойти), ЛУА выдает ошибку и роняет скрипт.
Так-что закомментил. Можно в коде установить время и перезапустить скрипт
Если есть гениальные идеи, пишите - затестим и обновлю скрипт
Go to the top of the page
+Quote Post
Wariner
сообщение 28.12.2008, 20:11
Сообщение #18


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




не понял в чём проблема... Есть команда + вводимая фраза. После нахождения команды
Код
elseif cmd=="команда"
, находим вводимую фразу
Код
local _,_,number=string.find(data,"%b<>%s+%S+%s+(%S+)")
, после чего задаём условие:
Код
if (tonumber(number) >= 2) and (tonumber(number) <=950) then


ЗЫ может коряво написал если что спрашивай постараюсь по понятнее изложить)))
Go to the top of the page
+Quote Post
GangstaR
сообщение 21.1.2010, 13:35
Сообщение #19


Начинающий
*

Группа: Пользователи
Сообщений: 25
Регистрация: 27.1.2009
Из: Махачкала
Пользователь №: 1 993
Спасибо сказали: 1 раз




А как сделать чтоб при входе НЕ выводило джингл?
Go to the top of the page
+Quote Post
prokazzza
сообщение 26.6.2010, 21:57
Сообщение #20


Активный участник
***

Группа: Пользователи
Сообщений: 53
Регистрация: 8.6.2010
Пользователь №: 7 012
Спасибо сказали: 1 раз




Цитата
- Вывод Джингла пользователю при входе


Присоединяюсь к вопросу, как сделать чтобы при входе юзера в чат не отсылался джингл.

???
Go to the top of the page
+Quote Post

2 страниц V   1 2 >
Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No New Posts KCAHDEP DDoS & Flood на "Озерки"
ВЫГНАТЬ В ШЕЮ!
0 Болото 6 196 2.12.2015, 4:09 Посл. сообщение: Болото
No New Posts Topic has attachmentsРадио
Скрипт Версия: API2 + сервак онлайн радио
10 vovan1978 13 193 18.9.2015, 14:00 Посл. сообщение: taylor
No new Topic has attachmentsDalliance ; старое название "Anekdot+BashOrg"
Скрипт выдаёт Анекдоты , Цитаты с с BashOrg , Интересные факты .
19 Vizunchik 19 133 14.6.2013, 9:10 Посл. сообщение: Ksan
Closed ВАЖНО: Topic has attachmentsКто У Нас Откуда :) Или "ты С Какого Района?"
Признаемся кто где живет)
81 Jaska 97 359 18.3.2012, 3:14 Посл. сообщение: HOUSE
Closed Адаптация игры "Мафия" с PtokaX на RusHub
9 Mangust 13 888 26.1.2012, 0:39 Посл. сообщение: dimajak
No New Posts Topic has attachmentsГолосование "Опросы"
Скрипт для проведения опросов
0 Vizunchik 5 716 9.12.2011, 23:45 Посл. сообщение: Vizunchik
No new Topic has attachmentsЦены На Тарифы Или "у Кого Инет Почем?"
Обсуждаем своих провайдеров.
66 D'aspid 71 122 7.9.2011, 20:57 Посл. сообщение: AfLc
No New Posts Что дает "включение WEB-сервера"?
2 Angel_D 6 424 8.8.2011, 22:07 Посл. сообщение: Setuper
No new Обмен "DC блог <-> Хаб"
Информационный обмен
17 Otshelnik-Fm 19 897 3.5.2011, 1:44 Посл. сообщение: Otshelnik-Fm
Closed Нужен файл Русского языка для PtokaX 0.4.1.2
9 Солдат 12 274 18.3.2011, 19:55 Посл. сообщение: Ksan
No new Topic has attachmentsзахват символа "/"
символ / не ловится скриптом, перехватывается птокой
29 степашка 30 143 13.3.2011, 3:23 Посл. сообщение: Alexey
No new Topic has attachmentsСкрипт "Майор" Основан на "Подарки от деда мороза" API 2
Это мой первый скрипт не судите строго
14 Ferb 15 180 24.2.2011, 17:43 Посл. сообщение: Ferb
No new Topic has attachmentsСкрипт "Народная мудрость"
API2
17 HidDen 24 315 8.2.2011, 1:42 Посл. сообщение: Артём
No New Posts Topic has attachmentsАвтоматическое заполнение поля "Ник"
7 mishanspb 11 037 27.1.2011, 18:05 Посл. сообщение: mishanspb
Closed ChatLogMySQL и знак "%"
2 dimajak 6 424 18.11.2010, 23:20 Посл. сообщение: Saymon21

 



RSS Сейчас: 27.4.2024, 2:47