oper sifresi deneyenlere uyari
 

*** Notice --- [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) attempts to OPER as arananadam :Password incorrect

süreli olursa 10 dk içinde falan olsun

ilk deneyişte uyari gonderecek #oper kanalina
ikince deneyişte kill atacak
üçünçü deneyişinde kline atsin istiyorum
yaparsaniz cok sevinirim arkadaşlar

/elseif: invalid format (line 458, defter.sys)
diyor kardes

on ^*:snotice:*: {
if attempts to OPER isin $1- {
inc -u10 %oper. [ $+ [ $1 ] ] 1
if %oper. [ $+ [ $1 ] ] >= 3 {
kline $2 Oper flood yapma!
}
echo -a [Bilgi] > $1-2 Oper Denedi
if !$window(@CipriX) { window -a @CipriX} {
aline @CipriX [Bilgi] > $1-2 Oper Denedi
}
}
}

olmuyor kardes
aynen usttekinden lazim ama ustteki hepsini bir yapiyor teker teker yapmiyor ve sonra hata veriyor

on *:snotice:*attempts*to*OPER*:{
if ($eval($+(%tf,$nick),2) == $null) {
set %tf [ $+ [ $2 ] ] 1 | .msg #oper $9 oper sifresi girmeye calisiyor
}
elseif ($eval($+(%tf,$nick),2) == 1) {
inc %tf [ $+ [ $2 ] ] | .kill $9 Fazla kasma!
}
elseif ($eval($+(%tf,$nick),2) == 2) {
unset %tf [ $+ [ $2 ] ]
.kline $9 fazla kasma demiştim.
}
}
Yukarıda arkadaşın verdiği değerlere göre yazdım.Umarım çalışır

kardeş çalışmadı yaa :(

Çalışacağından emin değilim ama istersen bir de bunu dene:

on *:SNOTICE:*attempts to OPER* incorrect*:{
inc -u600 $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
var %' = $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
if $(%',2) = 1 { msg #oper $gettok(%',2,46) yanlış oper şifresi girdi. }
if $(%',2) = 2 { kill $gettok(%',2,46) 2. uyarı }
if $(%',2) = 3 { kline $+(*@,$gettok(%',3-,46)) | unset %' }
}


Umarım işine yarar..

on *:SNOTICE:*attempts to OPER* incorrect*:{
inc -u60 $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
var %' = $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
if $(%',2) = 1 { msg #opers $gettok(%',2,46) yanlış oper şifresi girdi. }
if $(%',2) = 2 { kill $gettok(%',2,46) Uyari Almistiniz Oper Pasinizi Duzgun Giriniz Oper Passiniz Yok ise Denemeyiniz!! }
if $(%',2) = 3 { kline $+($gettok(%',2,46)) Uyarilmistiniz Oper Passi Denememe Konusunda! | unset %' }
}


bu sekilde oldu kardes bir kac yerini duzelttim saolun Allah razi olsun

benim bildiiim bunun önlemi zaten OperServ de Alınmış olması lazım Zaten Bir Kaç kere girdiinde Ototmatik kill yiyo Kullanıcı ama Gene Ortada Verilmiş Emek Var ellerinize Sağlık

arkadaslar bu kod sadece belirli operlerin passlarini denedinmi calisiyor
oper pass salladimmi calismiyor yardim edebilirmisiniz

o modulle oluyor..

valla bildigime gore crde o modul yok sanirim

on *:snotice:*attempts to OPER as*: {
inc -u600 %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] 1
if %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] == 1 {
.msg #oper $gettok($left($4,$calc($pos($4,!)-1)),1,40) Nick'i Yanlıs Oper Girdi..
}
if %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] == 2 {
.kill $gettok($left($4,$calc($pos($4,!)-1)),1,40) Fazla Sansını Zorlama...!
}
if %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] == 3 {
.kline * $+ $mid($4,$pos($4,@),$len($4)) Fazla Sansını Denedin Kaybettin..
unset %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ]
}
}

Kardes bunu dene calısması lazım hem yanlıs oper sifresi girenlere calısıyor hemde oper nickki tutmayanlara atıyor

on *:SNOTICE:*attempts to OPER* operator*:{
inc -u60 $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
var %' = $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
if $(%',2) = 1 { msg #admin 4UYARI!!! $gettok(%',2,46) nick'li kişi OPER denemesi yapıyor. | msg $+($gettok(%',2,46)) 4UYARI!!! Hatalı oper pass girdiniz! }
if $(%',2) = 2 { msg #admin 4UYARI!!! $gettok(%',2,46) nick'li kişi 2. Kez Yanlış OPER PASS girdi ve killendi. | /kill $gettok(%',2,46) 2Uyari Almistiniz Oper Pasinizi Duzgun Giriniz Oper Passiniz Yok ise Denemeyiniz!! }
if $(%',2) = 3 { msg #admin 4UYARI!!! $gettok(%',2,46) nick'li kişi 3. Kez Yanlış OPER PASS girdi ve güvenlik nedeniyle serverden uzaklaştırıldı.! | /kline $+($gettok(%',2,46)) 2Uyarilmistiniz Oper Passi Denememe Konusunda! | unset %' }
}

calısıyor denedim

<KoRKuLuK> UYARI!!! OzAn nick'li kişi OPER denemesi yapıyor.
<KoRKuLuK> UYARI!!! OzAn nick'li kişi 2. Kez Yanlış OPER PASS girdi ve killendi.
* OzAn has quit IRC (Kill by [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] (2Uyari Almistiniz Oper Pasinizi Duzgun Giriniz Oper Passiniz Yok ise Denemeyiniz!!

Yanıt: oper sifresi deneyenlere uyari
 

on *:SNOTICE:*attempts to OPER* incorrect*:{
inc -u60 $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
var %' = $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
if $(%',2) = 1 { msg #opers $gettok(%',2,46) yanlış oper şifresi girdi. }
if $(%',2) = 2 { kill $gettok(%',2,46) Uyari Almistiniz Oper Pasinizi Duzgun Giriniz Oper Passiniz Yok ise Denemeyiniz!! }
if $(%',2) = 3 { kline $+($gettok(%',2,46)) Uyarilmistiniz Oper Passi Denememe Konusunda! | unset %' }
}


*** Notice -- Failed OPER attempt by deneme ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) using UID Koruma [FAILEDAUTH]

KeNDim YaPMaYa ÇaLıŞTım NoTiCe KısMıNı DeĞiŞTiReReK aMa, YaPaMaDım.. NaSıL YaPaBiLiRiz ?

Yanıt: oper sifresi deneyenlere uyari
 

sunucun unreal galiba

on *:SNOTICE:*attempts to OPER* incorrect*:{

yukaridaki kismi asagidakiyle deistirip denermisin

on *:SNOTICE:*Failed OPER attempt* incorrect*:{

Yanıt: oper sifresi deneyenlere uyari
 

ÇaLıŞMıYoR..

Yanıt: oper sifresi deneyenlere uyari
 

evet çaLışmıyorrr ?

Yanıt: oper sifresi deneyenlere uyari
 

on *:snotice:*attempts to OPER as*: {
inc -u600 %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] 1
if %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] == 1 {
.msg #oper $gettok($left($4,$calc($pos($4,!)-1)),1,40) Nick'i Yanlıs Oper Girdi..
}
if %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] == 2 {
.kill $gettok($left($4,$calc($pos($4,!)-1)),1,40) Fazla Sansını Zorlama...!
}
if %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ] == 3 {
.kline * $+ $mid($4,$pos($4,@),$len($4)) Fazla Sansını Denedin Kaybettin..
unset %operinc [ $+ [ $gettok($left($4,$calc($pos($4,!)-1)),1,40) ] ]
}
}

Bunu denedinizmi ??

Yanıt: oper sifresi deneyenlere uyari
 

Çalışmıyorrrrrrrrrrrrrrr!

Yanıt: oper sifresi deneyenlere uyari
 

umarım işinize yarar

Yanıt: oper sifresi deneyenlere uyari
 

ilk verdiğim kodda hata yapmışım ama nedense kimsenin gözüne çarpmamış ilginç:)

Yanıt: oper sifresi deneyenlere uyari
 

ŞiMDi Bu ÇaLıŞıYoR Mu :D

Yanıt: oper sifresi deneyenlere uyari
 

ben deneyipte yanlış girenleri değilde

AbC nickine sahib operpassı yada Oper nickiyle login olunca gline atsın istiyorum

bu mümkünmü ?

statuste bunu yapan gline yesin

[17:03] -IRC.x.net- AbC ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [AbC] is now an operator (O)

[AbC] operini girenlere gline sanırım anlatabildim :)

Yanıt: oper sifresi deneyenlere uyari
 

on *:snotice:*:{ if (an operator isin $1-) && (AbC isin $1-) { gline $1 sebeb } }
;$1 i nick olarak gördüğünü varsaydım.

Yanıt: oper sifresi deneyenlere uyari
 

çalışmadı :)

denedim olmadı

Yanıt: oper sifresi deneyenlere uyari
 

Artık mirce girmediğim ve bir serverda oper olmadığım icin kodu deneyemeden veriyorum.Sorun verebilecek iki nokta var.Birincisi $1 in farklı bir numara alması,ikincisi gline komutu.İkisini kontrol ettikten snra halledebilirsin.