IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar mIRC Kanal Yetki Koruması
irc

mIRC Kanal Yetki Koruması
Aytac
mIRC Kanal Yetki Koruması
0
431
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
koruması yetki mirc kanal

Bu konuyu görüntüleyen kullanıcı(lar):1 Ziyaretçi
Şuan Offine!
Şuan Offine!
Aytac Administrator
********
Proje Sorumlusu

  • Üyelik tarihi    04.02.2020
  • Konum  78 Karabük
  • Konular351
  • Mesajlar364
  • Verilen beğeni8 in 5 posts
  • Alınan beğeni6
  • Rep puanı 6

Sunucu içerisinde yetkili olan adminlerin bazen kanallarda yetkilerinin alınması mümkün olabiliyor. Zamanında yazdığım aşağıdaki kodla bunun takibini yapmak isteyenler için ideal bir kod olacaktır.
- @Yetki penceresinde hangi kanalda hangi nickin ne zaman hangi yetkiyi aldığını gösterir.
- İşlem yapılan kanalda o an işlemi yapan kişinin mevcut yetkileri alınır.
- İşlem yapılan kanalda tekrar eski yetkiye geçilir.
- İşlem yapıldığında Away isek idle süresi bozulmaması adına sadece alınan yetkilerin tekrar alınmasını sağlar.
- İşlem yapıldığında away değilsek, kişinin yetkileri alınıp, notice uyarı mesajı çekilip alınan yetkileri tekrar geri vermesini sağlar.
- Muaf tutulmak istenen kanallar veya nickler kodda belirtilen yerlere yazılabilir. (#muafkanal1 ve nickserv|chanserv kısımları.)
-----

Kod :
on *:rawmode:#: {
  if ($regex($1,/([+])([eIxqoahv|\-o|\-h\|\-v]{1,})/) && ($2 == $me) && ($nick != $me) && ($chr(45) isin $1)) { mode $chan $replace($regml(2),-,+) $str($+($me,$chr(32)),$len($regml(2))) }
  if ($regex($1,/([-])([qaohv]{1,})/) && ($2 == $me)) && ($nick != $me) && $away {
    mode $chan $regml(2) $str($+($me,$chr(32)),$len($regml(2)))
    echo -a $+($chr(3),6) $timestamp $nick nicki $chan kanalında Yetki ALDI: $1-
    $iif(!$window(@Yetki),window -en @Yetki)
    echo 6 @Yetki $timestamp  $nick nicki $chan kanalında Yetki ALDI: $1-
  }
  elseif ($regex($1,/([-])([qaohv]{1,})/) && ($2 == $me)) && ($nick != $me) && !$away && !$istok(#MuafKanal1 #MuafKanal2,$chan,32) && !$regex($nick,/(ChanServ|Operserv|services\.Sunucu.Net)/i) {
    mode $chan $regml(2) $str($+($me,$chr(32)),$len($regml(2)))
    mode $chan -aohv $str($+($,nick,$chr(32)),4)
    Notice $nick $nick Mod Koruma Özelliğim Devrede!
    echo -a $+($chr(3),6) $timestamp $nick nicki $chan kanalında Yetki ALDI: $1-
    $iif(!$window(@Yetki),window -en @Yetki)
    echo 6 @Yetki $timestamp  $nick nicki ve $chan kanalında Yetki ALDI: $1-
  }
  if ($regex($1,/([+])([qaohv]{1,})/) && ($2 == $me)) && ($nick != $me) && ($1 != +oq) {
    echo -a $+($chr(3),6) $timestamp $chan kanalında $nick nicki sana $1 yetkisi verdi.
    $iif(!$window(@Yetki),window -en @Yetki)
    echo 6 @Yetki $timestamp $chan kanalında $nick nicki sana $1 yetkisi verdi.
  }
}
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  mIRC Youtube Remote Aytac 3 1,931 03.04.2021, 12:30
Son Mesaj: iSyan
  mIRC Yurt Dışı Girişlerini Yasaklama Aytac 1 1,931 03.04.2021, 12:29
Son Mesaj: iSyan
  mIRC Tüm Kanalları Aynı Moda Alma Aytac 0 1,891 20.02.2021, 00:03
Son Mesaj: Aytac
  mIRC Namaz vakitleri Aytac 0 1,815 03.02.2021, 02:03
Son Mesaj: Aytac
asiren
Proxy Koruması - Güncel Aytac 2 1,001 15.01.2021, 00:04
Son Mesaj: PamiR

Foruma Git: