IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   Services Hazır Kodlar (https://www.ircforumlari.net/services-hazir-kodlar/)
-   -   IRCServices Onlinesine Göre Kanallarda YETKİ Ve Özellik (https://www.ircforumlari.net/services-hazir-kodlar/308101-ircservices-onlinesine-gore-kanallarda-yetki-ve-ozellik.html)

toXic 27 Aralık 2009 09:38
IRCServices Onlinesine Göre Kanallarda YETKİ Ve Özellik
 
Bu Kodda, Total Online TIME Önceden Kurulmus olmalidir.
Anope'de, Bir Modul vardı, ysfm'ın yaptiği; Kullanıcının Girdiği Her Kanalda Belirtilen Yetkiye Sahip olması, Onun IRCServices Halidir.
Extra flaglar, host ident vs. Verebilirsiniz.
Leveller Ayridir, Seviyeler ayridir X-XX-XXX-XXXX diye.
Kişinin Seviyesine Göre, Girdiği Her Kanalda, Seviyesinin Karsılıgı Olan Özellikler Alacak, Örneğin 200 + Gün Online Oldu ise, Girdiği Her Kanalda +a ve +Wqh modelerini alacaktir.
/* SEVIYEX 1 SANİYE
SEVIYEXX 50 GUN
SEVİYEXXX 100 GUN
SEVİYEXXXX 200 GÜN */

Ayrica Bu Kullanıcılar, #Seviye Kanalinda Toplanacaklardir.

Kod:
««««« [ Whois toXic ] »»»»»
*  Adres:  [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
*  İsim:  Kelebek v.Türkçe
toXic is using modes +iowghraAsTxNWqtp +kcfFveGnNqSso
*  Rumuz Bilgi: toXic Sifreli ve Tanitilmis Bir Nicktir
*  Kanallar:  ~#Seviye
*  Server:  ankara.kelebek.gen.tr KELEBEK IRC Network [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
*  IRCop:  toXic is a Network Administrator
*  toXic Bir Helper(IRC YardImcI) dır.
toXic Seviyesi (Level IV)
*  Konuşmadığı Süre:  35Saniye
*  Sunucuya Giriş Saati:  CuMarttesi Aralık 26 16:15:34 2009
Host vs. Kendiniz verebilir, Dahada Geliştirebilirsiniz. Zaten Kodlar Basit Oldugu icin birşeylere uyarlayabilirsiniz.
Kod:
cd ircservices*-*
Kod:
pico -w modules/chanserv/check.c
Girip;
Kod:
#include "services.h"
#include "modules.h"
#include "language.h"
#include "timeout.h"
#include "modules/nickserv/nickserv.h"
#include "modules/operserv/operserv.h"
Altina;

Kod:

#define toxic "#Seviye"
static int SEVIYEX = 1;
static int SEVIYEXX = 60*60*24*50;
static int SEVIYEXXX = 60*60*24*100;
static int SEVIYEXXXX = 60*60*24*200;

Ekleyin.

Kod:

if (call_callback_4(module, cb_check_chan_user_modes,
source, user, c, modes) > 0)
return;
Altina;
Kod:
NickInfo *ni = NULL;
ni = get_nickinfo(user->nick);
char *s_NickServ;
 
 
        if (ni && (ni->toplamzaman  >= SEVIYEXXXX))
{
if  (user_identified(user)) {
        send_cmd(s_ChanServ, "Mode %s +a %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SVSMODE %s +qhW :1", user->nick);
send_cmd(s_NickServ, "SWHOIS %s :Seviyesi (\2Level IV\2)", user->nick);
        }
 }
else  if (ni && (ni->toplamzaman  >= SEVIYEXXX))
 {
if  (user_identified(user)) {
  send_cmd(s_ChanServ, "Mode %s +o %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SVSMODE %s +hW :1", user->nick);
send_cmd(s_NickServ, "SWHOIS %s :Seviyesi (\2Level III\2)", user->nick);
}
  }
      else if (ni && (ni->toplamzaman  >= SEVIYEXX))  {
if  (user_identified(user)) {
send_cmd(s_ChanServ, "Mode %s +h %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SVSMODE %s +W :1", user->nick);
send_cmd(s_NickServ, "SWHOIS %s :Seviyesi (\2Level II\2)", user->nick);
      }
    }
  else if (ni && (ni->toplamzaman  >= SEVIYEX)) {
if  (user_identified(user)) {
send_cmd(s_ChanServ, "Mode %s +h %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SWHOIS %s :Seviyesi (\2Level I\2)", user->nick);
  }
}
ni = get_nickinfo(user->nick);
Ekleyip,
Kod:
make&&make install
derledikten sonra, servislerinizi resetleyiniz. Geliştirmesi size kalmis..


İyi Çalismalar ;)

KartaL 27 Aralık 2009 12:27
Cevap: IRCServices Onlinesine Göre Kanallarda YETKİ Ve Özellik
 
Ellerine sağlık kardeşim.

skywoLf 27 Aralık 2009 12:28
Cevap: IRCServices Onlinesine Göre Kanallarda YETKİ Ve Özellik
 
afferim iyi yapmıssın şerrfsizim aklıma gelmişti :) ibo peki zeki murende bızı gorcekmı :))

FBI- 27 Aralık 2009 14:28
Cevap: IRCServices Onlinesine Göre Kanallarda YETKİ Ve Özellik
 
Şak şak şak ibo :) eline sağlık yavru..

Soulfly 26 Eylül 2011 05:00
Cevap: IRCServices Onlinesine Göre Kanallarda YETKİ Ve Özellik
 
yanliz bir sorun var sanirim kodlarla alakali bunu ekleyince helperlara +h vermiyor op kanallarina giriş yapmiyor

Kod:
        if (ni && (ni->toplamzaman  >= SEVIYEXXXX))
{
if  (user_identified(user)) {
        send_cmd(s_ChanServ, "Mode %s +o %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SVSMODE %s +qhW :1", user->nick);
send_cmd(s_NickServ, "SWHOIS %s :IRC Level (\2Level IV\2)", user->nick);
        }
 }
else  if (ni && (ni->toplamzaman  >= SEVIYEXXX))
 {
if  (user_identified(user)) {
  send_cmd(s_ChanServ, "Mode %s +h %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SVSMODE %s +r :1", user->nick);
send_cmd(s_NickServ, "SWHOIS %s :IRC Level (\2Level III\2)", user->nick);
}
  }
      else if (ni && (ni->toplamzaman  >= SEVIYEXX))  {
if  (user_identified(user)) {
send_cmd(s_ChanServ, "Mode %s +v %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SVSMODE %s +r :1", user->nick);
send_cmd(s_NickServ, "SWHOIS %s :IRC Level (\2Level II\2)", user->nick);
      }
    }
  else if (ni && (ni->toplamzaman  >= SEVIYEX)) {
if  (user_identified(user)) {
send_cmd(s_ChanServ, "Mode %s +v %s", ci->name, user->nick);
send_cmd(s_ChanServ, "Sajoin %s %s", user->nick, toxic);
send_cmd(s_NickServ, "SWHOIS %s :IRC Level (\2Level I\2)", user->nick);
  }
}
ni = get_nickinfo(user->nick);

    if (!stricmp(c->name, "#VIP") && check_access(user, ci, CA_AUTOOP)) {
    send_cmd(s_NickServ, "chghost %s VIP.mIRCTR.ORG", user->nick);
    send_cmd(s_NickServ, "chgident %s VIPUser", user->nick);
    send_cmd(s_NickServ, "SVSMODE %s +W :1", user->nick);
    send_cmd(s_NickServ, "chgname %s mIRCTR VIP Kullanıcısı.", user->nick);
    send_cmd(s_NickServ, "SWHOIS %s :is mIRCTR IRCd Network (\2VIP\2) Kullanıcı", user->nick);
    send_cmd(s_NickServ, "PRIVMSG #system %s Özel Kullanıcı Olarak, Sisteme Dahil Oldu.", user->nick);
    send_cmd(s_NickServ, "PRIVMSG %s :Suanda, mIRCTR.ORG Özel Kullanıcı Statusune Gecis Yaptınız.", user->nick);
    }

    if (!stricmp(c->name, "#help") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s Helper.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSMODE %s +hW :1", user->nick);
        send_cmd(s_ChanServ, "PRIVMSG #system \2%s\2 nicki helper girisi yapti.", user->nick);
        send_cmd(s_NickServ, "SVSJOIN %s #helpers", user->nick);
      }
    if (!stricmp(c->name, "#boyS") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s boyS.mIRCTR.ORG", user->nick);
      }

    if (!stricmp(c->name, "#founders") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "SVSMODE %s +Ww :1", user->nick);
            send_cmd(s_ChanServ, "PRIVMSG #founder \2%s\2 nicki founder olarak girisi yapti.", user->nick);
      }
    if (!stricmp(c->name, "#radyo") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s dJ.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSJOIN %s #dJ,#Radyo@", user->nick);
      }

    if (!stricmp(c->name, "#oyun") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s  Oyuncu.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSJOIN %s #OpS", user->nick);
      }
    if (!stricmp(c->name, "#Merlin") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s  Oyuncu.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSJOIN %s #OpS", user->nick);
      }
    if (!stricmp(c->name, "#kelime") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s  Oyuncu.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSJOIN %s #OpS", user->nick);
      }
    if (!stricmp(c->name, "#islam") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s  Oyuncu.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSJOIN %s #OpS", user->nick);
      }
    if (!stricmp(c->name, "#Bulmaca") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s  Oyuncu.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSJOIN %s #OpS", user->nick);
      }
    if (!stricmp(c->name, "#carkifelek") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "chghost %s  Oyuncu.mIRCTR.ORG", user->nick);
            send_cmd(s_NickServ, "SVSJOIN %s #OpS", user->nick);
      }

    if (!stricmp(c->name, "#mIRCTR") && check_access(user, ci, CA_AUTOOP)) {
            send_cmd(s_NickServ, "SVSJOIN %s #mIRCTR@", user->nick);
      }

AspavA 28 Ekim 2014 13:06
Cevap: IRCServices Onlinesine Göre Kanallarda YETKİ Ve Özellik
 
yapmış oldugun host sistemi ile çakışıyor. kod ikisinden birisi aktif olmuyor.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 11:32.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net