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

 Kayıt ol  Topluluk
3Beğeni(ler)
  • 2 Post By Heartbroken
  • 1 Post By Heartbroken

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 18 Ağustos 2017, 12:20   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
TCL isteği




Merhaba üstadlar, sizlerden ufak bir tcl isteğim olacak
İsteğim #Kontrol , #Karantina kanalları için

Kontrol kanalına 7 saniyede 5 giriş yapılmışsa komut çalıştırmak istiyorum yani demek istediğim şu,

7 Saniye içerisinde 5 kez giriş olmuşsa /girisac komutunu çalıştırarak olabilesi proxy bot girişini engellemek istiyorum. Eğer bot girişleri algılayıp /girisac yapmışsa 15 dakika sonra /giriskapat yapsın. Sonrası döngü gibi. Biz tetikle olacağımıza bot tetikte olmalı yani.

Tabi bu işin ani user girişleri bakımından da zararı olabilir ama botların kanallara girmesinden iyidir
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Nacizane isteğim forumda birçok kişinin işine yarayabilir diye düşünüyorum, yardım edeceklere, okuyanlara teşekkürler..

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 18 Ağustos 2017, 18:54   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: TCL isteği




Anlayabildiğim Kadarıyla ;
/girisac İle mIRC'inizde Aktif Ettiğiniz
Bir Koruma Kodunuz Var.

Bu Kodu Dışarıdan Başka Birinin (Yada Botun)
Aktif/Pasif Edebilmesi İçin;
O Kod'da Düzenleme Yapılması Gerekir.
Bunu Da Mirc Scripting Bölümünde ;
Belli Bir Kullanıcının (Botunuzun) O Komutu
Kullanma Hakkı Tanıyacak Şekilde Düzenletirseniz,
Olabilecek Birşey!

Böyleyse Eğer, Bot Üzerinden O Koda,
Dolaylı Bir Müdahale Yerine ; Doğruca O mIRC Koduna,
Kendi Başına Algılayıp Aktif Edebilecek ,
Kendini Belli Bir Süre Sonra Kapatacak Ek Yaptırmak,
Dışarıdan Endirekt Bir Müdahale Yerine Daha Uygun
Olurdu Sanki !.

O 15 Dakika /girisac - /giriskapat Olayına Daha Bir
Açıklama Gerekiyor!
Çünkü Şu Açıklama'dan Benim Çıkarabildiğim Sonuç
Budur.

Herneyse. Bunu Deneyebilirsiniz :
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Şimdi Yazdığım , /girisac - /giriskapat-sız
15 Dakikasız, Kendi Başına Bir Flood Kontrolü*

Not :
Bunun İçin Aslında Bir Kod/Script'ede Ne Derece İhtiyaç
Olduğu Eggdrop Kullanıcısı İçin Bir Soru İşaretidir.
Şöyle ki: Eggdrop Zaten Kendinden Bir Flood Korumasına
Sahiptir.
Botunuza Bağlanın .chaninfo #Kanal İle Listelenen Bot
Ayarlarında Alt Sıralarda Flood Settings: Başlığı Altında ,
Join Flood Ayarını : .chanset #Kanal flood-join Saniyede:Kez
Şeklinde Değişebileceğiniz (Her Kanal İçin Ayrı Ayrı Ayarlanabilir!)
Bir Koruması Kendinden Vardır.

Bunun Dışında Eggdrop'unuzla Gelen Öntanımlı Scriptlerden Biri;
sentinel.tcl Etkili Bir Flood Korumasıdır!

__________________
Beş Tas Has Hoş Hoşaf.
 
Alıntı ile Cevapla

Alt 19 Ağustos 2017, 17:56   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: TCL isteği




Bahsettiğiniz kodu yapabildiğim kadar düzelttim ama bota konsoldan bağlanıp .chanset #Kanal +GirisFlood yaptıktan sonra bahsetmiş olduğum girişkodu açıp kapatma işlemini yaptıramıyorum.. Kod'un neresinde oynama yapmalıyız ? Teşekkürler bu arada.

[BOX="tcl"]
# Kaç Saniyede ,
set GirisSaniye 8
# Kaç Kanal Girisi?
set GirisMax 4
# Bu Nickler Banlanacak Mı? 1 -> Evet , 0 -> Hayır
set Banlansin 0
# Kanal'da Uygulanan Modlar Kaç Saniye Sonra Kaldırılsın?
set GirisKodSaniyesi 900
# .chanset #Kanal +GirisFlood İle Kanal'ınızda Aktif Edilir!
setudef flag GirisFlood

bind join - *!*@* Giris:Flood

proc Giris:Flood {nick uhost hand chan} {
if {![channel get $chan GirisFlood] || [isbotnick $nick] || $nick eq $::owner} { return 0 }
if {![info exists ::Giris($chan)]} { set ::Giris($chan 1 } { incr ::Giris($chan) }
if {![info exists ::Saydir($chan,Kisi)]} { set ::Saydir($chan,Kisi) $nick } { lappend ::Saydir($chan,Kisi) $nick }
if {$::Giris($chan) >= $::GirisMax} {
if {$:: Banlansin >= "1" && [string length $:: Banlansin]}
{
foreach Hedef $::Saydir($chan,Kisi) { putquick "zline $Hedef :Aşırı Giriş Yapıldı.";}
}
else
{
putquick "girisac"
utimer $::GirisKodSaniyesi[list putquick "giriskapat"]
}
}
utimer $::GirisSaniye[list unset ::Giris($chan) ::Saydir($chan,Kisi)]
}
[/BOX]

Edit: Banlansin kısmında smiley çıktığı için boşluk bıraktım.

 
Alıntı ile Cevapla

Alt 19 Ağustos 2017, 19:22   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: TCL isteği




putquick "girisac" Bu Şekilde Sunucuya,
Komut Gönderiyor!
Size Yada Şu "girisac" Kodunun Olduğu
Hedef'e Değil!

Komut "Yöntem <Hedef> :Gönderi"
Örnek :
putserv "PRIVMSG $nick :Hey!"

O Düzenlettiğinizi Yazdığınız girisac/giriskapat
Kodu,Dışarıdan Hangi Yöntemle
Komut Alacak Şekilde Düzenlendi?
Kişiye Notice Mi? #Kanal Üstünden !Komut'la Mı?
Yoksa Özele Mesaj Mı?
Buna Göre Eggdrop Bot'tan Hedef'e ,
Hedef'te Yüklü Kod'u Tetiklenebilir!

Diğer Önemli Konu;
Tcl Kod'u Editlemeye Niyet Edilmişse;
Öncelikle Kullandığınız Kod/Text Editörü
Tcl'yi Desteklemesi Gerekir,
Aksi Halde Kodu Bozar.
Windows Not Defteri'nin Tcl Desteği
Yoktur!
Notepad++ , Sublime-Text , eMacs
Vim, Geany Vs Vs. Gibi Editörler Tercih Edilmelidir.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Tcl'nin Kendi Syntax'ı ( Yazımı ) Vardır,
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Demek İstediğim Yukarıdaki Gibi,
O Ayraçları Bozarsanız ,
}
else
{
Olursa ,Eggdrop'unuz " Bu Da Neyin Nesi Böyle? "
Der!

__________________
Beş Tas Has Hoş Hoşaf.
 
Alıntı ile Cevapla

Alt 20 Ağustos 2017, 03:00   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: TCL isteği




if else deyimini burada daha iyi anlaşılsın diye o şekilde yazmıştım, /girisac ve /giriskapat kodları modül olarak yüklü yani her oper/admin /girisac veya /giriskapat yazığında sunucuya bağlantı esnasında giriş kod sormakta veya sormamakta, editör olarak notepad++ kullanıyorum fakat tcl kodlama bilgim yok. Sizdem ricam kodu istediğim gibi uyarlayabilirmisiniz? uyarlamazsanızda canınız sağolsun ne diyelim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 20 Ağustos 2017, 05:44   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: TCL isteği




Başta /girisac /giriskapat Nedir Böyle Yazsanız,
Bende; mIRC'inizde Bir Alias / Kısayol
Kod Yüklü /Komutla O'nu Açıp-Kapıyorsunuz
Sanıyorum!

Kim Nereden Bilebilir, Sizin Sunucuda Ne Modül
Kullanıyorsunuz,Ne İşler Çeviriyorsunuz Allah Bilir!

Bunu Bilsem Baştan ,Kanal Koruması Tarzı Bir
Script Yazmazdım. Şu Yeterli Olur:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Bot Nick Tanıtma,Oper Şifre Girme,
Mod Değişme Vs. İçin De:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Böyle Birşey!

__________________
Beş Tas Has Hoş Hoşaf.
 
Alıntı ile Cevapla

Alt 20 Ağustos 2017, 12:28   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: TCL isteği




Biraz anlatım bozukluğu yapıp kendimi ifade edememişim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] çok sağolasın üstad
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Cevapla

Etiketler
karantina, kontrol, proxy bot girişi engelleme


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
tcl isteği Joop TCL Scriptler 3 11 Nisan 2017 13:46
Kod iSteği TurkeyAJANS mIRC Scripting Hazır Kodlar 1 22 Aralık 2009 01:26
TCL isteği.. ExpLoSive Eggdrop, NeoStats, BNC 3 07 Temmuz 2009 16:25