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/)
-   -   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

onNes 17 Aralık 2008 00:02
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Yardım edecek arkadaş yokmu?

onNes 17 Aralık 2008 00:03
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Ben yaptım nomercyde ama neden IP eklemiyor? Başka elinde nomercy proxy ekleme kodu olan varmı paylaşırsa seviniriz.

Editor 18 Aralık 2008 16:16
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Grand Eklenmemesi için hiçbir sebeb yok (yapman gerekenler) ;
Sercan'ları Sw yapmayı unutma yada Hagi alias Eklenmişse


hmake proxy ve hload proxy proxy.bastard
proxy.bastard metni oluşturmak ve mIRC Klasor'una atmak
alii-zerbeststill'in Kodları nereye yüklediğine bak .


Sadece #Opers Kanalında .proxyekle IP Şeklinde ekleme yapabilirsin.
Sadece #Opers Kanalında .proxsil IP Şeklinde Silme yapabilirsin.


Sonra verilmiş olan Kodu En Uygun yere yerleştirmek ; Socket'te Kafana göre Önüne gelen yere ekleme yapamazsın.

Örn ; if $2 == NOTICE Gördüğün Kodun altına ekleme yapabilirsin.

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.
        }
      }
    }
  }
Eğer Hala yapamadım diyorsan mesaJ at yardımcı olmaya çalışırız.İyi Forumlar

Kablosuz NET 19 Ocak 2009 20:31
Cevap: NoMercy Socket Botuma .proxyekle .proxysil
 
Kodları ekledim ama mircde açılışta hata felan vermedi. Ancak .proxyekle dediğimde çalışmıyor sebebini anlayamadım..


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

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