ON 1:OPEN:?: {
  if ($address($nick,2) != $null) {
    echo $query($nick) 10>> Nick:4 $nick 10IP:4 $address($nick,2) 
echo $query($nick) 10>> $nick :4 $comchan($nick,1) $comchan($nick,2) $comchan($nick,3) 10Sizin BuLunduğunuz KanaLLarda..
  }
}

n0=Kufur
n1=
n2=on @*:text:*:#: {
n3=  if ($nick isop #) && (%oplar == on) { return }
n4=  if ($nick isvo #) && (%vlar == on) { return }
n5=  _swer_ $1-
n6=}
n7=
n8=
n9=alias _swer_ {
n10=  var %x $strip($1-) , %i $numtok(%soyush,44)
n11=  while (%i) {
n12=    if ($gettok(%soyush,%i,44) iswm %x) || ($gettok(%soyush,%i,44) isin %x) {
n13=      if (%kiket == on) { .kick # $nick 1Argo-Hakaret-Kötü Söz Yasaktır... %logo | notice $nick 1[7BiLgi Mesajı1]: 1Kurallara uymayan davranış sergilediğiniz için4 $chan 1Kanalından 15 dk. Uzaklaştırıldınız. Kanaldan uzaklaştırılma sebebinin Hatalı olduğunu ya da uzaklaştırılma Sebebinizi bilmiyorsanız, öğrenmek istiyorsanız; 3/query $me 1komutunu kullanarak özelimden lütfen beni uyarınız.12My4net 1Sohbet Kuralları hakkında daha detaylı bilgi almak için 5/motd 1yapabilirsiniz.12My4net1 Hoş Sohbetler diler...  }
n14=        if (%banet == on) { .ban $iif(%banvaxt isnum,-u $+ %banvaxt) # $nick 2 }
n15=        return
n16=      }
n17=      dec %i
n18=    }
n19=  }
n20=
n21=
n22=  dialog swear {
n23=    title "Kufur Koruma"
n24=    size -1 -1 185 81
n25=    option dbu
n26=    box "Eklenecek Kufuru Girin", 1, 90 1 94 79
n27=    combo 2, 94 10 87 53, size
n28=    button "Ekle", 3, 98 66 31 10
n29=    button "Sil", 4, 144 65 31 10
n30=    box "", 5, 96 60 36 18
n31=    box "", 6, 142 60 36 18
n32=    box "Yapilacal islem", 7, 2 2 84 45
n33=    check "Kick ", 8, 5 13 39 10
n34=    check "Ban ", 9, 5 31 32 10
n35=    edit "", 10, 36 30 23 12, disable
n36=    text "Saniye", 11, 62 32 21 8, disable
n37=    box "Ayir", 12, 2 49 84 31
n38=    check "@plar", 13, 6 57 77 10
n39=    check "+Voiceler", 14, 6 68 75 10
n40=  }
n41=
n42=  alias bad { .dialog -m swear swear }
n43=
n44=  on *:dialog:swear:init:*:{
n45=    if (%soyush) didtok $dname 2 44 $ifmatch
n46=    if (%kiket) { .did -c $dname 8 }
n47=    if (%banet) { .did -c $dname 9 | did -e $dname 10,11 }
n48=    if (%oplar) { .did -c $dname 13 }
n49=    if (%vlar) { .did -c $dname 14 }
n50=    did -a $dname 10 %banvaxt
n51=  }
n52=
n53=  on *:dialog:swear:sclick:*:{
n54=    if ($did == 3) {
n55=      if ($did(2) != $null) { set -u %artir $did(2) | if (%artir) && (!$istok(%soyush,%artir,44)) { .set %soyush $addtok(%soyush,%artir,44) | did -a $dname 2 %artir } } 
n56=    }
n57=    if ($did == 4) { if ($did(2).sel > 0) { .set %soyush $remtok(%soyush,$did(2).seltext,1,44) | did -d $dname 2 $did(2).sel | did -c $dname 2 1 } }
n58=    if ($did == 8) { if ($did(8).state == 1) { .set %kiket on } | else { .unset %kiket } }
n59=    if ($did == 9) { if ($did(9).state == 1) { .set %banet on | did -e $dname 10,11 } | else { .unset %banet | did -b $dname 10,11 } }
n60=    if ($did == 13) { if ($did(13).state == 1) { .set %oplar on } | else { .unset %oplar } }
n61=    if ($did == 14) { if ($did(14).state == 1) { .set %vlar on } | else { .unset %vlar } }
n62=  }
n63=
n64=  on *:dialog:swear:edit:*:{
n65=    %banvaxt = $did(10)
n66=  }