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/)

- - takildim yardim (https://www.ircforumlari.net/mirc-scripting-sorunlari/1710-takildim-yardim.html)

Kursat_Y

12 Mart 2005 04:03

takildim yardim

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:

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 :)

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