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/)
-   -   [Bad identleri dosyadan okuyan koruma] Bu Yapılabilir mi? (https://www.ircforumlari.net/mirc-scripting-sorunlari/2943-bad-identleri-dosyadan-okuyan-koruma-bu-yapilabilir-mi.html)

erdem55 09 Mayıs 2005 18:21

[Bad identleri dosyadan okuyan koruma] Bu Yapılabilir mi?
 
#bident on
on *:JOIN:#:{
if (*!*fuck*@* iswm $fulladdress) || (*!*Orosp*@* iswm $fulladdress) || (*!********@* iswm $fulladdress) || (*!*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iswm $fulladdress) || (*!*.com*@* iswm $fulladdress) || (*!*lezbi*@* iswm $fulladdress) || (*!*kaltak*@* iswm $fulladdress) || (*!*.net*@* iswm $fulladdress) || (*!*azgin*@* iswm $fulladdress) || (*!*ibne*@* iswm $fulladdress) || (*!*organ*@* iswm $fulladdress) || (*!*penis*@* iswm $fulladdress) || (*!*****@* iswm $fulladdress) || (*!*siker*@* iswm $fulladdress) || (*!*delici*@* iswm $fulladdress) {
/cs akick # add $nick $+ !*@* 14,1[4,1 Badnick 14] tesbit ediLdi ! 2,8( $me ) 0,7Tarih: $date , %gun . Saat: $time .Kick Count:- %kick - | inc %kick | /cs akick # enforce | /cs akick # del $nick $+ !*@*
}
}
#bident end

bu identleri ben mesela nadnick adlı bi dosyaya kaydedip oradan okutmak istiyorum bunu nasıl yapabiliirm acaba.?

el33t 09 Mayıs 2005 20:58

Öncelikle mIRC klasöründe identd.txt dosyası oluştur ve alt alta gerekli wildmasklar sıralı yaz.
Daha sonra biri kanala girdiğinde bu identd.txt dosyasının satırlarını teker teker okut ve eğer bu okuttuğun satır identdin içindeyse kanaldan at.

Böyle yapabilirsin.

erdem55 10 Mayıs 2005 10:57

el33t işde sorunda bu o kadar fazla bilgi bilmiyorum bilsem yapacaktım zaten 1 haftadır deniyorum yapamadım malesef ya beni banlattım ya yanlış kişileri banlıyo ya dosyanın içindekileri okuyamıyo yani her seferinde bi sorun bende en sonunda tüm kodları sildim sizden yardım istedim acaba mümkünse yazabilirmisiniz.?

erdem55 21 Mayıs 2005 00:23

arkadaşlar bu konuda bana yardımcı olacak kimse yokmu acaba offf sıkıldım ya pc başında kodlara bakmaktan işin kötüsüde bişeye yaramaması ancak göz bozuoyurm kaç yöntem denediysem yapamadım e bu kadar az bilgiyle zaten yapsam şaşacaktım rica etsem birisi yardım edemezmi acaba?

el33t 21 Mayıs 2005 00:30

Benim çabam senin de bir şeyler yapmaya çalışmanı sağlamaktı..
mIRC klasöründe identd.txt diye bir txt oluştur ve içine maskleri gir, örneğin *!*fuck*@* gibi ve aşağıdaki kodu remote'a koy:

on @*:JOIN:#:{ var %§ = $lines(identd.txt) | while %§ { if $read(identd.txt,%§) iswm $fulladdress { mode # +b $ifmatch | kick # $nick bad identd } | else { dec %§ } } }

Umarım işine yarar.

erdem55 21 Mayıs 2005 00:56

el33t seniş çok iiy anlıyorum biizm öğrenmemiz için yapıyorsun peki o zaman şöle bişi rica etsem senden mesela diyelim kodu ben yazıcam yazmam için neleri bilmem gerekli
on @*:JOIN:#:{ bu kadarını biliyom onu herkes biliyo diceksin biliyorum ama acemiyiz işde mesela bunun görevi ne var %§ = $lines(identd.txt) anladım kadarıyla ident dosyasının içini okuyor dimi peki ordaki ne öle %§ (§ bu işaretin ne oldunu bilemidm için copy paste etitm nerden çıkıyo bu) ne ifade ediyolar yani neden bunlar başka kullanılamazmıydı.
$ifmatch bunun anlamı ne peki
while %§ { if $read(identd.txt,%§) iswm $fulladdress yada bunun
sanırım iswm $fulladdress bu ip adresine bakıyo bir kaç komutumda var çünkü bunu kulalnınca ip ban atıyo.
işde bildiklerim bunlar bilmediklerimden bunlar bide hazır el atmışken ben sadece fuck yazsam ident dosyasına o şekilde olabilirmi bide demişsin ki mIRC klasöründe identd.txt diye bir txt ben böle değilde bunu mirc klasöründeki addons klasörünün içine koysam kodda ne gibi değişiklik olucak.
Yanlış anlamayın lütfen amacım sizi uğraştırmak değil sadece ne değişiyo ne değişmiyo yerine neler geliyo öğrenmek istiyoum anladım kadarıylada sizde benim gibi öğretmeyi seviyorsunuz. Bende millete bilgisayar kullanmayı tamir etmeyi öğretiyorum mesela mirc işi bana uzaktı ama daldık bi kere o nedenle başarmak istiyorum yardım edersen çok sevinirim...

bide son bi rica mesela kara listeye eklerken ben /auser kara nick'i yazıyodum bunada öle bişi ekleyemezmiyiz mesela /bident identi yazsam o dosyaya şu şekilde eklese
örnek: fuck identi ben /bident fuck yazıcam o dosyaya
*!*fuck*@* olarak eklicek yada diğer örnek oluyosa yani ben dosyaya fuck yazınca o fuck kelimesini atabiliyosa o zaman örnek şöle olcak
/bident fuck yazcam oda dosyaya fuck olarak işlicek ama bu identi görünce yine atacak tabi hangisi olursa olsun farketmez biri olsunda ama hepsinin olmasını tercih ederim tabi öğrenmek için çünkü neyin nasıl değiştiğini görürsek daha rahat kavrayabiliriz mantığı dimi ben böle düşünüyorum şimdiden tşkler

goXXip 21 Mayıs 2005 08:59

Bunu Hash Tablelarla çok rahatlıkla yapabilirsin.
Önce Hash Table Oluşturuyoruz.

/hmake kufur 100 => Burada (100 'ün 10 katı) 1000 datalık bir tablo oluşturur.
/hsave kufur kufur.txt => Burada ki tabloyu Kufur.txt olarak kaydediyor. İsteğe göre hash\kufur.txt veya buna benzer birşekilde bir klasörün içine kopyalayabilirsiniz.

Tabi bunu her mirc başlarken load etmen gerekiyor.

Kod:

on 1:start: {
  hmake kufur
  hload kufur kufur.txt
}

Şimdi bu table 'a nasıl ekleme yapılır. Şöyle;
kullanımı: hadd table id data => Burada id herhangi id numarası ya da bir kelime eklenebilir.
örn: /hadd kufur kufur1 *salak* ya da /hadd kufur 1 *salak*
Konumuza dönersek idleri her eklediğinde düzenli birşekilde vermek istersen küçük bir calc numrarasıyla verebiliriz.

alias _hadd {
hadd -m $1 $calc($hget($1,0).data + 1) $2
}
Bunun kullanımı ise : _hadd table data örn : _hadd kufur *salak*
şimdi Dosyadan okutturmak için bir while döngüsüne ihtiyacım var.

Kod:

on *:text:*:?: {
  var %i = 1
  while %i <= $hget(kufur,0).data {
    if $address($nick,1) iswm $hget(kufur,%i) {
      ban $chan $nick 2
      kick $chan $nick Küfür etmek yasaktır.
    }
    inc %i
  }
}

Bu Kod çalışıyor mu bilmiyorum ama inş. çalışır. Şuan kafam çok dağınık. Table anlatımında yanlışım olabilir.

erdem55 21 Mayıs 2005 13:14

goxxip çok güzel anlatmışsın fakatmirc her başladığında yeniden load etmemiz gerekmesi kötü olur diye düşünüyorum ben sencede öyle değil mi

goXXip 21 Mayıs 2005 13:24

ama en hızlı sonucuda hash table larla alabilirsin. read line bunların hepsi yavaştır!

goXXip 21 Mayıs 2005 13:43

Burada işine yarayacak birkaç kısaltma sunabilirim örn:

Kod:

alias hst {
  hmake $1
  hload $1 $+($1,.txt)  => veya $+(hash\,$1,.txt)
}

alias _hst {
  hst kufur
  hst reklam (vs vs)
}

on 1:start: {
  _hst
}



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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net