mIRC Fullname yasaklama txt

Aytac

nicktag
Yönetici
Developer
Katılım
4 Şub 2020
Mesajlar
379
Tepkime puanı
50
Puanları
28
Konum
ircland
Web sitesi
www.ircalem.net
Kod:
on *:text:*:#:{
  if ($1 == !ekle) {
    if !$2 { msg # Lütfen ekliyeceginiz fullname'yi belirtiniz. | return }
    if $read(fullname.txt,w,$strip($2-)) { msg # Belirttiginiz Fullname Ekli. | return }
    .write fullname.txt $strip($2-)
    msg # [ $strip($2-) ] Yasaklı Fullname Olarak Eklenmişdir.
  }
  if ($1 == !sil) {
    if !$2 { msg # Lütfen sileceginiz fullname'yi belirtiniz. | return }
    if $read(fullname.txt,w,$strip($2-)) { .write $+(-dl,$readn) fullname.txt | msg # [ $strip($2-) ] Fullname listem'den silinmişdir. | return }
    else { msg # Belirttiginiz fullname listem'de bulunmamaktadır. | return }
  }
  if ($1 == !listele) {
    if $lines(fullname.txt) == 0 { msg # Fullname listesinde kayıt bulunmamaktadır. | return }
    var %t = 1 | while %t <= $lines(fullname.txt) {
      msg # 4 $+(%t,.)  $read(fullname.txt,%t)
      inc %t
    }
  }
}
raw 352:*:{ if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! } }

Koda Muaf ident eklemek istiyorsanız ;

Kod:
raw 352:*:{ if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! }

Bununla degiş;

Kod:
raw 352:*:{ if $istok(ident1 ident2 ident3 ident4,$3,32) { return } | if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! }

Yada Muaf identleri txt’den okutmak için;

Kod:
raw 352:*:{ if $read(mident.txt,w,$3) { return } | if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! }

Olarak ekleyiniz mirc.exe nin oldugu yere mident.txt dosyası açınız.
Muaf identleri txt’e alt alt’a

ident
ident1
ident2


Şeklinde ekleyiniz.
 
Üst