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/)
-   -   Düşman list hakkında yardıma ihtiyacım var (https://www.ircforumlari.net/mirc-scripting-sorunlari/33607-dusman-list-hakkinda-yardima-ihtiyacim-var.html)

asdasdasd 05 Temmuz 2007 03:07

Düşman list hakkında yardıma ihtiyacım var
 
Ben kanala qirdiğim anda kanalda dusman listemde kım varsa o anda banlanmasını ıstıorum bunun codunu yazarmısınız.. tesekkurler sımdıden..

тєαм 05 Temmuz 2007 12:37

Cevap: Düşman list hakkında yardıma ihtiyacım var
 
Bununla ilgili açılmış üç, dört tane konu var. Arama yapmalısın.

asdasdasd 05 Temmuz 2007 18:09

Cevap: Düşman list hakkında yardıma ihtiyacım var
 
baqtımda bulamadım sen bılıosan dırek lınk atarmısın..

тєαм 05 Temmuz 2007 18:19

Cevap: Düşman list hakkında yardıma ihtiyacım var
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

CipriX 05 Temmuz 2007 18:23

Cevap: Düşman list hakkında yardıma ihtiyacım var
 
on *:join:#:{ .set %kanal $chan | tara }
alias tara {
var %i 1
while %i <= $nick(#,0) {
if $read(badnick.txt,w,* $+ $nick(#,i) $+ *) {
.var %a $read(badnick.txt,w,* $+ $nick(#,i) $+ *)
.mode %kanal +b $remove(%a,*,@,!)
.kick %kanal %a ßyz
.inc %i
}
}
}

Böle bişi olabilir sanırsam

MeGaBytE 05 Temmuz 2007 18:40

Yanıt: Düşman list hakkında yardıma ihtiyacım var
 
PHP- Kodu:

raw 366:*: { var %i 1 | while %<= $nick($2,0) { if $level($nick($2,%i) $+ !*@*) == 666 samode $+b $nick($2,%i) $+ !*@* | .quote kick $2 $nick($2,%i)   1Bad Nick   4[  1!  4]   12 Bu NickLe Kanallara Giriş  Yapamazsiniz..! } | inc %} } 


Kodun Kime Ait Olduğunu Hatırlıyamadim Sanırım el33t'ye Aitti Ama Emin DeğiLim..

Kanala Girdiğin Zaman Shitlistendeki NickLerden Herhangi Biri Mevcut İse Kanaldan Uzaklaştiri..

тєαм 05 Temmuz 2007 18:41

Cevap: Düşman list hakkında yardıma ihtiyacım var
 
Bu code mIRC 'i donduruyor ciprix 40 üzeri kanalda girer girmez kastı ve mIRC 'i dondurdu ( mIRC'i kapatmak zorunda kaldım ).

CipriX 05 Temmuz 2007 20:40

Cevap: Düşman list hakkında yardıma ihtiyacım var
 
on *:join:#:{ if $nick == $$me { .set %kanal $chan | tara } }
alias tara {
var %i 1
while %i <= $nick(#,0) {
if $read(badnick.txt,w,* $+ $nick(#,i) $+ *) {
.var %a $read(badnick.txt,w,* $+ $nick(#,i) $+ *)
.mode %kanal +b $remove(%a,*,@,!)
.kick %kanal %a ßyz
.unset %kanal
.inc %i
}
}
}

Böle olucak
Genede kasarsa:


[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Bu DLL'Yi indir..

Daha kolay yoluda olabilir tabiki benim aklıma gelen şuanlık bu..

DeLiTiM 05 Temmuz 2007 21:43

Yanıt: Düşman list hakkında yardıma ihtiyacım var
 
Öncelikle düsman listesindeki nicklerin nerde oldugu belirtirsen daha makbule gecer .txt dosyasındamı yoksa User kısmında bir leveldemi nerde malum suan hangi scripti kullandıgını görmedigimiz icin yanlıs yazılmasın.

SpecifiC 05 Temmuz 2007 21:48

Cevap: Düşman list hakkında yardıma ihtiyacım var
 
Kod:

on *:join:#: {
  if $nick == $me {
    .echo # *** Bad Nick Taraması Aktif.
    .timer 1 1 scn #
  }
}
alias scn {
  var %n = 1
  while $nick($1,0,r) >= %n {
    if $ulist($nick($1,%n,r),bad,1) != $null {
      if $me isop $1 {
        mode $1 +b $ulist($nick($1,%n,r),bad,1) | kick $1 $nick($1,%n,r) BAD NICK: $ulist($nick($1,%n,r),bad,1)   
      }
      else {
        echo $1 **** Rapor Op Degilsiniz: $nick($1,%n,r) Badnick var.
      }
    }
    inc %n
  }
  echo $1 **** Bad nick taraması tamamlandı
}

User listene, BAD derecesi ile bad nicklerini veya kanala girmesini istemedigin nickleri ekleyebilirsin.

örnek:
eklemek için; /auser bad *cam*
silmek için; /ruser bad *cam*

Şeklinde ekledigin zaman içerisinde *CAM* geçen tüm nickleri kanala girdiginde kanaldan uzaklaştırır.

Dip not: Bu ve benzeri döngülere giren korumalarda, DATA yı dışarıdan bir dosya içerisinden okutmak scripti çok kasar ve gereksizdir. Bu iş için Variables , HASH veya User List kullanmak daha mantıklı oldugu düşüncesindeyim...


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

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