Badword Protection

mIRC sorun, ders, addon ve script paylaşım bölümü..
Post Reply
BeRkaN
Posts: 9
Joined: 30 Nov 2010, 18:57

Badword Protection

Post by BeRkaN » 30 Nov 2010, 19:03

#### Topic: Badword Protection
#### Coder: BeRkaN

Code: Select all

on *:TEXT:*:#: {
  var %r = 1
  while (%r <= $lines(badword.txt)) {
    if ($read(badword.txt,%r) isin $1-) {
      inc % [ $+ [ $nick ] ]
      badwordskickchecker $nick $chan
    }
    inc %r 
  }
}
alias badwordsKickchecker {
  if (% [ $+ [ $1 ] ] == 1) {
    msg $2  [ Badword Detected ] $1 No excessive swearing please! 1,0 «4•1»
  }
  elseif (% [ $+ [ $1 ] ] == 2) {
    kick $2 $1 No excessive swearing please! 
  }
  elseif (% [ $+ [ $1 ] ] == 3) {
    ban -k $2 $1 2 No excessive swearing please!
    unset % [ $+ [ $1 ] ]
  }
}
mIRC in ana klasörüne badword.txt Dosyasi aciyoruz we icine istedigimiz badword leri koyuyoruz!
Nasil Calisiyor ?
1. Küfür de Uyario
2. Küfür Kickliyor
3. Küfür der Banliyor

Soru ve Yardim icin Konuya msj attin

Saygilar

Post Reply

Who is online

Users browsing this forum: No registered users and 1 guest