IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   NoMercy Socket Botuma .proxyekle .proxysil (https://www.ircforumlari.net/mirc-scripting-sorunlari/136970-nomercy-socket-botuma-proxyekle-proxysil.html)

alii-zerbeststill 28 Eylül 2008 04:47
NoMercy Socket Botuma .proxyekle .proxysil
 
Mrb Arkadaşlar Socket Botuma Proxyler için Bir Kod Düşündüm Fakat Kendim Yazamadım.Eklemek İstedim Kod .proxyekle ip yaptımda ekledım ipi proxy olarak sunucudan oto atıcak .proxysil ip yaptımdada o ipi proxyden silicek.Yapabilecek Arkadaşlardan Yardım Bekliyorum Acil Lazım Kod Lamerlerle Başımız Dertte Unrealden Proxyde Kapatamıyorum Yurt dışından Giren Arkadaşlarımız var Böyle Bir kod Düşündüm Socket'e Umarım Sonuç Buluruz.

IrCbaStarD 29 Eylül 2008 00:52
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Kod:
  if $2 == NOTICE { 
    if *client connecting* iswm $1- {
      if $hfind(Proxy,$gettok($left($right($13,-1),-1),2,64),1,W).data  { 
        Sercan $sockname gzline $12 10d Proxy!
      }
    }
  }
  if $2 == Privmsg {
    if $3 == #Opers {
      if *.Proxyekle* iswm $4-  {
        hadd -m Proxy $r(0,1000) $5
        hsave Proxy Proxy.bastard
        Sercan $sockname Privmsg $3 : Date No :4 $r(0,1000) Ip :4 $5  Proxy ip listesine kaydedildi.
      }
      if *.Proxysil* iswm $4-  {
        if $hfind(Proxy,$5,1,W).data {
          hdel Proxy $ifmatch
          hsave Proxy Proxy.bastard
          Sercan $sockname Privmsg $3 : Data no :4 $ifmatch IP :4 $5 
        }
        else {
          Sercan $sockname Privmsg $3 : $+(4,$remove($gettok($1,1,33),:),) Silmek istediğiniz IP adresi listede yok.
        }
      }
    }
  }
Sercan'ları Sw yaparsın veya NoMercy'indeki alias'ı (:
Not : nomercy klasörüne, proxy.bastard şeklinde dosya oluştur. (:
start event'ine
hmake proxy
hload proxy proxy.bastard

eXtReMe` 29 Eylül 2008 01:59
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Sanırım Kodda iP yi Tam Yazıyoruz misal .proxyekle 12.8.15.195

ßiz ßunu .proxyekle 12.* Olarak YApsak 12.* yLe ßaşLayan Tüm iPLeri Atsa Daha ii Olr :)

IrCbaStarD 29 Eylül 2008 02:12
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Alıntı:
eXtReMe` Nickli Üyeden Alıntı (Mesaj 553548)
Sanırım Kodda iP yi Tam Yazıyoruz misal .proxyekle 12.8.15.195

ßiz ßunu .proxyekle 12.* Olarak YApsak 12.* yLe ßaşLayan Tüm iPLeri Atsa Daha ii Olr :)
wildcard'la ekliye biliyoruz dediğin gibi ( 127.* vb.) (:

alii-zerbeststill 29 Eylül 2008 08:41
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Teşekkürler IrcbaStarD Eline Koluna Emeğine Sağlık :)

alii-zerbeststill 29 Eylül 2008 09:14
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Verdin Şekilde Ekledim

Kod:
on *:start: {
  unset %*
  hmake kufur
  hmake kanalz
  hmake badnick
  hmake kickno
  hmake finger
  hmake kotuident
  hmake konick
  hmake proxy
  hload proxy proxy.bastard
  hload konick konick.mercy
  hload kotuident kotuident.mercy
  hload finger finger.mercy
  hload kufur kufur.mercy
  hload kanalz kanalz.mercy
  hload badnick badnick.mercy
  hload kickno kickno.mercy
  .timer 0 5 NoMercy
  .timerbotnickleri 0 100 botnickleri
  echo -s 4NoMercy:2 socket botu ayarlandi.
  write -c haber.txt
}
Kod:
      if %::chan == %kanalds {
        sw $sockname privmsg %kokumanick %kanalds $1-
      }
    }
  }
  if $2 == NOTICE { 
    if *client connecting* iswm $1- {
      if $hfind(Proxy,$gettok($left($right($13,-1),-1),2,64),1,W).data  { 
        sw $sockname gzline $12 10d Proxy!
      }
    }
  }
  if $2 == Privmsg {
    if $3 == #Opers {
      if *.Proxyekle* iswm $4-  {
        hadd -m proxy $r(0,1000) $5
        hsave proxy proxy.bastard
        sw $sockname Privmsg $3 : Date No :4 $r(0,1000) Ip :4 $5  Proxy ip listesine kaydedildi.
      }
      if *.Proxysil* iswm $4-  {
        if $hfind(Proxy,$5,1,W).data {
          hdel Proxy $ifmatch
          hsave Proxy Proxy.bastard
          sw $sockname Privmsg $3 : Data no :4 $ifmatch IP :4 $5 
        }
        else {
          sw $sockname Privmsg $3 : $+(4,$remove($gettok($1,1,33),:),) Silmek istediğiniz IP adresi listede yok.
        }
      }
    }
  }
}
on *:SOCKCLOSE:NoMercy: {
  unset %*
  .timermercy* off
  if $hget(mesaj) {
    hfree mesaj
  }
}
Nomercy klasorundede dedın gibi proxy.bastard olusturdum ama hata verdi

Alıntı:
* /hload: Açılamıyor 'C:\Users\ali\Desktop\NoMercy-aLiZ-ZerbestStiL\proxy.bastard' (Satır 11, nomercy.mrc)
Neden Olabilir Bu Hata :S

IrCbaStarD 29 Eylül 2008 14:02
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Proxy.bastard, Dosyasını olu$turmamışsın Nomercy içinde :)

alii-zerbeststill 29 Eylül 2008 14:08
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Olusturdum dosya derken klasormu olusturcz yoksa :S

alii-zerbeststill 29 Eylül 2008 14:48
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Konu IrcbaStarD tarafından Hal Edilmiştir. Emeğine Yüreğine Sağlık Kardeşim. Eminim Bir Çok Kişinin İşine Yarıcaktır.

eren_o7 16 Aralık 2008 20:24
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Hocam Emeğine Sağlık Gerçekten güzel paylaşım


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 03:05.
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

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