myDC.ru

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

 

> Fans, API1, API2 | Скрипт фанатизма

Теги
Нет тегов для показа
*FoxMalder*
сообщение 18.8.2008, 13:31
Сообщение #21


мяу =^.^=
******

Группа: Пользователи
Сообщений: 414
Регистрация: 20.5.2008
Пользователь №: 6
Спасибо сказали: 14 раз




можно сделать маленький топ где то 20 ников, а если ник не попал в топ то по личной стате big_smile.gif
а так скрипт довольно интересный
Go to the top of the page
+Quote Post
2 страниц V  < 1 2  
Начать новую тему
Ответов
Wariner
сообщение 16.9.2009, 17:35
Сообщение #22


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

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




почему то на такие изрречения хочется всегда ответить грубостью....

качай отсюда http://mydc.ru/index.html?showtopic=292&am...post&p=1843
Go to the top of the page
+Quote Post
Gate001
сообщение 12.10.2009, 19:44
Сообщение #23


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

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




Wariner? обращаюсь к вам и ко всем пользователям, кто имеет дело с unix-данный скрипт "гадит в корне".
Прочитал тему (http://mydc.ru/topic539.html), но пока исправить не удалось. Можно ли поправить данный скрипт под nix?

С горем пополам поправил сам.
Изменил в начале скрипта переменные, отвечающие за пути к файлу. У меня на дебиане работает.
Если кому нужно-забирайте.
Прикрепленные файлы
Прикрепленный файл  Fans.lua ( 10.24 килобайт ) Кол-во скачиваний: 6
 
Go to the top of the page
+Quote Post
Gate001
сообщение 13.10.2009, 19:06
Сообщение #24


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

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




Еще одна просьба, если кому не сложно.
Взять скрипт из поста выше и переделать его так, чтобы возможность "фанатеть" была только у зарегистрированых пользователей и выше (вип, ОП, админ).
Иными словами, чтобы у гостей не было возможности добавляться в список фанатов кому-то. Опционально-чтобы и к гостям в список нельзя было добавляться.
Go to the top of the page
+Quote Post
Wariner
сообщение 13.10.2009, 19:51
Сообщение #25


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

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




для того чтоб незарег не могли пользовать команды надо сделать с каждой так так
Код
if cmd == "!Addfan" then
          if user.iProfile ~= -1 then
                  ...
          end
          return true
end

надеюсь понятно написал


Спасибо сказали:
Go to the top of the page
+Quote Post
Gate001
сообщение 13.10.2009, 21:03
Сообщение #26


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

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




Да, спасибо. Сработало. Попробую этим же кодом "отобрать" у гостей менюшки для добавления в фанаты. А то неудобно-меню осталось, хотя и не действует.
Go to the top of the page
+Quote Post
Wariner
сообщение 13.10.2009, 22:09
Сообщение #27


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

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




конечно же меню скрывается этим же кодом))))
Go to the top of the page
+Quote Post
Gate001
сообщение 15.10.2009, 8:30
Сообщение #28


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

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




Вот, переделал под себя.
Из переделок:
Корректно работает под *nix (не гадит файлами в корне)
У гостей отобрал права на добавление/удаление фанатов. Теперь они могут только смотреть топ рангов и списки фанатов у пользователей
Убрал менюшки, требующие ввода ника (Типа добавиться в список фанатов-введите ник). Добавление и удаление доступно при правом клике на юзера.

Делал для себя. Если кому пригодится-берите.
Прикрепленные файлы
Прикрепленный файл  Fans.lua ( 10.42 килобайт ) Кол-во скачиваний: 22
 
Go to the top of the page
+Quote Post
Wariner
сообщение 15.10.2009, 19:21
Сообщение #29


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

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




твоё последние сообщение я оставлю, но на будущее не надо прикладывать скрипт с незначительными переделками! Каждый настроит под себя сам!
Go to the top of the page
+Quote Post
Gate001
сообщение 19.10.2009, 19:20
Сообщение #30


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

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




Хорошо, понял.
Кстати, можно ли добавить след. сообщения типа
Цитата
Пользователь такой то добавился в фанаты пользователя
Пользователь такой то ушел из фанатов пользователя

Я в принципе вроде как понимаю как добавить такое, но не знаю куда... Вот
Код
if cmd == "!Addfan" then
                 if user.iProfile ~= -1 then
        local _,_,nick = string.find(sData, "%b<>%s+%S+%s+(%S+)")
                                     if nick then
                                           if nick ~= user.sNick then
                                                      if not Fans[nick] then
                                                                   Fans[nick] = {}
                                                      end
                                                      if Fans[nick][user.sNick] == 1 then
                                                                   Core.SendToNick(user.sNick,"Вы уже добавляли себя в список фанатов к "..nick)
                                                      else
                                                                  Fans[nick][user.sNick] = 1
                                                                  SaveToFile(fFansFile, Fans, "Fans")
                                                                  if not FansTop[nick] then
                                                                                  FansTop[nick] = 1
                                                                                  SaveToFile(fFansTopFile, FansTop, "FansTop")
                                                                  else
                                                                                  FansTop[nick] = FansTop[nick] + 1
                                                                                  SaveToFile(fFansTopFile, FansTop, "FansTop")
                                                                  end
                                                                  Core.SendToNick(user.sNick,"Вы создали фан-лист для "..nick)
                                                      end
                                            else
                                                      Core.SendToNick(user.sNick,"Вы не можете быть фанатом самому себе :P")
                                            end
                                       else
                                              Core.SendToNick(user.sNick,"Пожалуйста вводите верный НИК")
                                       end
                                        end
                                       return true
                  end

А для удаления:
Код
if cmd == "!Delfan" then
                        if user.iProfile ~= -1 then
                local _,_,nick = string.find(sData, "%b<>%s+%S+%s+(%S+)")
                            if nick then
                                 if not Fans[nick] then
                                         Core.SendToNick(user.sNick, nick.." нет в базе данных")
                                 end
                                 if Fans[nick][user.sNick] then
                                             Fans[nick][user.sNick] = nil
                                             SaveToFile(fFansFile, Fans, "Fans")
                                             FansTop[nick] = FansTop[nick] - 1
                                             SaveToFile(fFansTopFile, FansTop, "FansTop")
                                             Core.SendToNick(user.sNick,"Вы удалили себя из списка фанатов у "..nick)
                                 else
                                             Core.SendToNick(user.sNick,"Вас нет в списке фанатов у "..nick)
                                 end
                           else
                                   Core.SendToNick(user.sNick,"Пожалуйста вводите верный НИК")
                           end
                           return true
                           end

Здесь вроде как строку нужно приписывать после
Код
Core.SendToNick(user.sNick,"Вы удалили себя из списка фанатов у "..nick)
. Верно?
Т.е что то типа:
Код
Core.SendToAll(user.sNick," ушел из фанатов пользователя "..nick)


А вот куда пихать строку для добавления в фанаты-ума не приложу.
Go to the top of the page
+Quote Post
Wariner
сообщение 19.10.2009, 19:24
Сообщение #31


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

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




можно просто сменить строчку
Код
Core.SendToNick(user.sNick,"Вы удалили себя из списка фанатов у "..nick)

на
Код
Core.SendToAll(user.sNick..", ушел из фанатов пользователя "..nick)


ну или просто добавить :
Код
Core.SendToNick(user.sNick,"Вы удалили себя из списка фанатов у "..nick)
Core.SendToAll(user.sNick..", ушел из фанатов пользователя "..nick)


Go to the top of the page
+Quote Post
Gate001
сообщение 19.10.2009, 20:31
Сообщение #32


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

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




Спасибо, работает.
А код для добавления?
Нужно что-то заменить вот на это, а что? big_smile.gif
Код
Core.SendToAll(user.sNick.."записался в фанаты пользователя "..nick)


UPD: Очевидно вместо этого:
Код
Core.SendToNick(user.sNick,"Вы создали фан-лист для "..nick)

Вопрос снят.
Go to the top of the page
+Quote Post
Плюшевая_мишка
сообщение 10.12.2013, 21:03
Сообщение #33


Абсолютный новичок


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




А можно попросить выложить конечный вариант скрипта с добавленными фразами?.. Если, конечно не жалко)) На API2 пойдет?
Go to the top of the page
+Quote Post

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

 



RSS Сейчас: 14.12.2018, 23:40