Ana Sayfa Dini Filmler  Dini Hikayeler   Dini BiLgiLer  NaMaz KLip İzLe Arama

islami Chat

   Ana Sayfa
   Dini Sohbet
  Damar Sözler
  Abdest - Gusul
  bedava program indir
  Biraz TebeSSum
  Cennet - Cehennem
  Dantel Örgü - El İşleri
  Dini Film izle
  Dini BiLgiLer
  Dini Chat Hazır Kodlar
  Dini Chat OdaLari
  Dini Chat özel videoLar
  Dini Chat Unreal Özel
  Dini Hikayeler
  Dini Mirc Komutlari
  Dini ResimLer
  Dini Ruya tabirleri
  Dini Sohbetler
  Dinim islam
  Diyet Listeleri
  Dualar
  Edebiyat
  Fikralar
  Güzel Sözler
  Hanım Sahabiler
  Hazir Mesajlar
  iLahi Sözleri
  iLahi Dinle
  islam da Kadin
  Kadın Giyim Takı Moda
  Kurban
  Mahrem Konular
  Mobilya Dekorasyon
  Namaz
  ölum ve Kabir Hayati
  Osmanlı Tarihi
  Peygamberler - Evliyalar
  PratiK BiLgiLer
  Ramazan ve Oruc
  ResimLi Sözler
  Ruh
  Sağlik
  Sesli Siirler
  Sihir Şeytan Ruh
  Siirler
  Yemek tarifleri
  Şifalı Bitkiler
  iletişim
 
sitemap

GogLe sitemap         

 Küfür Koruması

Küfür Koruması - dini sohbet etme siteniz - en sevdiğiniz islami sohbet - youtube`de yayinlanan masal muzik şiir klip ezgi - kaliteli dini chat odalari - islami chat mynet sohbet mirc indir  
 

Okunma

2204
dini sohbet
dialog kufur {
  title "Küfür Koruması [ NaTSuKa ]"
  size -1 -1 138 186
  option dbu
  edit "", 1, 7 10 61 10
  list 2, 7 22 60 50, size
  button "Ekle", 3, 7 74 27 12, flat
  button "Sil", 4, 39 74 27 12, flat
  check "Opları (@)", 5, 85 21 41 10, flat
  check "Voiceler (@)", 6, 85 10 42 10, flat
  combo 7, 7 102 52 51, size
  button "Ekle", 8, 7 154 24 9, flat
  button "Sil", 9, 35 154 23 9, flat
  box "Küfür listesi", 13, 3 2 71 88
  box "Ayrılan Nickler", 14, 3 92 63 76
  box "Ayrılan Kanallar", 15, 73 92 62 76
  box "Ayır", 16, 78 2 56 33
  button "Sil", 10, 106 154 23 9, flat
  button "Ekle", 11, 78 154 24 9, flat
  combo 12, 78 102 52 51, size
  box "İşlemler", 17, 78 37 56 53
  radio "Opersem Kline", 18, 83 47 47 10, flat
  radio "Opersem Kill", 19, 83 57 47 10, flat
  radio "Opsam Kick", 20, 83 67 47 10, flat
  check "Banla", 21, 83 77 27 10, flat
  button "Kapat", 22, 97 171 37 12, flat ok
}
alias kufur { /dialog -m kufur kufur }
on *:dialog:kufur:init:*: {
  if ($isfile(kufur.txt) == $false) { write -c kufur.txt } | else { loadbuf -o $dname 2 kufur.txt }
  if (%knickler) .didtok $dname 7 32 $ifmatch
  if (%kufkanal) .didtok $dname 12 32 $ifmatch
  if (%klineat) { .did -c $dname 18 }
  if (%killat) { .did -c $dname 19 }
  if (%kickat) { .did -c $dname 20 }
  if (%banla) { .did -c $dname 21 }
  if (%oplar) { .did -c $dname 5 }
  if (%vlar) { .did -c $dname 6 }
}
on *:dialog:kufur:sclick:*: {
  if ($did == 18) { if ($did(18).state == 1) { .set %klineat on | .unset %killat | .unset %kickat } | else { .unset %klineat } }
  if ($did == 19) { if ($did(19).state == 1) { .set %killat on | .unset %klineat | .unset %kickat } | else { .unset %killat } }
  if ($did == 20) { if ($did(20).state == 1) { .set %kickat on | .unset %killat | .unset %klineat } | else { .unset %kickat } }
  if ($did == 21) { if ($did(21).state == 1) { .set %banla on } | else { .unset %banla } }
  if ($did == 3) { write kufur.txt $did(1) | did -a $dname 2 $did(1) | did -r $dname 1 }
  if ($did == 4) { write -dl $+ $did(2).sel kufur.txt | did -d $dname 2 $did(2).sel }
  if ($did == 8) { if ($did(7) != $null) { set -u %sk $did(7) | if (%sk) && (!$istok(%knickler,%sk,32)) { .set %knickler $addtok(%knickler,%sk,32) | did -a $dname 7 %sk } } }
  if ($did == 9) { if ($did(7).sel > 0) { .set %knickler $remtok(%knickler,$did(7).seltext,1,32) | did -d $dname 7 $did(7).sel | did -c $dname 7 1 } }
  if ($did == 11) { if ($did(12) != $null) { set -u %ek $did(12) | if (%ek) && (!$istok(%kufkanal,%ek,32)) { .set %kufkanal $addtok(%kufkanal,%ek,32) | did -a $dname 12 %ek } } }
  if ($did == 10) { if ($did(12).sel > 0) { .set %kufkanal $remtok(%kufkanal,$did(12).seltext,1,32) | did -d $dname 12 $did(12).sel | did -c $dname 12 1 } }
  if ($did == 5) { if ($did(5).state == 1) { .set %oplar on } | else { .unset %oplar } }
  if ($did == 6) { if ($did(6).state == 1) { .set %vlar on } | else { .unset %vlar } }
}
on *:text:*:#: {
  if $istok(%kufkanal,#,32) == $true { halt }
  if $istok(%knickler,$nick,32) == $true { halt }
  if ($nick isop #) && (%oplar == on) { return }
  if ($nick isvo #) && (%vlar == on) { return }
  korukufurden $1-
}
alias korukufurden {
  var %HR $strip($1-) , %_: $lines(kufur.txt)
  while (%_:) {
    if $read(kufur.txt,%_:) iswm %HR iswm %HR {
      if (%banla == on) { .mode $chan +b $wildsite }
      if (%klineat == on) { .kline $nick Lutfen kufur etmeyin }
      if (%killat == on) { .kill $nick Lutfen kufur etmeyin }
      if (%kickat == on) { .kick $chan $nick Lutfen kufur etmeyin }
      return
    }
    dec %_:
  }

  Yorumlar

 
GüZeL SöZ/ Kim Benim Hakkımda


Ali Ercan - Alan Dünya


papatyalı anglez modelleri


oval anglez modelleri


2012 nişan dügün Davetiye Modelleri


modern anglez modelleri


sabah duamız


HayırLı CumaLar Kardeşim


BekLiyoruM


ÖmRüMe


Manyağı Makbuldür


Dibi Tutmasın


Copyright © 2009 mIRCte 2023 Tüm Hakları Saklıdır Dinichat.Net

Desing By eFe