takildim yardim - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Kursat_Y · 12 Mart 2005, 04:03

selam arkadaslar ben bir koruma hazirliyorum fakat bir yerde takildim kaldim korumanin islevi kanalda turkce harici sohbetlere uyari yapmasi icin ugrasiyorum fakat txt dosyasina kayit ettigim yabanci kelimelerden en az 3 kelimeyi yakalarsa uayriyi gonderecek usera fakat ben bu kodda takildim yani yazilan textte en az uc yabanci kelime yabancidil.txt dosyasinda varsa uyar bu kodlamayi nasil yapabilirim ??

DefauLt · 12 Mart 2005, 09:53

Test etmedim... Bunu kullanabilirsin;

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

alias _ykontrol {
  var %i 1 , %ret
  %yfile = yabanci textlerin oldugu dosya
  while %i <= $numtok($1-,32) {
    if $read(%yfile,w,$+(*,$gettok($1-,%i,32),*),1) {
      %ret = $calc(%ret + 1)
    }
    inc %i
  }
  if %ret >= 3 {
    return $true
  }
}

on *:text:*:#: {
  if $_ykontrol($strip($1-)) != $null {
    kick # $nick Yabanci dil konusmak yasaktir...
  }
}

Kursat_Y · 12 Mart 2005, 22:36

deafult kod calismadi veya ben calistiramadim diyelimki doya ismi yabanci.txt ben bunu
%yfile = yabanci.txt olarak yaziyorum yanlismi yapiyorum? ve bu sekild ecalismiyor
if $read(%yfile,w,$+(*,$gettok($1-,%i,32),*),1) { bu satirda takiliyor kaliyor kod

Kursat_Y · 12 Mart 2005, 22:44

default kusura bakma tamma buldum sorunu kod ok saol
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
özele !yardim yazildiginda yardim kanalına sajoinlemek	BunaLim	mIRC Scripting Sorunları	2	15 Eylül 2009 15:36

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.