mIRC Scripting  


Geri dön   mIRC Scripting > mIRC Scripting > Help - Yardım

Help - Yardım mIRC Scripting hakkında her konuda yardım alabileceğiniz bölümdür.

Like Tree1Teşekkür
  • 1 Post By CoCoRiCo
Cevapla
 
LinkBack Seçenekler
  #1  
Alt 13 Şubat 2021, 19:39
Avatar Yok

mS Puan: 1
mS Derece: High
 
Üyelik tarihi: 25 Ocak 2021
Bulunduğu yer: Samsun
Mesajlar: 17
Konular: 5
Eklentiler: 0
Alınan Teşekkür: 0
Yapılan Teşekkür: 6
Standart Pencere Sorunu.

HTML-Kodu:
on @*:TEXT:*:#: {
  ;4 +o +h +v11'ler bu değerden etkilenmeyecekler.
  if ($nick !isreg #) return
  var %l = $strip($1-)
  if ($hmatch(badwords,%l)) {
    ban -u5000 # $nick 3
    kick # $nick 0,1FORBiDDEN:10 Uygunsuz kelimeler;4 Küfür, Hakaret Argo vb10 Kelimeler kullandığınız için kanaldan uzaklaştırıldınız.
  }
}
alias badwords {
  if ($1 == ekle) && ($regex($2,[A-Za-z])) {
    if !$hget(badwords) { hmake badwords 1000 }
    hadd badwords $2
    secho  $2  4veritabanina başarıyla eklendi
    hsave badwords badwords.data
  }
  elseif ($1 == sil) {
    if ($hfind(badwords,$2)) {
      hdel badwords $2
      secho $2 11veritabanindan başarıyla silindi
      hsave badwords badwords.data
    }
    else { secho $2 7veritabaninda bulunamadı }
  }
  elseif ($1 == list) {
    var %x = 1 
    while (%x <= $hget(badwords,0).item) {
      set %hbadwords $addtok(%hbadwords,$hget(badwords,%x).item,1)
      if ($numtok(%hbadwords,32) >= 7) { secho $replace(%hbadwords,$chr(1),$+($chr(32),-,$chr(32))) | unset %hbadwords }
      inc %x
    }
    if ($numtok(%hbadwords,32) >= 1) { secho $replace(%hbadwords,$chr(1),$+($chr(32),-,$chr(32)))  | unset %hbadwords }
  }
  else { secho 11hatalı işlem }
}
alias secho {
  ;echo -a $1-
  if (!$window(@BADWORDS)) { window -en @BADWORDS }
  echo @BADWORDS $+($chr(40),$time,$chr(41),$chr(32),$1-)
}
on *:start: { 
  if !$hget(badwords) { hmake badwords 1000 }
  if !$isfile(badwords.data) { hsave badwords badwords.data } 
  hload badwords badwords.data 
}
Selam arkadaşlar yukarıda vermiş olduğum KOD küfür koruması (Badwords) eklenen kelimeleri @Badwords penceresinde göstermek de fakat benim isteğim. Küfür sebebiyle atılan kişinin hangi kanalda hangi kelime (mask) sebebinden atıldığını da @Badwords penceresine yansıtması. Yardımcı olursanız sevinirim teşekkürler.
Alıntı ile Cevapla
Sponsored Links
  #2  
Alt 12 Mart 2021, 12:50
CoCoRiCo - ait Kullanıcı Resmi (Avatar)
Meraklı Zır Cahil 🤓👽
 Chief 

mS Puan: 571
mS Derece: CoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo Çalışkan
 
Üyelik tarihi: 10 Temmuz 2009
Bulunduğu yer: \xml:http\
Yaş: 43
Mesajlar: 137
Konular: 22
Eklentiler: 0
Alınan Teşekkür: 88
Yapılan Teşekkür: 20
Standart

Kod:
kick # $nick... 
altına..
$iif($window(@badwords),window @badwords),echo @badwords $+($chan,'kandalında,>,$nick,>,$v1) sebebiyle atıldı.. )
High buna teşekkür etti.
__________________
3m2t
//alias $str($+(alias,$chr(32)),4) | alias
Alıntı ile Cevapla
Cevapla

Etiketler
pencere, sorunu

Seçenekler

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Remote ve Veriables Sorunu _HyuGa_ Help - Yardım 6 30 Ekim 2016 01:12
mIRC Pencere Ayarı Prens Help - Yardım 2 17 Mayıs 2014 18:33
Ban Sorunu comanche Help - Yardım 2 09 Şubat 2014 21:45
oper admin ban kick sorunu reu Help - Yardım 0 28 Ağustos 2012 07:51
Raw Sorunu WeiLSiDe Help - Yardım 2 24 Eylül 2009 13:29


Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting©
Powered by vBulletin®
Copyright © 2000-2015, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.1

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76