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/)
-   -   Ban acma (https://www.ircforumlari.net/mirc-scripting-sorunlari/535677-ban-acma.html)

Darnasus 25 Haziran 2013 14:26

Ban acma
 
Kod:

alias eklemek {
  if ($read(banlar.txt,w,* $+ %muafnck $+ *)) { /echo -a 5 %muafnck 2Listede Mevcut. }
  else { /write banlar.txt * $+ %muafnck $+ * | /echo -a 4 %muafnck 2Listeye Eklenmiştir. }
}
alias listelemek {
  if (!$lines(banlar.txt)) { /echo -a 2Listede Hiç Kayıt Bulunmamaktadır. | halt }
}
alias listedekiler {
  window -m @MuafListe 
  /echo @MuafListe 2Muaf Nickler Listesi Sıralanıyor..
  /echo @MuafListe  - -
  var %lst = 1
  while %lst <= $lines(banlar.txt) {
    /echo @MuafListe 2 %lst $+(-,4) $read(banlar.txt,%lst)
    inc %lst
  }
  /echo @MuafListe  - -
  /echo @MuafListe 2Muaf Nickler Listesi Sonu..
}

alias silmek {
  if (!$read(banlar.txt,w,* $+ %silnick $+ *)) { /echo -a 4 %silnick 2Nicki Listede Bulunmamaktadır. }
  else { /write -dw * $+ %silnick $+ * banlar.txt | /echo -a 4 %silnick 2Listeden Silinmiştir. }
}
alias banacikmi {
  if ($group(#baann).status == on) { /echo -ta 4Oto Ban Açma Modu Zaten Aktif. }
  else { /enable #baann | /echo -a 4Oto Ban Açma Modu Aktifleştirildi. }
}
alias bankapalimi {
  if ($group(#baann).status == off) { /echo -ta 4Oto Ban Açma Modu Zaten Kapalı. }
  else { /disable #baann | /echo -ta 4Oto Ban Açma Modu Kapatıldı. }
}
menu status {
  -
  .&» Oto Ban Modu
  .&Açık:/banacikmi
  .&Kapat:/bankapalimi
  .&Durum:/set %banlarr $group(#baann).status | /echo -a 2Şuanda4 $replacecs(%banlarr,on,Açık,off,Kapalı)
  .&Ekle:/set %muafnck $$?="Nick Giriniz" | /eklemek
  .&Sil:/set %silnick $$?="Nick Giriniz" | /silmek
  .&Listele:/listelemek | /listedekiler
}
#baann on
on *:ban:#: {
  if ($me isop $chan) || ($me ishop $chan) {
    var %aa = 1
    var %bb = $lines(banlar.txt)
    while (%aa <= %bb) {
      if ($read(banlar.txt,%aa) iswm $2) { /mode $chan -b $2 }
      inc %aa
    }
  }
}
#baann end

Merhaba,

Yukaridaki remote ile listeye ekledigim nick&hostlari korumaya aliyorum. Prefix sahibi olduğum kanallarda bu listede olan nick ve hostlara ban atildiginda otomatik olarak bani aciyor. Prefixim olmadigi halde de diger kanallarda bu remotenin calimasini nasil saglariz. Oper/Admin yetkisine sahip kisilerce de kullanilabilsin.

Toprak 25 Haziran 2013 15:20

Cevap: Ban acma
 
Bu kısmı kaldırırsanız istediginiz olur;

Kod:

if ($me isop $chan) || ($me ishop $chan) {
alt kısımdanda bir tane
Kod:

}
silmeyi unutmayınız...

Code;

Kod:

on *:ban:#: {
    var %aa = 1
    var %bb = $lines(banlar.txt)
    while (%aa <= %bb) {
      if ($read(banlar.txt,%aa) iswm $2) { /mode $chan -b $2 }
      inc %aa
    }
}



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

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