| KivanC | 14 Ekim 2020 20:25 |
Kanal Yetki Koruması
Kod:
Coder: CesuryureK
-
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ı.)
-----
* Kodu yazdığımda hangi yıla ait olduğunu hatırlamıyorum. Ama kodlama tarzıma baktığımda aradan en az 10-12 yıl geçtiği kesin. Tekrar düzenlemek istemediğim için şuan ki haliyle paylaşıyorum.
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.
}
}
|
