Neler yeni

IRCForumları - IRC ve mIRC Yardım ve Destek Platformu - İRCforumlari

Duyuru; 📢

Forumda 'Tanıtım Yazısı' şeklinde Sitelerinizin Tanıtımını Yaparak sitenizi yükselte bilirsiniz.İRCForumları Ailesi İyi Forumlar Diler.!

PM Kuralları; 📢

Forumunda yer alan bir konuya istineden kesinlikle (özel mesaj) yolu ile destek talep etmeyiniz, zira bu tip alınan mesajlar kesinlikle cevapsız kalacaktır. İlgili konuya istinaden forumda destek konusu oluşturunuz.

İçerik hk; 📢

Sizde bilgi deneyim sahibi olduğunuz konu ve alanları forumda kolayca paylaşarak daha geniş kitlelere ulaşmasını sağlayabilir, oluşturduğunuz ticari konular sayesinde kazanç elde edebilirsiniz.

sohbet Online Okey Reklam Reklam
okey oyna

Root

Forum Sahibi
Yönetici
1 Şub 2022
1,301
221
63
www.ircforumlar.com
Ekleme: Mircinizde Alt+R tuşuna basın sol üstte dosya => yeni ekle seçin. Kodları yapıştırın.

Kullanımı mircinizde sağ tuşa tıklayıp chanserv yetki paneline tıklayın.


chanservyetkiekleme.png

Kod:
dialog ch.access {
  title "Chanserv Access Paneli"
  size -1 -1 251 142
  option dbu
  box "Kanali Seç", 1, 2 0 65 111
  combo 2, 4 9 60 50, size drop
  combo 3, 4 24 60 50, size
  edit "Kaç LeveLs ?", 4, 4 73 60 10, center
  button "Ekle", 5, 14 89 37 12
  box "Alt Kısımdakiler Access Seviyelerini ve Nickleri Gösterir.", 6, 67 0 179 111
  combo 7, 70 9 173 75, size
  button "Kaldir", 8, 73 86 37 12
  edit "Access Level", 9, 154 86 50 11, center
  button "Düzenle", 10, 205 85 37 12
  button "Tamam Kapat.", 11, 190 116 54 12, ok
  text "  Kullanimi : İlk önce Kanali Seçiyorsunuz.  Sonra bi altina Nicki yaziyorsunuz. Kaç Levels yazan yerede Seviyesini yazip Ekle diyorsunuz. ßy RosicRucian", 12, 12 116 150 22
}

alias access { dialog -m ch.access ch.access }

Menu Channel {
  Chanserv Yetki Paneli:access
}

on ^*:NOTICE:*:?:{
  if ($dialog(ch.access)) && ($nick == Chanserv) {
    if (Access list for isin $1-) { haltdef }
    if (must be non-zero isin $1-) { haltdef | echo -a  4Error: Level must be a number and non-zero }
    if ($2 = VOP) || ($2 = HOP) || ($2 = AOP) || ($2 = SOP) {
      if (%halt.x = on) { halt }
      haltdef
      did -a ch.access 7 Chan must have xOp turned off
      set -u3 %halt.x on
    }
    if ($1 isnum) && ($2 isnum) { haltdef | did -a ch.access 7 $3 - Access Level $2 }
    if (Num isin $1-) { haltdef }
    if (End isin $1-) { haltdef }
    if (Access Denied isin $1-) { haltdef | did -a ch.access 7 Access Denied }
    if (added to isin $1-) { haltdef }
    if (deleted from isin $1-) { haltdef }
    if (changed isin $1-) { haltdef }
    if (list is empty isin $1-) { haltdef | did -a ch.access 7 Access List is Empty }
  }
}

on *:DIALOG:ch.access:*:*: {
  if ($devent == init) {
    did -b $dname 3-5
    did -b $dname 7-10
    did -f $dname 2
    var %chan.var 1
    while (%chan.var <= $chan(0)) {
      did -a $dname 2 $chan(%chan.var)
      inc %chan.var
    }
  }
  if ($devent == sclick) {
    if ($did == 2) {
      did -r $dname 7
      cs access $did(2) list
      did -e $dname 7
      did -e $dname 3
      did -f $dname 3
      var %nick.var 1
      while (%nick.var <= $nick($did(2),0)) {
        did -a $dname 3 $nick($did(2),%nick.var)
        inc %nick.var
      }
    }
    if ($did == 3) { did -e $dname 4 | did -f $dname 4 }
    if ($did == 5) {
      did -r $dname 7
      cs access $did(2) add $did(3) $did(4)
      did -r $dname 4
      did -a $dname 4 Access Level
      did -b $dname 4-5
      cs access $did(2) list
    }
    if ($did == 7) { did -e $dname 8-9 }
    if ($did == 8) {
      cs access $did(2) del $gettok($did(7),1,32)
      did -r $dname 7
      did -b $dname 8-10
      cs access $did(2) list
    }
    if ($did == 10) {
      cs access $did(2) add $gettok($did(7),1,32) $did(9)
      did -r $dname 7
      did -r $dname 9
      did -a $dname 9 Access Level
      did -b $dname 8-10
      cs access $did(2) list
    }
  }
  if ($devent == edit) {
    if ($did == 3) { did -e $dname 4 }
    if ($did == 4) { did -e $dname 5 }
    if ($did == 9) { did -e $dname 10 }
  }
}
 

Benzer konular

shape1
shape2
shape3
shape4
shape7
shape8
Üst