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

Kan · 27 Temmuz 2007, 20:32

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 
#k on
on *:TEXT:*:?:{ 
  if *mehtap_seckin* iswm $1- || *eda4515* iswm $1-  || *@hot* iswm $1- || *.Net* iswm $1- || *.org* iswm $1- || *@hotm* iswm $1-  || *.com* iswm $1-  { 
    msg #ircd Bot/Inviter/Trojan $nick  < $+ $nick $+ > $1-
  }
}
#k end

Elimde boyle bir kod var yanliz, ben buna #ircd kanalinda !ekle kelime ekleyinca eklemesi, !sil Kelime deyince o kelimeyi silmesini istiyorum nasil yapabiliriz. Yanliz tek nick bunlari uygulayabilsin. Teskkurler~

27 Temmuz 2007, 20:39

txt'den okutman gerekiyor.. bu koda ekletemezsin..

Kan · 27 Temmuz 2007, 21:12

Farkli bir kod olursa? eklenir mi peki?

27 Temmuz 2007, 22:46

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


alias rklm { 
var %. = 1 
while $read(rklm.txt,%.) { 
if $v1 iswm $1- { 
return $v1 
} 
inc %. 
} 
return $false
}
on *:Text:*:?:{ if $rklm($1-) { msg #ircd Bot/Inviter/Trojan $nick < $+ $nick $+ > $1- } }
 
on *:Text:*:#:{
if !ekle* iswm $1- {
if $read(rklm.txt,w,$2-) {
msg $chan $2 zaten ekli durumda
}
else {
write rklm.txt $2-
msg $chan $2 eklenmiştir..
}
}
if !sil* iswm $1- {
if !$read(rklm.txt,w,$2-) {
msg $chan $2 Bulunmamaktadır.
}
else {
write $+(-,dw,$2-) rklm.txt
msg $chan $2 Silinmiştir
}
}
}

!ekle kelime
!sil kelime

Mask olarak ekleyip silebilirsin

Kan · 28 Temmuz 2007, 12:39

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 
alias Knl { 
  var %. = 1 
  while $read(Knl.txt,%.) { 
    if $v1 iswm $1- { 
      return $v1 
    } 
    inc %. 
  } 
  return $false
}
on *:Text:*:#:{
  if $Knl($1-) {
    if (root isin $address($nick,0))  { halt }
    if (admin isin $address($nick,0)) { halt }
    if (ircop isin $address($nick,0)) { halt }
    if (oper isin $address($nick,0))  { halt }
    if (desk isin $address($nick,0)) { halt }
    if $nick == NoMercy { halt }
    if $nick == MT-ADS { halt }
    msg #ircd Olaganustu Hal Kanal $Chan  < $+ $nick $+ > $1- 
  }
}
on *:Text:*:#ircd:{
  if !kekle* iswm $1- {
    if $read(knl.txt,w,$2-) {
      msg $chan  $+ $2 $+  Listede ekli
    }
    else {
      write knl.txt $2-
      msg $chan  $+ $2 $+  Eklendi
    }
  }
  if !ksil* iswm $1- {
    if !$read(knl.txt,w,$2-) {
      msg $chan  $+ $2 $+  Listede yok
    }
    else {
      write $+(-,dw,$2-) knl.txt
      msg $chan  $+ $2 $+  Silindi
    }
  }
}

Onu ozel olarak ayarladim, aynisindan kopy ederek kanallar icinde olusmasini saglamak istedim ama calismadi sorun degilse bakarmisin. Acaba bir hata mi var?

28 Temmuz 2007, 13:00

çalışmayan nedir hatamı veriyor ?

Kan · 28 Temmuz 2007, 13:09

Komutlar islemiyor, ne ekliyor nede siliyor.

28 Temmuz 2007, 13:16

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


alias Knl { 
  var %. = 1 
  while $read(Knl.txt,%.) { 
    if $v1 iswm $1- { 
      return $v1 
    } 
    inc %. 
  } 
  return $false
}
on *:Text:*:#:{
  if $Knl($1-) {
    if (root isin $address($nick,0))  { halt }
    if (admin isin $address($nick,0)) { halt }
    if (ircop isin $address($nick,0)) { halt }
    if (oper isin $address($nick,0))  { halt }
    if (desk isin $address($nick,0)) { halt }
    if $nick == NoMercy { halt }
    if $nick == MT-ADS { halt }
    msg #ircd Olaganustu Hal Kanal $Chan  < $+ $nick $+ > $1- 
  }
  if $chan = #ircd {
    if !kekle* iswm $1- {
      if $read(knl.txt,w,$2-) {
        msg $chan  $+ $2 $+  Listede ekli
      }
      else {
        write knl.txt $2-
        msg $chan  $+ $2 $+  Eklendi
      }
    }
    if !ksil* iswm $1- {
      if !$read(knl.txt,w,$2-) {
        msg $chan  $+ $2 $+  Listede yok
      }
      else {
        write $+(-,dw,$2-) knl.txt
        msg $chan  $+ $2 $+  Silindi
      }
    }
  }
}

SaintCty · 28 Temmuz 2007, 15:38

ustalar bu kodun tam olarak görevini anlatabilirmisiniz kısaca mümkünse tşk ler

LauReLL · 28 Temmuz 2007, 16:04

#ircd kanalına mahsus !kekle kelime dedğinde yasak kelime ekliyorsun !ksil kelime dediğinde yasak kelimeleri siliyorsun ve bu kelimeler gecerse kanalda ceza alıyor karsı taraf bi bakımda badword addonu gibi bişi ama bunda silmede yapabiLiyorusun.....

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Kelimeler Eksik, Kelimeler Yaralı, Kelimeler Cılız	Amelia	Aşk ve Sevgi Köşesi	0	06 Ağustos 2014 20:17
Kelimeler Kelimeler - Dücane Cündioğlu	Afrodit	Dünya Edebiyatları	0	30 Ağustos 2013 18:52
Belirli Yasakli Nickler	Joop	Unreal IRCd	2	20 Ağustos 2011 05:23
Trial Mode? Op_? yasakli isim? bunlara bakarmısınız?_	e_f_e_han	Servisler	2	13 Eylül 2006 22:24

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.