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

Smith 27 Kasım 2015 02:43

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

Aytac Nickli Üyeden Alıntı (Mesaj 1041701042)
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

Teşekkürler usta deniyecegim henüz deneyemexim.

Smith 27 Kasım 2015 13:09

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] eklediğim oper admin.txt çıkmıyor usta kendi ekli nickimle .emirler yapıyorum [<Sysbot> Bu komutu kullanmaya yetkili degilsin. diyor çalışmıyor :S

Aytac 27 Kasım 2015 13:34

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

Smith Nickli Üyeden Alıntı (Mesaj 1041701518)
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] eklediğim oper admin.txt çıkmıyor usta kendi ekli nickimle .emirler yapıyorum [<Sysbot> Bu komutu kullanmaya yetkili degilsin. diyor çalışmıyor :S



Kod:

if ! $istok (Smith nick1 nick2 nick3, $nick,32)
bu kısmı yanlış yazmısım aşagıdaki gibi yab. hepsini

Kod:

if !$istok(Smith Aytac LazraiL qralx,$nick,32)

kendinide admin.txt eklemen lazım.

.oper ekle Smith

Not: Hangi bot bu, bu işlemler sadece komut listesini görmek yada görmemek için geçerli , komutlari uygularken sorun olabilir.

Smith 27 Kasım 2015 14:14

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

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

if ! $istok (Smith nick1 nick2 nick3, $nick,32)
bu kısmı yanlış yazmısım aşagıdaki gibi yab. hepsini

Kod:

if !$istok(Smith Aytac LazraiL qralx,$nick,32)

kendinide admin.txt eklemen lazım.

.oper ekle Smith

Not: Hangi bot bu, bu işlemler sadece komut listesini görmek yada görmemek için geçerli , komutlari uygularken sorun olabilir.

usta yaptımda oper ekleme & silme yapmai.

Aytac 27 Kasım 2015 14:30

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
verdigin kodlara göre yabtık kodda sıkıntı yok, sen bota monte ederken yanlıslık yabuyosundur yada botun kodları farklı olabilir.

Smith 27 Kasım 2015 14:40

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

Aytac Nickli Üyeden Alıntı (Mesaj 1041701542)
verdigin kodlara göre yabtık kodda sıkıntı yok, sen bota monte ederken yanlıslık yabuyosundur yada botun kodları farklı olabilir.

botta problem yokki usta mesela bende söyle bir kod var bunu !oeprekle !opersil !adminekle !adminsil çevirirmisiiz size zahmet bu kod çalışıyor silme vs eklenirse iyi olur.
Kod:

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    .write admin.txt $2 | msg #bot  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesine eklendi.
  }
  else { .msg #  $nick $+ , Bu komutu yalnızca özel adminler kullanabilir.
  }
}


Aytac 27 Kasım 2015 15:08

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

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Aytac,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    .write admin.txt $2 | msg #bot  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesine eklendi.
  }
  if !adminsil isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    .write $+(-ds,$2) admin.txt $2 | msg #bot  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesinden silindi.
  }
  if !adminlist isin $1 {
    if !$istok(Smith,$nick,32) { msg #bot Komutu kullanmaya yetkili degilsin. | return }
    msg #bot Komut kullanma Listesi
    msg #bot
    var %:niko = 1 | while %:niko <= $lines(admin.txt) {
      msg #bot %:niko $+ -) $read(admin.txt,%:niko)
      inc %:niko
    }
    msg #bot
    msg #bot Komut kullanma Listesi Sonu
  }   
  else { .msg #  $nick $+ , Bu komutu yalnızca özel adminler kullanabilir.
  }
}


Smith 27 Kasım 2015 15:20

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

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

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Aytac,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    .write admin.txt $2 | msg #bot  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesine eklendi.
  }
  if !adminsil isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    .write $+(-ds,$2) admin.txt $2 | msg #bot  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesinden silindi.
  }
  if !adminlist isin $1 {
    if !$istok(Smith,$nick,32) { msg #bot 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
  }   
  else { .msg #  $nick $+ , Bu komutu yalnızca özel adminler kullanabilir.
  }
}


hocam teşekkürler birde sun birşey atıyorum userele (+v) verdiğimde veyahut aldığımda gibi fonksiyonlarda bile hep bu yazı çıkıyor..
[15:18] <Sysbot> Ayaz, Bu komutu yalnızca özel adminler kullanabilir.
birde bu komutu kullandığımdada bu yazı çıkıyor..
[15:18] <Smith> !adminsil DeneK
[15:18] <Sysbot> DeneK: Server Bot kullanım admin yönetici listesinden silindi.
[15:18] <Sysbot> Smith, Bu komutu yalnızca özel adminler kullanabilir.
------------------------------------------------
[15:20] <Smith> !adminekle DeneK
[15:20] <Sysbot> DeneK: 4Server 2 Bot kullanım admin yönetici listesine eklendi.
[15:20] <Sysbot> Smith, Bu komutu yalnızca özel adminler kullanabilir.
--------------------------------------------------------------
<+deneK> .emirler
<&Sysbot> Bu komutu kullanmaya yetkili degilsin.
<&Sysbot> deneK, Bu komutu yalnızca özel adminler kullanabilir.
-------------------------------------------------------------
GİBİ.

KuL 27 Kasım 2015 15:30

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

Kod:

  else { .msg #  $nick $+ , Bu komutu yalnızca özel adminler kullanabilir.
  }

Kismi fazla, zaten $istok larda ! eklenmis ve uyari mesaji yanina yazilmis, bu yüzden en altdaki else ye gerek olmayacaktir, bu yüzden Uyariyi aliyorsundur.

Smith 27 Kasım 2015 15:33

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

KuL Nickli Üyeden Alıntı (Mesaj 1041701568)
Kodda altdaki

Kod:

  else { .msg #  $nick $+ , Bu komutu yalnızca özel adminler kullanabilir.
  }

Kismi fazla, zaten $istok larda ! eklenmis ve uyari mesaji yanina yazilmis, bu yüzden en altdaki else ye gerek olmayacaktir, bu yüzden Uyariyi aliyorsundur.

O kısmı kaldırdım usta birde her ekleme yaptığımda ekliyor ekli olan kişiye bu kişi zaten ekli gibi mesaj verse.
[15:34] <Smith> !adminekle DeneK
[15:34] <Sysbot> DeneK: 4Server 2 Bot kullanım admin yönetici listesine eklendi.
[15:34] <Smith> !adminekle DeneK
[15:34] <Sysbot> DeneK: 4Server 2 Bot kullanım admin yönetici listesine eklendi.
[15:35] <Smith> !adminekle DeneK
[15:35] <Sysbot> DeneK: 4Server 2 Bot kullanım admin yönetici listesine eklendi.

Aytac 27 Kasım 2015 15:50

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

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Aytac,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick listede ekli. | return }
    .write admin.txt $2 | msg #  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesine eklendi.
  }
  if !adminsil isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick zaten yok. | return }
    .write $+(-ds,$2) admin.txt $2 | msg # $2 $+ : 4Server 2 Bot kullanım admin yönetici listesinden silindi.
  }
  if !adminlist isin $1 {
    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 27 Kasım 2015 16:02

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

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

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Aytac,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick listede ekli. | return }
    .write admin.txt $2 | msg #  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesine eklendi.
  }
  if !adminsil isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick zaten yok. | return }
    .write $+(-ds,$2) admin.txt $2 | msg # $2 $+ : 4Server 2 Bot kullanım admin yönetici listesinden silindi.
  }
  if !adminlist isin $1 {
    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
  }
}


[16:01] <Smith> !adminekle DeneK
[16:01] <Sysbot> Belirtilen Nick listede ekli.
[16:01] <Smith> !adminsil DeneK
[16:01] <Sysbot> Belirtilen Nick zaten yok.
diye hata alıyorum hocam diğerinde sorun yok ama !adminsil'de var.

Aytac 27 Kasım 2015 16:12

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

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Aytac,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick listede ekli. | return }
    .write admin.txt $2 | msg #  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesine eklendi.
  }
  if !adminsil isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick zaten yok. | return }
    .write $+(-ds,$2) admin.txt | msg # $2 $+ : 4Server 2 Bot kullanım admin yönetici listesinden silindi.
  }
  if !adminlist isin $1 {
    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
  }
}

Sunu dene bakam.

Smith 27 Kasım 2015 16:44

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

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

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Aytac,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick listede ekli. | return }
    .write admin.txt $2 | msg #  $2 $+ : 4Server 2 Bot kullanım admin yönetici listesine eklendi.
  }
  if !adminsil isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick zaten yok. | return }
    .write $+(-ds,$2) admin.txt | msg # $2 $+ : 4Server 2 Bot kullanım admin yönetici listesinden silindi.
  }
  if !adminlist isin $1 {
    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
  }
}

Sunu dene bakam.

[16:45] <Smith> !adminekle DeneK
[16:45] <Sysbot> DeneK: 4Server 2 Bot kullanım admin yönetici listesine eklendi.
[16:45] <Smith> !adminsil DeneK
[16:45] <Sysbot> Belirtilen Nick zaten yok.

Aytac 27 Kasım 2015 16:46

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
admin.txt içine bak bakalım var mı orda nickler ?

KuL 27 Kasım 2015 16:54

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

on *:text:*:#:{
  if !adminekle isin $1 {
    if !$istok(Aytac,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if $read(admin.txt,w,$2) { msg # Belirtilen Nick listede ekli. | return }
    .write admin.txt $2 | msg #  $2 $+ : Server Bot kullanım admin yönetici listesine eklendi.
  }
  if !adminsil isin $1 {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if !$read(admin.txt,w,$2) { msg # Belirtilen Nick zaten yok. | return }
    .write $+(-ds,$2) admin.txt | msg # $2 $+ : Server Bot kullanım admin yönetici listesinden silindi.
  }
  if !adminlist isin $1 {
    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
  }
}

Sanirim hizli yazarken gözden kacmis olabilir Kodda, !adminsil Komutunda read de önünde unutulan bir Ünlem Isareti yüzünden o Uyariyi alabilirsin.

Üstde paylasmis oldugum sekilde eklersen Aytac in Kodunu calisacaktir.

Emegine saglik Aytac

Smith 27 Kasım 2015 17:31

Cevap: Komutları Oper & Adminlerden Başkası Kullanamasın
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] & @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Yardımlarınızdan dolayı çok teşekkür ederim kod şuan sorunsuz. Emeğinize sağlık.


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk