| sEntieL | 30 Ağustos 2014 10:11 |
Giren nicki görmüyor bu kodlama
Merhaba arkadaşlar, benim istediğim şu aşağıda belirttiğim kodlamada $13 fonksiyonu verilmiş fakat sunucuya giren kişinin nickini göreceğine yani
[Suspend VERSION]: Suspend Mirc 6.35 VERSION System
bunu gösteriyor
[09:11] -> [(class] VERSION
amacım sunucuya giren nicklere version çektirip kontrol ettirmek. Ama nick olarak algılamıyor yardımcı olabilirmisiniz?
$13 ü kaç yapmam gerekiyor? Kod:
alias WhileFix { dll WhileFix.dll $$1- }
alias test {
tokenize 32 $1-
if $8 == Client && $9 == connecting {
if %kkcceekk == on && %cekkanal != $null { sajoin $13 %cekkanal }
if %fidegis2 == on && $hmatch(fidegis2,$remove($gettok($14,1,64),$chr(40))) { chgident $13 %degisecekf2 }
if %fidegis == on { set %gitbak on | who $13 }
if %skoru == on {
hinc -mu $+ %sssure sskoru $13
if ($hmatch(sskoru,*,0) >= %ssnick) {
var %i 1
while %i <= $hmatch(sskoru,*,%i) {
zline $hmatch(sskoru,*,%i) 900 4Yoğun Giriş Tespit Edildi.
inc %i
}
}
}
if !$hmatch(dmuaf,$13) {
if %vkontrol == on {
if $remove($12,:) == %varport { hadd -m tkontrol $13 | ctcp $13 version }
}
if %vkontrol2 == on {
if $remove($12,:) == %varport2 { hadd -m tkontrol2 $13 | ctcp $13 version }
}
}
if %shunmod == on && %shuns != $null { shun $13 %shuns 4Geçici Shun }
if %nkontrol == on && $13 == $remove($gettok($14,1,64),$chr(40)) { zline $13 60 4Nick ve İdentd Benzer Olamaz, Lütfen 1 dk sonra tekrar bağlanın }
if %karalist == on && $hmatch(karalist,$13) {
kill $13 %karaliste
}
if (%fullak == on) && (fidegis != on) { who $13 }
if %identdak == on {
if $hfind(identd,$remove($gettok($14,1,64),$chr(40))) { zline $13 %sure %identdban }
}
if %girisler == on {
$iif(!$window(@GİRİSLER),window -nC @GİRİSLER) | echo -et @GİRİSLER 4 Sunucuya Giren Nick: 10 $qt($13) 4İp Adresi:12 $remove($gettok($14,2,64),$chr(41)) 4İdentd Adresi: 7 $remove($gettok($14,1,64),$chr(40)) 4Giriş Port:5 $remove($12,:) | halt
}
}
if $3 == QUIT && %girisler == on {
$iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]IŞLAR-Sunucu),window -nC @ÇIKIŞLAR) | echo -et @ÇIKIŞLAR 4 Sunucudan Çıkan Nick: 10 $qt($remove($gettok($2,1,33),:)) 4İp Adresi:12 $gettok($2,2,64) 4İdentd Adresi:7 $gettok($gettok($2,2,33),1,64) | halt
}
if $3 == NICK {
if %nickk == on {
var %rrumuz $remove($gettok($2,1,33),:)
var %nia $remove($4,:)
if $hfind(nickk,%rrumuz) { zline %nia %sure 4Kurallara Uyunuz. Agresif Nick Değişimi Yasaktır. }
}
if $hmatch(karalist,%rrumuz) { kill %nia %sure %karaliste }
}
if (%left == on) && ($3 == PART) && (*all channels* iswm $5-) {
zline $remove($gettok($2,1,33),:) %sure 4Uygun Çıkış Mesajı Değil.
}
if (%kkson == on) && ($3 == PART) && ($4 == %kksk) && ($hmatch(kksa,$remove($gettok($2,1,33),:))) { zline $remove($gettok($2,1,33),:) 900 4Hızlı Giris/Çıkış Kanal }
if %quit == on && $3 == NOTICE && $8 == client && $9 == exiting: { zline *@ $+ $remove($gettok($11,2,64),$chr(41)) %sure 4Saldırı Programı Olma Olasılığı }
if $3 == NOTICE && *VERSION* iswm $5- {
if $hmatch(tkontrol,$remove($gettok($2,1,33),:)) && !$hmatch(biktim,$1-) {
if (%d11ceza == on) { zline $remove($gettok($2,1,33),:) %sure 4Version Mesajınız Uygun Değil. | hdel -s tkontrol $remove($gettok($2,1,33),:) }
if (%d11ceza2 == on) { shun $remove($gettok($2,1,33),:) %sure 4Version Mesajınız Uygun Değil. | hdel -s tkontrol $remove($gettok($2,1,33),:) }
if (%d11ceza3 == on) { kill $remove($gettok($2,1,33),:) 4Version Mesajınız Uygun Değil. | hdel -s tkontrol $remove($gettok($2,1,33),:) }
if (%d11ceza4 == on) { sajoin $remove($gettok($2,1,33),:) %dkanal 4Version Mesajınız Uygun Değil. | hdel -s tkontrol $remove($gettok($2,1,33),:) }
}
if $hmatch(tkontrol2,$remove($gettok($2,1,33),:)) && $hmatch(biktim2,$1-) { zline $remove($gettok($2,1,33),:) 4Version Mesajınız Uygun Değil. | hdel -s tkontrol2 $remove($gettok($2,1,33),:) }
}
if ($3 == PRIVMSG) && (*#* iswm $4) && !$hmatch(muafkanal,$4) && $2 != $server && !$hmatch(sening,$remove($gettok($2,1,33),:)) {
var %nick = $remove($gettok($2,1,33),:), %i = $remove($5-,:)
if %raporing == on {
$iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]GENEL),window -nCk @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]GENEL) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]GENEL 4 $qt($remove($gettok($2,1,33),:)) 6 $4 1 $remove($5-,:)
}
if (%renk == on) && (o isin $usermode) || ($me isop $4) {
if $regex(%i,/[[:cntrl:]]/g) {
if %kzline == on { zline %nick %sure %karakterisk }
if %kshun == on { shun %nick %sure %karakterisk }
if %kban == on { mode $4 +b $address(%nick,2) }
if %kkick == on { mode $4 +b $address(%nick,2) | kick $4 %nick %karakterisk }
}
}
if (*~* !iswm $nick($4,%nick).pnick) && (*+* !iswm $nick($4,%nick).pnick) && (*@* !iswm $nick($4,%nick).pnick) && (*&* !iswm $nick($4,%nick).pnick) && (*%* !iswm $nick($4,%nick).pnick) {
if !$hfind(yasaklar,%i) {
if %kufuring == on {
if (%kzline == on) && (o isin $usermode) {
if $hmatch(kufuring,%i) { zline %nick %sure %kufur | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Küfür Koruması }
}
if %kshun == on && (o isin $usermode) {
if $hmatch(kufuring,%i) { shun %nick %sure %kufur | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Küfür Koruması }
}
if %kban == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(kufuring,%i) { mode $4 +b $address(%nick,2) | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Küfür Koruması }
}
}
if %kkick == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(kufuring,%i) { mode $4 +b $address(%nick,2) | kick $4 %nick %kufur | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Küfür Koruması }
}
}
}
if %reklaming == on {
if (%kzline == on) && (o isin $usermode) {
if $hmatch(reklaming,%i) { zline %nick %sure %reklam | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Reklam Koruması }
}
if %kshun == on && (o isin $usermode) {
if $hmatch(reklaming,%i) { shun %nick %sure %reklam | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Reklam Koruması }
}
if %kban == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(reklaming,%i) { mode $4 +b $address(%nick,2) | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Reklam Koruması }
}
}
if %kkick == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(reklaming,%i) { mode $4 +b $address(%nick,2) | kick $4 %nick %reklam | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Reklam Koruması }
}
}
}
if %telefoning == on {
if (%kzline == on) && (o isin $usermode) {
if $hmatch(telefoning,%i) { zline %nick %sure %telefon | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Telefon Koruması }
}
if %kshun == on && (o isin $usermode) {
if $hmatch(telefoning,%i) { shun %nick %sure %telefon | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Telefon Koruması }
}
if %kban == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(telefoning,%i) { mode $4 +b $address(%nick,2) | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Telefon Koruması }
}
}
if %kkick == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(telefoning,%i) { mode $4 +b $address(%nick,2) | kick $4 %nick %telefon | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Telefon Koruması }
}
}
}
if %cinseling == on {
if (%kzline == on) && (o isin $usermode) {
if $hmatch(cinseling,%i) { zline %nick %sure %cinsel | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Cinsel Koruması }
}
if %kshun == on && (o isin $usermode) {
if $hmatch(cinseling,%i) { shun %nick %sure %cinsel | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Cinsel Koruması }
}
if %kban == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(cinseling,%i) { mode $4 +b $address(%nick,2) | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Cinsel Koruması }
}
}
if %kkick == on {
if (o isin $usermode) || $me isop $4 {
if $hmatch(cinseling,%i) { mode $4 +b $address(%nick,2) | kick $4 %nick %cinsel | var %v1 $v1 | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri),window -nC @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri) | echo -et @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Sebepleri 4 $4 1Kanalında 3 %nick 'i 12 %v1 1Prefixyle Banlamışsınız. 4Cinsel Koruması }
}
}
}
}
if %tekraring == on {
var %graf $remove($5-,$chr(32))
if ($len(%graf) > 4) {
if (%tharf == 1) {
if (o isin $usermode) || ($me isop $remove($4,:)) {
hinc -mu4 tekraring $+($4,%nick,%graf) 1
if ($hget(tekraring,$+($4,%nick,%graf)) == 2) { msg $4 UYARI: %nick %tekraruyar }
if ($hget(tekraring,$+($4,%nick,%graf)) == 3) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %tekraringsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %tekraringsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %tekraringsebep } }
}
}
}
if (%tharf == 0) {
hinc -mu150 tekrardat $+($4,%nick,%graf)
if ($hmatch(tekrardat,$+($4,%nick,%graf)) > 2) && (o isin $usermode) || ($me isop $remove($4,:)) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %tekraringsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %tekraringsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %tekraringsebep } }
}
}
}
}
if %uzunyazi == on {
if ($len(%i) > 350) {
if (%uyazi == 1) {
if (o isin $usermode) || ($me isop $remove($4,:)) {
hinc -mu150 uyari1 %nick 1 | msg $4 UYARI: %nick %uzunyuyar
if ($hget(uyari1,%nick) >= 2) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %uzunyazisebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %uzunyazisebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %uzunyazisebep } }
}
}
}
if (%uyazi == 0) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %uzunyazisebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %uzunyazisebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %uzunyazisebep } }
}
}
}
if %uzunharfing == on {
if $regex(%i,/([[:print:]])\1\1/gi) >= 3 {
if (%uharf == 1) {
if (o isin $usermode) || ($me isop $remove($4,:)) {
hinc -mu150 uuzatma %nick 1 | msg $4 UYARI: %nick %uzunhuyar
if ($hget(uuzatma,%nick) >= 2) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %uzunharfsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %uzunharfsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %uzunharfsebep } }
}
}
}
if (%uharf == 0) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %uzunharfsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %uzunharfsebep,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %uzunharfsebep } }
}
}
}
if %flooding == on {
if %fflood == 1 {
hinc -mu1 flooding %nick 1
if ($hget(flooding,%nick) == 2) { msg $4 UYARI: %nick %floodinguyar }
if ($hget(flooding,%nick) >= 3) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %flood,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %flood,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %flood } }
}
}
if (%fflood == 0) {
hinc -mu2 floodtwo %nick 1
if ($hget(floodtwo,%nick) >= 4) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %flood,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %flood,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %flood } }
}
}
}
if %buyukharfing == on {
if ($len(%i) < 10) return
var %text = $strip($remove(%i,$chr(32)))
var %non.caps = $len($removecs(%text,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z))
var %full.line = $len($strip($remove(%text,$chr(32))))
var %percent = $calc(1 - (%non.caps / %full.line))
if (%percent >= 0.8) {
if (%bharf == 1) {
if (o isin $usermode) || ($me isop $remove($4,:)) {
hinc -mu300 uyari3 %nick 1 | msg $4 UYARI: %nick %buyukhuyar
if $hget(uyari3,%nick) >= 2 {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %buyukharf,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %buyukharf,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %buyukharf } }
}
}
}
if (%bharf == 0) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %buyukharf,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %buyukharf,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %buyukharf } }
}
}
}
}
}
if (%kkson == on) && ($3 == JOIN) && ($remove($4,:) == %kksk) {
hadd -mu $+ %kkss kksa $remove($gettok($2,1,33),:)
}
if %nickk == on && $3 == JOIN {
hadd -mu $+ %ssaniye nickk $remove($gettok($2,1,33),:)
}
if (%jpart == on) && ($3 == JOIN) {
var %nickn $remove($gettok($2,1,33),:)
if !$hmatch(sening,%nickn) {
var %bann $gettok($2,2,64)
var %ban $remove($4,:) $+ %nickn
hinc -mu10 jpart %ban
if $hget(jpart,%ban) > 2 {
if %kzline == on { $iif(o isin $usermode,zline %nickn %sure %joinpart,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nickn %sure %joinpart,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if (o isin $usermode) || ($me isop $remove($4,:)) { mode $remove($4,:) +b $address(%nickn,2) } }
if %kkick == on { if (o isin $usermode) || ($me isop $remove($4,:)) { mode $remove($4,:) +b $address(%nickn,2) | kick $remove($4,:) %nickn %joinpart } }
}
}
}
if (%bots == on) && ($3 == JOIN) {
var %rumuz $remove($gettok($2,1,33),:)
var %ayar ufuk $+ $4
hinc -mu $+ %ksaniye %ayar %rumuz
if ($hget(%ayar,0).item >= %kuser) {
mode $remove($4,:) +m
var %i 1
while %i <= $hget(%ayar,0).item {
if %kzline == on { zline $hget(%ayar,%i).item 900 4Botnet Saldırı }
if %kshun == on { shun $hget(%ayar,%i).item 900 4Botnet Saldırı }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $remove($4,:) +b $address($hget(%ayar,%i).item,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $remove($4,:) +b $address($hget(%ayar,%i).item,2) | kick $remove($4,:) $hget(%ayar,%i).item 4Botnet Saldırı } }
inc %i
}
.timer 1 1 mode $remove($4,:) -m
}
}
if ($3 == SILENCE) {
if ($4 == +*!*@*) { silence -*!*@* }
if ($4 == +chanserv!*@*) { silence -chanserv }
if ($4 == +nickserv!*@*) { silence -nickserv }
if ($4 == +memoserv!*@*) { silence -memoserv }
if ($4 == +operserv!*@*) { silence -operserv }
if ($4 == +helpserv!*@*) { silence -helpserv }
if ($4 == +adminserv!*@*) { silence -adminserv }
if ($4 == +statserv!*@*) { silence -statserv }
}
if (%baning == on) && ($3 == MODE) && ($5 == +b) {
if ($6 == $me $+ !*@*) { kick $4 $remove($gettok($2,1,33),:) %banko }
if (*netadmin* iswm $6) || (*coadmin* iswm $6) || (*servicesadmin* iswm $6) || (*ircop* iswm $6) { os mode $4 -b $v2 }
}
if $3 == PRIVMSG) && ($6 == ACTION) && (%actioning == on) {
var %nick $remove($gettok($2,1,33),:)
if !$hmatch(sening,%nick) && !$hmatch(muafkanal,$4) {
if %kzline == on { $iif(o isin $usermode,zline %nick %sure %action,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Zline 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kshun == on { $iif(o isin $usermode,shun %nick %sure %action,echo -a 4HATA: 12Oper Girmediğiniz ve Koruma Menüsündeki Ceza Türünüz 4Shun 12Olduğu İçin İşlem Yapamadım. Lütfen 4/oper nick şifre 12Komutuyla Operinizi Aktif Ediniz.) }
if %kban == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) } }
if %kkick == on { if o isin $usermode || $me isop $remove($4,:) { mode $4 +b $address(%nick,2) | kick $4 %nick %joinpart } }
}
}
if (%onotice == on) && ($3 == NOTICE) && ($4 == $me) {
var %i $strip($remove($5-,:))
var %nickname $gettok($2,2,64)
var %nick $remove($gettok($2,1,33),:)
if !$hmatch(sening,%nick) {
if $hmatch(ozeling,%i) { silence + $+ *!*@ $+ %nickname | echo -s 4 %nickname 1Silence Edildi. 6 Saniye İçerisinde Penceresi Otomatik Kapanıcak. | .timer 1 6 close -m %nick }
}
}
if (%ozelink == on) && ($3 == PRIVMSG) && (*#* !iswm $4) && ($2 != $server) {
var %i $strip($remove($5-,:))
var %nickname $gettok($2,2,64)
var %nick $remove($gettok($2,1,33),:)
if !$hmatch(sening,%nick) {
if $hmatch(ozeling,%i) { msg %nick %ozelmesajsebep | silence + $+ *!*@ $+ %nickname | echo -sa 4 %nickname 1Silence Edildi. 6 Saniye İçerisinde Penceresi Otomatik Kapanıcak | .timer 1 3 close -m %nick }
}
}
}
raw 311:*: {
set %4 $4 | .timer 1 4 unset %4
}
|
