IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   CR'de girişde ident kontrolü ve mesaj (https://www.ircforumlari.net/mirc-scripting-sorunlari/25482-crde-girisde-ident-kontrolu-ve-mesaj.html)

el33t 08 Ekim 2006 17:06

Yanıt: CR'de girişde ident kontrolü ve mesaj
 
O zaman kodu biraz değiştirmemiz gerekecek, işte yeni kod:

Kod:

on *:snotice:*client connecting*:{ if $idcheck($right($gettok($10,1,64),-1)) { .msg $9 Hoşgeldiniz! } | else { var %d = $+(%,idc.,$9) | inc -e $(%d,1) | if $(%d,2) > 1 { kline $9 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] dan bağlanın. } | else { kill $9 Lütfen identdinizi java yapıp tekrar bağlanın. } } }
alias -l idcheck { var %_ = 1 | while $gettok(%identcontrol,%_,44) { if $v1 iswm $1 { return $true } | inc %_ } | return $false }

Umarım bu işine yarar...

xqw 08 Ekim 2006 23:58

Yanıt: CR'de girişde ident kontrolü ve mesaj
 
el33t, bir sorun oluştu kline attığımız kişinin banı açıldığında identini düzeltip giriş yapsa bile bir daha kline yiyor bunu nasıl düzeltebiliriz?

el33t 11 Ekim 2006 20:54

Yanıt: CR'de girişde ident kontrolü ve mesaj
 
Kodu satır satır açıkladım, gördüğün gibi dediğini yapacak bir şey yok. Yani doğru identdle giriş yapılıyorsa kill ya da kline atılmıyor. Önce doğru identdse hoşgeldiniz mesajı atılıyor.

Kod:

;Eğer içinde client connecting olan bir server notice alırsak
on *:snotice:*client connecting*:{
;eğer belirttiğimiz identdlerden biri giriş yaptıysa Hoşgeldiniz diye mesaj atıyoruz
  if $idcheck($right($gettok($10,1,64),-1)) { .msg $9 Hoşgeldiniz! }
;eğer belirttiğimiz identd dışı giriş olursa
  else {
;%d diye lokal bir variable'a %idc.nick değişkeni olur
    var %d = $+(%,idc.,$9)
;mIRC kapanınca silinen bu %idc.nick değişkeni bir arttırılır.
    inc -e $(%d,1)
;eğer bu değer 1den fazlaysa kline atılır
    if $(%d,2) > 1 { kline $9 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] dan bağlanın. }
;eğer küçük eşit 1 ise
    else {
;kill atılır.
      kill $9 Lütfen identdinizi java yapıp tekrar bağlanın.
    }
  }
}


xqw 12 Ekim 2006 00:59

Yanıt: CR'de girişde ident kontrolü ve mesaj
 
iyide mirc hiç kapanmıyor kline attıktan sonra otomatik sildiremezmiyiz?

el33t 12 Ekim 2006 01:21

Yanıt: CR'de girişde ident kontrolü ve mesaj
 
Kod:

if $(%d,2) > 1 { kline $9
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
dan bağlanın. }

kısmını

Kod:

if $(%d,2) > 1 { kline $9
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
dan bağlanın. | unset $(%d,1) }

olarak değiştirirsen kline attıktan sonra değişken silinecektir.

Kablosuz NET 20 Mayıs 2008 20:43

Cevap: Yanıt: CR'de girişde ident kontrolü ve mesaj
 
Alıntı:

el33t Nickli Üyeden Alıntı (Mesaj 179287)
Kodu satır satır açıkladım, gördüğün gibi dediğini yapacak bir şey yok. Yani doğru identdle giriş yapılıyorsa kill ya da kline atılmıyor. Önce doğru identdse hoşgeldiniz mesajı atılıyor.

Kod:

;Eğer içinde client connecting olan bir server notice alırsak
on *:snotice:*client connecting*:{
;eğer belirttiğimiz identdlerden biri giriş yaptıysa Hoşgeldiniz diye mesaj atıyoruz
  if $idcheck($right($gettok($10,1,64),-1)) { .msg $9 Hoşgeldiniz! }
;eğer belirttiğimiz identd dışı giriş olursa
  else {
;%d diye lokal bir variable'a %idc.nick değişkeni olur
    var %d = $+(%,idc.,$9)
;mIRC kapanınca silinen bu %idc.nick değişkeni bir arttırılır.
    inc -e $(%d,1)
;eğer bu değer 1den fazlaysa kline atılır
    if $(%d,2) > 1 { kline $9 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] dan bağlanın. }
;eğer küçük eşit 1 ise
    else {
;kill atılır.
      kill $9 Lütfen identdinizi java yapıp tekrar bağlanın.
    }
  }
}




burda ident değişkenlerini nerden tanımlıyoruz bi türlü bulamadım :(

Ajan 21 Mayıs 2008 01:54

Cevap: CR'de girişde ident kontrolü ve mesaj
 
alias -l idcheck { var %_ = 1 | while $gettok(%identcontrol,%_,44) { if $v1 iswm $1 { return $true } | inc %_ } | return $false }

Koda bunuda eklemen gerekli. idcheck alias'ını kullanmazsan kod geçersiz olacaktır. İdentleride identcontrol değişkenine kaydediceksin.
Editbox'a /set %identcontrol identler yazarak ekliyebilirsin. Yada veriable'a manuel olarak.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 08:09.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk