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)

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: 02:31.

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