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/)
-   -   Küfür korumasına muaf kanal ekleme (https://www.ircforumlari.net/mirc-scripting-sorunlari/870513-kufur-korumasina-muaf-kanal-ekleme.html)

asılsız 20 Mayıs 2020 20:33
Küfür korumasına muaf kanal ekleme
 
arkadaşlar böyle bir küfür koruması var mircimde buna muaf kanal ekleyemedim forumda o kadar gezdim ama bulamadım bi yardımcı olursanız çok sevinirim teşekkürler şimdiden



menu status,menubar,channel {
.-
. KüfürBaz Ban..
..Açık:.enable #kufur | .echo -a KüfürBaz Ban Açıldı
..Kapalı:.disable #kufur | .echo -a KüfürBaz Ban Kapatıldı
.-
}

#kufur on
on *:text:*:#: {
if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
var %< = 1 | while (%< <= $lines(kufur.txt)) {
if $read(kufur.txt,%<) iswm $1- {
.mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
inc %<
}
}
#kufur end

Hesapsiz33 20 Mayıs 2020 21:40
Cevap: Küfür korumasına muaf kanal ekleme
 
Alıntı:
asılsız Nickli Üyeden Alıntı (Mesaj 1042310189)
arkadaşlar böyle bir küfür koruması var mircimde buna muaf kanal ekleyemedim forumda o kadar gezdim ama bulamadım bi yardımcı olursanız çok sevinirim teşekkürler şimdiden



menu status,menubar,channel {
.-
. KüfürBaz Ban..
..Açık:.enable #kufur | .echo -a KüfürBaz Ban Açıldı
..Kapalı:.disable #kufur | .echo -a KüfürBaz Ban Kapatıldı
.-
}

#kufur on
on *:text:*:#: {
if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
var %< = 1 | while (%< <= $lines(kufur.txt)) {
if $read(kufur.txt,%<) iswm $1- {
.mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
inc %<
}
}
#kufur end
bu şekilde dener misin

Kod:
#kufur on
on *:text:*:#: {
  if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
  if (!$istok(#kanal1 #kanal2 #kanal3,$chan,32) {
    var %< = 1 | while (%< <= $lines(kufur.txt)) {
      if $read(kufur.txt,%<) iswm $1- {
      .mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
      inc %<
    }
  }
  #kufur end
extra muaf nickte olsun dersen ekledigim satırı
if (!$istok(#kanal1 #kanal2 #kanal3,$chan,32) && !$istok(Nick1 Nick2 Nick3,$chan,32)) {
olarak degişmen yeterli

asılsız 20 Mayıs 2020 21:59
Cevap: Küfür korumasına muaf kanal ekleme
 
Alıntı:
Hesapsiz33 Nickli Üyeden Alıntı (Mesaj 1042310221)
bu şekilde dener misin

Kod:
#kufur on
on *:text:*:#: {
  if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
  if (!$istok(#kanal1 #kanal2 #kanal3,$chan,32) {
    var %< = 1 | while (%< <= $lines(kufur.txt)) {
      if $read(kufur.txt,%<) iswm $1- {
      .mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
      inc %<
    }
  }
  #kufur end
extra muaf nickte olsun dersen ekledigim satırı
if (!$istok(#kanal1 #kanal2 #kanal3,$chan,32) && !$istok(Nick1 Nick2 Nick3,$chan,32)) {
olarak degişmen yeterli
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
* /elseif: invalid format (line 12, script8.txt)
-
böyle yazılar çıkmaya başladı bu kodu ekleyince

WooDPeCKeR 20 Mayıs 2020 22:07
Cevap: Küfür korumasına muaf kanal ekleme
 
Koda renkli olan kısımlarıı ekle, muaf kanal ve nicklerde editle kendine göre.

Kod:
on 1:text:*:#:{
if (!$istok(#kanal1 #kanal2 #kanal3,$chan,32) && !$istok(Nick1 Nick2 Nick3,$chan,32)) {
  var %::text = $1-
  if $hfind(kufur,$1-,1,W).data && $nick {
    mode # +b $nick | kick # $nick kötü söz kullandınız
  }
}
Yanlışmı anladım

asılsız 20 Mayıs 2020 22:34
Cevap: Küfür korumasına muaf kanal ekleme
 
Alıntı:
WooDPeCKeR Nickli Üyeden Alıntı (Mesaj 1042310246)
Koda renkli olan kısımlarıı ekle, muaf kanal ve nicklerde editle kendine göre.

Kod:
on 1:text:*:#:{
if (!$istok(#kanal1 #kanal2 #kanal3,$chan,32) && !$istok(Nick1 Nick2 Nick3,$chan,32)) {
  var %::text = $1-
  if $hfind(kufur,$1-,1,W).data && $nick {
    mode # +b $nick | kick # $nick kötü söz kullandınız
  }
}
Yanlışmı anladım

#KUFUR Unknown command
-
#KUFUR Unknown command
-
#KUFUR Unknown command
-
#KUFUR Unknown command
-
#KUFUR Unknown command
-
bu seferde böyle oldu

WooDPeCKeR 20 Mayıs 2020 23:05
Cevap: Küfür korumasına muaf kanal ekleme
 
Hangi kanalları muaf edeceksin yazarmısın ?

Alıntı:
asılsız Nickli Üyeden Alıntı (Mesaj 1042310189)
arkadaşlar böyle bir küfür koruması var mircimde buna muaf kanal ekleyemedim forumda o kadar gezdim ama bulamadım bi yardımcı olursanız çok sevinirim teşekkürler şimdiden



menu status,menubar,channel {
.-
. KüfürBaz Ban..
..Açık:.enable #kufur | .echo -a KüfürBaz Ban Açıldı
..Kapalı:.disable #kufur | .echo -a KüfürBaz Ban Kapatıldı
.-
}

#kufur on
on *:text:*:#: {
if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
var %< = 1 | while (%< <= $lines(kufur.txt)) {
if $read(kufur.txt,%<) iswm $1- {
.mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
inc %<
}
}
#kufur end

asılsız 20 Mayıs 2020 23:21
Cevap: Küfür korumasına muaf kanal ekleme
 
Alıntı:
WooDPeCKeR Nickli Üyeden Alıntı (Mesaj 1042310272)
Hangi kanalları muaf edeceksin yazarmısın ?
#mysevgi #gardiyan #bizimel

OperServ 20 Mayıs 2020 23:23
Cevap: Küfür korumasına muaf kanal ekleme
 
Merhaba kirmizi renkle belirledigim yerleri muafkanalari ekleyebilirsin

Kod:
menu status,menubar,channel {
.-
. KüfürBaz Ban..
..Açık:.enable #kufur | .echo -a KüfürBaz Ban Açıldı
..Kapalı:.disable #kufur | .echo -a KüfürBaz Ban Kapatıldı
.-
}


#kufur on
on *:text:*:#: {
  if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
    elseif !$istok(#muafkanal #muafkanal2 #muafkanal3,$chan,32) {
    var %< = 1 | while (%< <= $lines(kufur.txt)) {
      if $read(kufur.txt,%<) iswm $1- {
      .mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
      inc %<
    }
  }
}
  #kufur end

asılsız 20 Mayıs 2020 23:40
Cevap: Küfür korumasına muaf kanal ekleme
 
Alıntı:
OperServ Nickli Üyeden Alıntı (Mesaj 1042310277)
Merhaba kirmizi renkle belirledigim yerleri muafkanalari ekleyebilirsin

Kod:
menu status,menubar,channel {
.-
. KüfürBaz Ban..
..Açık:.enable #kufur | .echo -a KüfürBaz Ban Açıldı
..Kapalı:.disable #kufur | .echo -a KüfürBaz Ban Kapatıldı
.-
}


#kufur on
on *:text:*:#: {
  if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
    elseif !$istok(#muafkanal #muafkanal2 #muafkanal3,$chan,32) {
    var %< = 1 | while (%< <= $lines(kufur.txt)) {
      if $read(kufur.txt,%<) iswm $1- {
      .mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
      inc %<
    }
  }
}
  #kufur end
#KUFUR Unknown command
-
#KUFUR Unknown command
-
#KUFUR Unknown command
-
#KUFUR Unknown command
-
#KUFUR Unknown command
-
mirc dondu bu sefer

OperServ 20 Mayıs 2020 23:44
Cevap: Küfür korumasına muaf kanal ekleme
 
Tekrar alirmisiniz duzeltim

asılsız 21 Mayıs 2020 00:15
Cevap: Küfür korumasına muaf kanal ekleme
 
çok teşekkürler bu sefer oldu

Hesapsiz33 21 Mayıs 2020 00:37
Cevap: Küfür korumasına muaf kanal ekleme
 
kod calışıyor fakat bu kodda iswm olmasına ragmen kelime icinde yazılan küfüre islem yapmıyordu mesela kufur.txt icinde deneme ekli iken
deneme (atıyor)
selam deneme (atmıyor)
deneme selam (atmıyor) yani tekil yazılınca işlem yapıyordu düzeltildi.
isop || isvoice gibi fazlalıklar silindi.

[/CODE]
Kod:
#kufur on
on *:text:*:#: {
  if ($nick !isreg $chan) { return }
    elseif !$istok(#muafkanal #muafkanal2 #muafkanal3,$chan,32) {
    var %< = 1 | while (%< <= $lines(kufur.txt)) {
      if ($1 iswm $read(kufur.txt,%<)) {
      .mode $chan +b $address($nick,2) | kick # $nick 4,1[ Küfür ]  0,1 Yasak kelime kullandığınız için kanaldan uzaklaştırıldınız }
      inc %<
    }
  }
}
  #kufur end


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk