IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Çözüldü Komutları Oper & Adminlerden Başkası Kullanamasın (https://www.ircforumlari.net/mirc-scripting-sorunlari/717030-komutlari-oper-amp-adminlerden-baskasi-kullanamasin.html)

Smith 25 Kasım 2015 19:50

Komutları Oper & Adminlerden Başkası Kullanamasın
 
Merhaba arkadaşlar öncelikle konu doğru yerdemi emin değilim ama deilse bile moderatör arkadaşlardan ricam doğru yere alırlarsa sevinirim ve kusura bakmayın dileklerimi sunarım şimdi size sorucağım soruya gelelim..
Mesela botumu #bot kanalında !emirler yazıldığında o kanala giren herkez çıkartabiliyor komutları ben bunu engellemek için sadece oper admin server admin net admin gibi yada !operekle !adminekle !nerekle vs eklediğim sunusu yetkilileri bu komutları görebilsin çıkartabilsin ve kullanabilsin istiyorum nasıl yapabilirim yardımcı olurmusunuz rica etsem. koduda veriyorum şimdiden saolun.
Kod:

on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
}

bu kod emirler fazla ama ben kısalttım yardımınızı bekliyorum.

q0kh4n 25 Kasım 2015 20:00

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
Kod:

on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    if (!$regex($address($nick,2),/(Server|admin|network|services)/i)) { .msg # Yetkisiz nick. | halt }
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
}


Smith 25 Kasım 2015 20:13

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
Alıntı:

q0kh4n Nickli Üyeden Alıntı (Mesaj 1041700801)
Kod:

on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    if (!$regex($address($nick,2),/(Server|admin|network|services)/i)) { .msg # Yetkisiz nick. | halt }
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
}


Hocam teşekkürler ama ben admiim ama banada bu mesajı verdi
[20:12] <Sysbot> Yetkisiz nick.
bunu !operekle !adminekle vs göre çeviremezmiyiz benim eklediğim kişiler kullanabilsin sadece ustam.

q0kh4n 25 Kasım 2015 20:27

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
hostunda belirttiğim 4 kelimeden biri yoksa o uyarıyı verir. şimdi denedim bende çalışıyor

Smith 25 Kasım 2015 20:35

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
Alıntı:

q0kh4n Nickli Üyeden Alıntı (Mesaj 1041700812)
hostunda belirttiğim 4 kelimeden biri yoksa o uyarıyı verir. şimdi denedim bende çalışıyor

yetkim kurtarıyor sorun yok hocam server adminim.

Aytac 25 Kasım 2015 22:49

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    if !$istok(nick nick1 nick2,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
}

Kırmızı ile belirttigim yerlere nickleri yaz .Nickler yan yana cogaltabilirsin.

Smith 26 Kasım 2015 01:41

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
Alıntı:

Aytac Nickli Üyeden Alıntı (Mesaj 1041700895)
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    if !$istok(nick nick1 nick2,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
}

Kırmızı ile belirttigim yerlere nickleri yaz .Nickler yan yana cogaltabilirsin.

Hocam buna bota ekledigim adminler öperler vs aracılığı ile yapsak ornek !operekle nick dedigizmi a.txt kayıt alan adminler ve !operekle nick dedigimizdede o.txt kayıt alan öperler kullansa.

Aytac 26 Kasım 2015 02:32

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
Alıntı:

Smith Nickli Üyeden Alıntı (Mesaj 1041700995)
Hocam buna bota ekledigim adminler öperler vs aracılığı ile yapsak ornek !operekle nick dedigizmi a.txt kayıt alan adminler ve !operekle nick dedigimizdede o.txt kayıt alan öperler kullansa.



Kod:

on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    if !$read(admin.txt,w,$nick) { msg # Bu komutu kullanmaya yetkili degilsin. | return }
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
  if $1 == .oper {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if !$2 { msg # Komut kullanımı; .oper ekle - sil - list | return }
    if $2 == ekle {
      if $read(admin.txt,w,$3) { msg # Belirtilen Nick listede ekli. | return }
      .write admin.txt $3 | msg # $3 komut kullanma yetkisi eklendi.
    }
    if $2 == sil {
      if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
      .write $+(-ds,$3) admin.txt | msg # $3 komut kullanma yetkisinden silindi.
    }
    if $2 == list {
      if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
      msg # Komut kullanma Listesi
      msg # 
      var %:niko = 1 | while %:niko <= $lines(admin.txt) {
        msg # %:niko $+ -) $read(admin.txt,%:niko)
        inc %:niko
      }
      msg # 
      msg # Komut kullanma Listesi Sonu
    }
  }
}


Smith 26 Kasım 2015 03:28

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
Alıntı:

Aytac Nickli Üyeden Alıntı (Mesaj 1041701005)
Kod:

on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    if !$read(admin.txt,w,$nick) { msg # Bu komutu kullanmaya yetkili degilsin. | return }
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
  if $1 == .oper {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if !$2 { msg # Komut kullanımı; .oper ekle - sil - list | return }
    if $2 == ekle {
      if $read(admin.txt,w,$3) { msg # Belirtilen Nick listede ekli. | return }
      .write admin.txt $3 | msg # $3 komut kullanma yetkisi eklendi.
    }
    if $2 == sil {
      if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
      .write $+(-ds,$3) admin.txt | msg # $3 komut kullanma yetkisinden silindi.
    }
    if $2 == list {
      if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
      msg # Komut kullanma Listesi
      msg #
      var %:niko = 1 | while %:niko <= $lines(admin.txt) {
        msg # %:niko $+ -) $read(admin.txt,%:niko)
        inc %:niko
      }
      msg #
      msg # Komut kullanma Listesi Sonu
    }
  }
}


Hocam çok teşekkürler sizden son ricam botu eklenilen öperler ve aminlerin eklenmesini yanlızca ben ve network adminler gerceklestirsin istiyorum network ve ben harici kimse operekle ve adminekle yapamasin size zahmet.
Birde kullanımını yazarmisiniz nasıl ekle sil listeye bakma vs yapacağız.

Aytac 26 Kasım 2015 10:13

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
if ! $istok (Smith,$nick,32) bu kısımları

if ! $istok (Smith nick1 nick2 nick3, $nick,32) nick1 nick2 nick3 olan yerlere network adminlerin nicklerini yaz , nickleri o sekilde cogalta bilirsin .

Kullanimi;

.oper ekle nick
.oper sil nick
.oper list


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 20:31.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net