Giriş İp Kodu Düzenleme - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Feragat · 21 Haziran 2015, 14:50

Slalayl0m Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba arkadaşlar elimde @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] arkadaşımızın yazdığı bir kod var fakat ben bunu bir botun içine atacağım ve girişleri @Giriş penceresi olarak değilde Opers kanalına atmasını istiyorum. Yardımcı olursanız sevinirim.

echo @Giris kısmını msg #opers olarak değiştirebilirsin.

Slalayl0m · 21 Haziran 2015, 14:56

Feragat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

echo @Giris kısmını msg #opers olarak değiştirebilirsin.

Kodu tam olarak yazıp verebilir misiniz hiç bir bilgim yok kod konusunda.

Toprak · 21 Haziran 2015, 16:40

Slalayl0m Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kodu tam olarak yazıp verebilir misiniz hiç bir bilgim yok kod konusunda.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(pro,%:r) $+($4,¿,$6)
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
on *:sockopen:pro*:{ 
  sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 
  sockwrite -nt $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
  sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36
  sockwrite -nt $sockname $crlf
}
on *:sockread:pro*:{  
  if ($sockerr) { .sockclose $sockname | return }
  var %:pro | sockread -f %:pro
  if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) }
  if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) }
  if (ISP Provider: isin %:pro) { 
    var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58))
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)
    $iif(!$window(@Giriş),window -e @Giriş)
    msg #opers Nick:4 %:n -1IP:4 %ip -1Ulke:4 %ülke -1Sehir:4 %sehir -1ISP:4 %:isp 
    .hfree -sw %:n
    sockclose $sockname
  }
}

Slalayl0m · 21 Haziran 2015, 16:48

Toprak Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(pro,%:r) $+($4,¿,$6)
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
on *:sockopen:pro*:{ 
  sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 
  sockwrite -nt $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
  sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36
  sockwrite -nt $sockname $crlf
}
on *:sockread:pro*:{  
  if ($sockerr) { .sockclose $sockname | return }
  var %:pro | sockread -f %:pro
  if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) }
  if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) }
  if (ISP Provider: isin %:pro) { 
    var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58))
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)
    $iif(!$window(@Giriş),window -e @Giriş)
    msg #opers Nick:4 %:n -1IP:4 %ip -1Ulke:4 %ülke -1Sehir:4 %sehir -1ISP:4 %:isp 
    .hfree -sw %:n
    sockclose $sockname
  }
}

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] eyvallah bir şey daha sormak istiyorum.

Kanala giriş yaptığımda oto oper oto nick şifre giriyor ve belli bir saniye sonra ident ve host değişmek istiyorum böyle bir şey mümkün mü?

Toprak · 21 Haziran 2015, 18:54

Slalayl0m Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] eyvallah bir şey daha sormak istiyorum.

Kanala giriş yaptığımda oto oper oto nick şifre giriyor ve belli bir saniye sonra ident ve host değişmek istiyorum böyle bir şey mümkün mü?

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:connect:{
if $server == irc.sunucu.com {
.timer 1 5 sethost host
.timer 1 6 setident ident
}
}

Slalayl0m · 22 Haziran 2015, 00:03

Toprak Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:connect:{
if $server == irc.sunucu.com {
.timer 1 5 sethost host
.timer 1 6 setident ident
}
}

Verdiğiniz komutu denedim fakat çalışmadı neden acaba?

KuL · 22 Haziran 2015, 04:34

Slalayl0m Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Verdiğiniz komutu denedim fakat çalışmadı neden acaba?

Kodu ayri bir Remote Sayfasina ekledin demi?

Bide eger gecen verdigim Kodu kullaniyorsan eger, direk bu Isteginlede birlestirebilirsin.

Iki Connect Eventi kullanirsan belki cakisiyor olabilir.

Yani Sonuc:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:connect: {
  if $server == irc.sunucuismi.com {
    .oper nick PASS
    .ns ghost nick sifre
    .ns release nick sifre
    .ns recover nick sifre
    .timer 1 3 nick nickiniz
    .timer 1 4 ns identify sifre
    .timer 1 6 sethost Hostun
    .timer 1 7 setident Identin
  }
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Giriş city düzenleme yrd.	KatiL	mIRC Scripting Sorunları	2	03 Ocak 2013 22:44
İdent YasakLama Kodu-DüzenLeme	heySs	mIRC Scripting Sorunları	1	18 Şubat 2011 18:28
Giriş Kodu Giriş Paneli ve Nick Listesi yardımı	impOsibLe	mIRC Scripting Sorunları	4	12 Temmuz 2010 13:35

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.