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/)
-   -   Kanal ban listesini otomatik temizleme. [Bİr kaç kullanışlı kod lazım?] (https://www.ircforumlari.net/mirc-scripting-sorunlari/1930-kanal-ban-listesini-otomatik-temizleme-bir-kac-kullanisli-kod-lazim.html)

maLKoc 24 Mart 2005 11:10

Kanal ban listesini otomatik temizleme. [Bİr kaç kullanışlı kod lazım?]
 
Merhaba arkadaşlar bana kanaldaki ban listi doldukça azar azar boşaltan bir kod lazım.Yardım edebileceklere şimdiden teşekkürler..

el33t 24 Mart 2005 19:51

Kod:

Raw 478:*:{ var %x = $ibl($2,0), %y = $calc($ibl($2,0) - 6), %' | while (%x >= %y) { %' = $addtok(%',$ibl($2,%x),32) | dec %x } | mode $2 -bbbbbb %' }
Ban list dolduğunda son 6 banı açar..

Majesti 26 Mart 2005 01:59

ilk banları açsa daha kullanışlı olmaz mı el33t? O zmn daha güvenilir bir sistem olur gibi geliyor. Tabi birde bunun olanaklı olması gerekir.

el33t 26 Mart 2005 20:04

Son banları açıyor derken kastettiğim ban listesisinin sonundaki banları açması, yani kanala 3 ban atıp, 4. banda banlist dolu dediğinde az önce attığı 3 banda açılacağı için pek iyi bir kod olacağını sanmıyorum. Ayrıca olanaklı olmasını istiyorsan kodu değiştirebilirsin, fikir vermek için o kodu yazdım. [En azından ben öyle kullanıyorum :]

maLKoc 27 Mart 2005 13:01

ben bu kodun mantığını anlayamadım mesela ban list 50 limiti var doldukça 10 ar 10 ar açsın.Mesela 49. olunca 10 tanesini açsın yani.Bu kodda ne neyi kastediyor anlamadım walla.Üzerindede oynayamıyom o yüzden. :)

el33t 27 Mart 2005 13:17

478 numaraları raw Channel banlist is full'un karşılığıdır, yani ban list dolduğunda işlem yapmak için raw 478:*:{ işlem } olarak kullanabilirsin, bu kod onu kastediyor. Umarım anlamışsındır, ben 6 tanesi açmayı örnek gösterdim, while kullanarak 10 tane ban açabilirsin.

maLKoc 27 Mart 2005 20:35

Evet şimdi anladım. 2. olarak badnickleri kontrol eden sade bir kod varsa paylaşırsanız sevinirim.Scan yaparken düşmesinde server dan. :))))

el33t 28 Mart 2005 16:03

Aşağıdaki kodu Remote'a (ALT+R) koy ve %badnickwc diye bir variable oluştur. Örneğin
Alıntı:

%badnickwc ***,fuck,dick,shit,pussy,lick
ve kanalda /badnickscan yaz. Opsan kötü nicklileri atar, eğer op değilsen kötü nickleri kanala echo'lar.
İşte kod:
Kod:

alias badnickscan {
  var %' = $nick(#,0,r), %. = $ticks, %}
  $iif($me !isop #,echo 12 -ta > Kötü nick taraması başlatıldı.)
  while %' {
        var %~ = $numtok(%badnickwc,44) | while %~ { if (%4$s(*,$gettok(%badnickwc,%~,44),*) iswm $nick(#,%',r)) { if ($me isop #) { mode # +b $ifmatch | kick # $nick(#,%',r) bad nick bulundu %4$s($chr(40),$ifmatch,$chr(41)) } | else { echo 7 -ta :: kötü nick; $nick(#,%',r) wildcard; %4$s(*,$gettok(%badnickwc,%~,44),*) } | inc %} } | dec %~ }
        dec %'
  }
  $iif($me !isop #,echo 12 -ta > Kötü nick taraması %4$s(,$calc(($ticks - %.) /1000),) saniye sürdü ve $iif(%} >= 1,%4$s(,$ifmatch,) tane kötü nick bulundu.,Kötü nick bulunamadı.))
}

Umarım işine yarar..

BoSs 28 Mart 2005 18:17

el33t sen bu günlerde bi script yap baya tutar burda prim yapmışın baya :)

el33t 28 Mart 2005 18:45

BoSs, önerin ve düşüncen için teşekkürler ama script yapmak için büyük sabır ve uğraşabilecek zaman lazım. Bende her ikiside yok ne yazık ki..

maLKoc 07 Nisan 2005 12:53

Unban olayı bir türlü olmadı ama badnick ler için teşekkür ederim.Ancak kanalda who çekecek bir remote çalıştırdığımız zaman SendQ falan diye bir uyarıyla serverdan düşüyoruz.Sanırım flood olarak algılanıyor.Bunun önüne nasıl geçilebilir.
Bİr 2. si Kanaldaki uyarı gerektiren hareketler.Mesela anlamsız sözler,büyük harf,tekrar gibi olaylarda ilkinde uyarsın ama ikincisinde banlayıp kicklesin istiyorum.Ama ya uyarıyor ya Kickliyor bunun önüne geçemedim.Bu tür bir kod varmı?
Saygılarımla...

UOnur 08 Nisan 2005 16:38

Unban ne ? Ben Onu Anlayamadım :)
2.si İçinse ;
Diyelimki Reklam Koruman

on *:text:*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Uyarılı Olsun Diyorsan...

on *:text:*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
inc %reklam.$chan [ $+ [ $nick ] ]
if (%reklam.$chan [ $+ [ $nick ] ] == 1) {
.msg $chan $nick Reklam Yaptın Bi daha Olmasın...
}
else {
.ban $chan $nick
.kick $chan $nick Reklam!!!
}
}

Gibi Yapabilirsin...

UOnur 08 Nisan 2005 16:49

Unban Olayını $imdi Baktım Bilmiyorum Çalışırmı Denemedim...
banlist Dolduğunda 10 tane Ban Açar...Eğer Çalışmazsa Banlist Dolduğunda Çıkan Mesajı Yapıştır...

Raw 478:*:{
//var %o $ibl($2,0)
while (%x <= 10) {
.mode $2 -b $ibl($2,%o)
inc %x
dec %o
}
unset %x
}

maLKoc 08 Nisan 2005 18:30

msn-murat!*@* Channel ban/ignore list is full

Çalışmıyor...

UOnur 08 Nisan 2005 20:48

Kod:

Raw 478:*:{
  .sil $2
}
alias sil {
  var %u $calc($ibl($1,0)-10)
  while (%u <= $ibl($1,0)) {
    .mode $1 -b $ibl($1,%u)
    inc %u
  }
}

test edildi Onaylandı ;)

maLKoc 09 Nisan 2005 14:55

Eywallah kardeş çalışıyor..

Üstte bir yerde demiştim.Mesela bir remotede büyük harf remotesi olsun.Direk kick yada ban-kick olayı var ilk seferde uyarması mümkünmü varsa hangi kodlarla oluyor.. :)

UOnur 09 Nisan 2005 19:08

Korumanın Kickleyen ve Banlayan Kısmı vardır...
Onların Yerine Bunları Koy... :
Kod:

inc %reklam.$chan [ $+ [ $nick ] ]
if (%reklam.$chan [ $+ [ $nick ] ] == 1) {
.msg $chan $nick Reklam Yaptın Bi daha Olmasın...
}
else {
.ban $chan $nick
.kick $chan $nick Reklam!!!
}


Dedektif 11 Nisan 2005 08:00

ellt3 Bu Komut çalışmadı bi yanLışlık olmasın sakın?

Dedektif 11 Nisan 2005 09:31

ell33t Badnick için veridğin Komut bir sorun mu var ki /badscan Diyince direk * / dec: not connected to server (line 6, remote-3.ttf) Bu Şekil oluyor

Yeppa 11 Nisan 2005 10:14

Büyük harf korumasi istenmis sanirim elimde var bi tane yaziyim. yardimim dokunsun :)

Kod:

alias allowedcaps { return 70 }
on @*:TEXT:*:#:{
if ($len($1-) < 10) { return }
var %caps.letters = $calc($len($1-) + 1 - $len($removecs(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 %caps = $calc($len($1-) - $len($removecs($1-,($1-),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 %caps.percent = $round($calc(%caps / %caps.letters * 100),0)
if ((%caps.percent > $allowedcaps) && ($nick !isop #)) {
        ban # $nick 2
        kick # $nick Caps Allowed: $allowedcaps $+ $chr(37) Caps Used: %caps.percent $+ $chr(37) )
}
}

Yazmayi unutmusum. Direkt +b ye Gecer..

Dedektif 11 Nisan 2005 11:03

BAdnick Scan Konusu Ne durumda?

Dedektif 11 Nisan 2005 14:58

e33tl arkadaş veridğin Badnick scan Codesi ni yazınca direk [14:56] * Send error ([10054] Connection reset by peer) Bu şekİl oluyor bir bilgin varmıdır

Yeppa 11 Nisan 2005 17:22

baska bir kod ile cakismis olabilir.

el33t 11 Nisan 2005 18:48

çalışmıyorsa kullanma Dedektif

Dedektif 12 Nisan 2005 02:00

İşde bende ondan Size söledim beLki yanlışlık vardır da düzeltrseniz diye , serverdan otomatik düşüyor yok mu bunu bi çaresi acaba

Gurur 22 Mayıs 2008 12:52

Cevap: Kanal ban listesini otomatik temizleme. [Bİr kaç kullanışlı kod lazım?]
 
Buna
Raw 478:*:{ var %x = $ibl($2,0), %y = $calc($ibl($2,0) - 6), %' | while (%x >= %y) { %' = $addtok(%',$ibl($2,%x),32) | dec %x } | mode $2 -bbbbbb %' }

Söyle bisey ekleyebilirmiyiz. KanaL Ban Listesi doLdu die kanaLa msg atcak ve Banlistesini alttan 6 tane acicak acicak

MerVeCiX 17 Eylül 2009 11:58

Cevap: Kanal ban listesini otomatik temizleme. [Bİr kaç kullanışlı kod lazım?]
 
Yok ben kanal merkezinden temizlemeyi tercih ederim

Mert 17 Eylül 2009 13:38

Cevap: Kanal ban listesini otomatik temizleme. [Bİr kaç kullanışlı kod lazım?]
 
Alıntı:

Gurur Nickli Üyeden Alıntı (Mesaj 455190)
Buna
Raw 478:*:{ var %x = $ibl($2,0), %y = $calc($ibl($2,0) - 6), %' | while (%x >= %y) { %' = $addtok(%',$ibl($2,%x),32) | dec %x } | msg #kanalismi Kanalın Ban List'i Dolu Olduğundan Otomatik Unban Yapılıyor.. | mode $2 -bbbbbb %' }

Söyle bisey ekleyebilirmiyiz. KanaL Ban Listesi doLdu die kanaLa msg atcak ve Banlistesini alttan 6 tane acicak acicak

Kırmızı renkli satır işini görecektir herhalde,kolay gelsin.


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

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