!opekle #Kanal

Faruk

Harbi Üye
Forum Üyesi
Katılım
19 Mart 2019
Mesajlar
8,858
Tepkime puanı
25
Kod Yazan : Pckopat

Bu şekilde bir kod yazdım. Mantığı ise şöyle .opekle komutunu kullanan kişinin önce cs den seviyesini kontrol ediyor eğer access seviyesi belirlediğin rakama eşit ise komutu kullanma yetkisi veriyor ve eklemek istediği kişiyi ekliyor ve bir sonraki komut kullanımında yetkisi olduğu için direk ekliyor. Eğer yetki listesinde bulunuyor ama yetkisi silinmişse status çekip yetkisi belirlenen rakama eşit değilse komut kullanma yetkisi siliniyor. Ek olarak ekleme yapmak istediği kişinin nicki şifreli mi değil mi diye kontrol ediyor.


Yapılması gereken düzenlemeler alias kısmındaki bildirimkanal ve kanalseviye yerleridir.


Kod:
alias kanalseviye return 200
alias bildirimkanal return #owner
on $*:text:/^([\.!]opekle\s)/Si:$($bildirimkanal):{
  if ($ulist($nick,$kanalseviye,0) == 1) {
    msg $bildirimkanal Kontrol ediliyor lütfen bekleyiniz.
    set %yetkili on
    set %yetkiislemkanal $2
    set %yetkiislemeklenick $3
    cs status $2 $nick
  }
  elseif ($ulist($nick,$kanalseviye,0) == 0) { 
    msg $bildirimkanal Kontrol ediliyor lütfen bekleyiniz.
    set %yetkisiz on
    set %yetkiislemkanal $2
    set %yetkiislemeklenick $3
    cs status $2 $nick
  }
}
on ^*:NOTiCE:*:?:{
  if ($nick == Chanserv) {
    if (%yetkili == on) && ($regsubex($1-,/status.+\s(\d+)\s.+/i,\1) == $kanalseviye) {
      .set %yetkili on | who %yetkiislemeklenick | halt
    }
    elseif (%yetkili == on) && ($regsubex($1-,/status.+\s(\d+)\s.+/i,\1) != $kanalseviye) {
      .ruser $3 | msg $bildirimkanal $3 Yetki Listesinden Silindiğiniz için Bu Komutu Kullanamazsınız. | unset %yetki* | halt
    }
    elseif (%yetkisiz == on) && ($regsubex($1-,/status.+\s(\d+)\s.+/i,\1) == $kanalseviye) {
      .auser $4 $3 | .set %yetkili on | who %yetkiislemeklenick | halt
    }
    elseif (%yetkisiz == on) && ($regsubex($1-,/status.+\s(\d+)\s.+/i,\1) != $kanalseviye) {
      msg $bildirimkanal $3 Komut Kullanma Yetkiniz bulunmamaktadır. | unset %yetki* | halt
    }
  }
}

raw 352:*: {
  if (%yetkili == on) { 
    if $regex($7,\*) {
      cs access %yetkiislemkanal add $6 50 | msg $bildirimkanal $6 Nickine 50 Seviye Access Eklendi. | unset %yetki*
    }
    else { msg $bildirimkanal Eklemek istediğiniz nick kayıtlı değil. | unset %yetki* }
    halt
  }
}
 
İçerik sağlayıcı "paylaşım" sitelerinden biri olan Harbimekan.Com Forum, Eğlence ve Güncel Paylaşım Platformu Adresimizde 5651 Sayılı Kanun’un 8. Maddesine ve T.C.K’nın 125. Maddesine göre TÜM ÜYELERİMİZ yaptıkları paylaşımlardan sorumludur. Harbimekan.Com sitesindeki konular yada mesajlar hakkında yapılacak tüm hukuksal Şikayetler için info@harbimekan.com yada iletişim sayfası üzerinden iletişime geçilmesi halinde ilgili kanunlar ve yönetmelikler çerçevesinde en geç 3 Gün (72 Saat) içerisinde Forum yönetimi olarak tarafımızdan gereken işlemler yapılacaktır.

Bu Site, Bilim ve Sağlık Haber Ajansı Üyesidir.

Yığıntı - 8kez - kaynak mağazam - Uğur Ağdaş - genel forum - webp converter