Chanserv Paneli

alias cspanel { dialog -m cspanel cspanel }
dialog cspanel {
  title ” ChanServ Paneli // By Simedya”
  size -1 -1 279 202
  option dbu
  box “Ana İşlemler”, 1, 2 1 196 24
  button “Kanal Kaydet”, 2, 6 9 43 12
  button “Kanalı Tanıt”, 3, 52 9 42 12
  button “Kaydını Düşür”, 4, 97 9 46 12
  combo 5, 206 9 60 100, size drop
  box “İşlem Yapılacak Kanal”, 6, 202 1 70 24
  button “Kanal İnfo”, 7, 149 9 43 12
  box “Access İşlemleri”, 8, 2 27 195 26
  button “Access Ekle”, 9, 6 36 42 12
  button “Access Sil”, 10, 52 36 42 12
  button “Access Listele”, 11, 97 36 47 12
  button “Access Count”, 12, 150 36 43 12
  box “Akick İşlemleri”, 13, 2 54 195 26
  button “Akick Ekle”, 14, 6 63 42 12
  button “Akick Sil”, 15, 52 63 42 12
  button “Akick Listele”, 16, 97 63 47 12
  button “Akick View”, 17, 149 63 43 12
  box “Kanal İşlemleri”, 18, 2 81 147 39
  button “Founder Değiştir”, 19, 6 90 47 12
  button “Açıklama Değiştir”, 20, 6 104 47 12
  button “Şifre Değiştir”, 22, 56 90 39 12
  button “URL Değiştir”, 23, 56 104 39 12
  button “EMAIL Değiştir”, 25, 101 90 43 12
  button “Giriş Mesajı”, 26, 101 104 43 12
  box “Topic Lock”, 21, 199 27 74 26
  button “Aç”, 24, 202 35 28 12
  button “Kapa”, 27, 238 35 28 12
  box “Keep Topic”, 28, 200 54 74 26
  button “Aç”, 29, 202 63 28 12
  button “Kapa”, 30, 238 63 28 12
  box “Private”, 31, 151 81 46 39
  button “Aç”, 32, 155 90 37 12
  button “Kapa”, 33, 155 104 37 12
  box “Restricted”, 34, 200 81 35 39
  button “Aç”, 35, 202 90 28 12
  button “Kapa”, 36, 202 104 28 12
  box “SecureOps”, 37, 238 81 36 39
  button “Aç”, 38, 242 90 28 12
  button “Kapa”, 39, 242 105 28 12
  box “Levels İşlemleri”, 40, 2 120 275 58
  box “AutoProtect”, 41, 4 126 70 24
  button “Seviye”, 42, 7 134 29 12
  button “İptal Et”, 43, 39 134 29 12
  box “AutoOp”, 44, 4 150 70 25
  button “Seviye”, 45, 7 157 30 12
  button “İptal Et”, 46, 40 157 29 12
  box “AutoHalfop”, 47, 77 126 69 24
  button “Seviye”, 48, 80 134 29 12
  button “İptal Et”, 49, 112 134 29 12
  box “AutoVoice”, 50, 77 150 69 25
  button “Seviye”, 51, 80 157 30 12
  button “İptal Et”, 52, 112 157 29 12
  box “Acc-Change”, 53, 149 126 69 24
  box “Acc-List”, 54, 149 150 69 25
  button “Seviye”, 55, 153 134 29 12
  button “İptal Et”, 56, 185 134 29 12
  button “Seviye”, 57, 153 157 30 12
  button “İptal Et”, 58, 186 157 29 12
  box “Akick”, 59, 219 126 55 24
  button “Seviye”, 60, 222 134 23 12
  button “İptal Et”, 61, 248 134 23 12
  box “Set”, 62, 219 150 55 24
  button “Seviye”, 63, 222 157 23 12
  button “İptal Et”, 64, 248 157 23 12
  button “TAMAM/KAPAT”, 65, 222 180 55 20, ok
}

on *:dialog:cspanel:*:*: {
  if ($devent == init) {
    did -a $dname 5 $chan
    var %q 1
    var %p $chan(0)
    while (%q <= %p) {
      did -a cspanel 5 $chan(%q)
      inc %q
    }
  }
  if ($devent == sclick) {
    if ($did == 2) {
      cs register $did(5) $?=”Kanal İçin Şifre Giriniz” $?=”Kanal İçin Açıklama Giriniz”
    }
    if ($did == 3) {
      cs identify $did(5) $?=”Kanal Şifresini Girin”
    }
    if ($did == 4) {
      cs drop $did(5)
    }
    if ($did == 7) {
      cs info $did(5)
    }
    if ($did == 9) {
      cs access $did(5) add $?=”Access Eklenecek Nicki Yazın” $?=”Access Seviyesini Yazın”
    }
    if ($did == 10) {
      cs access $did(5) del $?=”Access Silinecek Nicki Yazın”
    }
    if ($did == 11) {
      cs access $did(5) list
    }
    if ($did == 12) {
      cs access $did(5) count
    }
    if ($did == 14) {
      cs akick $did(5) add $?=”Akicke Alınacak Nicki Yazın” $+ !*@* $?=”Akick Sebebi”
    }
    if ($did == 15) {
      cs akick $did(5) del $?=”Akick Silinecek Nicki Yazın” $+ !*@*
    }
    if ($did == 16) {
      cs akick $did(5) list
    }
    if ($did == 17) {
      cs akick $did(5) view
    }
    if ($did == 19) {
      cs set $did(5) founder $?=”Yeni Founder Nickini Yazın”
    }
    if ($did == 20) {
      cs set $did(5) desc $?=”Yeni Açıklama Girin”
    }
    if ($did == 22) {
      cs set $did(5) password $?=”Yeni Şifreyi Girin”
    }
    if ($did == 23) {
      cs set $did(5) url http:// $+ $?=”Yeni URL Adresi Girin”
    }
    if ($did == 24) {
      cs set $did(5) topiclock on
    }
    if ($did == 25) {
      cs set $did(5) email $?=”Yeni EMAIL Adresi Girin”
    }
    if ($did == 26) {
      cs set $did(5) entrymsg $?=”Yeni Giriş Mesajını Yazın”
    }
    if ($did == 27) {
      cs set $did(5) topiclock off
    }
    if ($did == 29) {
      cs set $did(5) keeptopic on
    }
    if ($did == 30) {
      cs set $did(5) keeptopic off
    }
    if ($did == 32) {
      cs set $did(5) private on
    }
    if ($did == 33) {
      cs set $did(5) private off
    }
    if ($did == 35) {
      cs set $did(5) restricted on
    }
    if ($did == 36) {
      cs set $did(5) restricted off
    }
    if ($did == 38) {
      cs set $did(5) secureops on
    }
    if ($did == 39) {
      cs set $did(5) secureops off
    }
    if ($did == 42) {
      cs levels $did(5) set autoprotect $?=”Seviye Girin”
    }
    if ($did == 43) {
      cs levels $did(5) dis autoprotect
    }
    if ($did == 45) {
      cs levels $did(5) set autoop $?=”Seviye Girin”
    }
    if ($did == 46) {
      cs levels $did(5) dis autoop
    }
    if ($did == 48) {
      cs levels $did(5) set autohalfop $?=”Seviye Girin”
    }
    if ($did == 49) {
      cs levels $did(5) dis autohalfop
    }
    if ($did == 51) {
      cs levels $did(5) set autovoice $?=”Seviye Girin”
    }
    if ($did == 52) {
      cs levels $did(5) dis autovoice
    }
    if ($did == 55) {
      cs levels $did(5) set acc-change $?=”Seviye Girin”
    }
    if ($did == 56) {
      cs levels $did(5) dis acc-change
    }
    if ($did == 57) {
      cs levels $did(5) set acc-list $?=”Seviye Girin”
    }
    if ($did == 58) {
      cs levels $did(5) dis acc-list
    }
    if ($did == 60) {
      cs levels $did(5) set akick $?=”Seviye Girin”
    }
    if ($did == 61) {
      cs levels $did(5) dis akick
    }
    if ($did == 63) {
      cs levels $did(5) set set $?=”Seviye Girin”
    }
    if ($did == 64) {
      cs levels $did(5) dis set
    }
  }
}
Remotenize Ekledikten Sonra /cspanel Yazarak Panele Ulaşabilirsiniz

Alıntıdır