‎
;----------- "mIRC Giriş Uyarı Bilgilendirme" -----------
 ;-
;- Kodlar ircforumlari.net adresinden temin edilerek Che tarafindan düzenlenmiştir.
;-
;- Kod'un görevi Sunucuya giren kişilerin nick-ip-ülke-şehir-tarih-saat bilgilerini belirlemiş olduğunuz kanal'a yansıtır.
;-
;- Add-on u ekledikten sonra sağ tıklayıp log kanalını ayarlandıktan sonra aktif ediniz.
;-
;-
;-
;----------- "mIRC Giriş Uyarı Bilgilendirme Sonu" ------
‎#NERDEN on
‎on *:snotice:*Client connecting on port*:who +I $9
‎alias htmlfree {
‎  if ($len($1-) <= 900) {
‎    var %tmp $regsubex($1-,/<[^>]*>/g,)
‎    return $remove(%tmp,$chr(9))
‎  }
‎}
‎alias che {
‎  var %id $rand(1000,99999)
‎  var %sockname $+(chenerden,%id)
‎  if ($sock(%sockname)) { return }
‎  sockopen %sockname 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
‎  sockmark %sockname $1
‎  hadd -m nerden $1 $2
‎}
‎on *:sockopen:chenerden*:{
‎  if ($sockerr) {
‎    .echo -a Socket open error: $sockerr
‎    sockclose $sockname
‎    return
‎  }
‎  sockwrite -n $sockname $+("GET /?ip=", $sock($sockname).mark, " HTTP/1.1") $crlf
‎  sockwrite -n $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:49.0) Gecko/20100101 Firefox/49.0 $crlf
‎  sockwrite -n $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 $crlf
‎  sockwrite -n $sockname Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 $crlf
‎  sockwrite -n $sockname Connection: close $crlf
‎  sockwrite -n $sockname $crlf
‎}
‎
‎on *:sockread:chenerden*:{
‎  sockread %incoming
‎  if ($len(%incoming)) {
‎    var %buf $gettok($hget(buffer,$sock($sockname).mark),1,1)
‎    if (!$hget(buffer,$sock($sockname).mark)) { hadd -m buffer $sock($sockname).mark %incoming } 
‎    else { hmod -m buffer $sock($sockname).mark $gettok($hget(buffer,$sock($sockname).mark),1,1) $+ %incoming | hset buffer $sock($sockname).mark $gettok($hget(buffer,$sock($sockname).mark),1,1) $+ %incoming }
‎  }
‎  var %data $hget(buffer,$sock($sockname).mark)
‎  if (!$len(%data)) return
‎  if ($regex(%data,/lke : <em style="color:#666">(.*?)<\/em><\/strong>.+ehir : <em style="color:#666">(.*?)<\/em><\/strong>/i)) {
‎    var %ulke $regml(1)
‎    var %sehir $regml(2)
‎    var %ip $sock($sockname).mark
‎    var %nick $token($hget(nerden,%ip),1,32)
‎    msg %nerdenlogkanali 45[4Giriş5] [4NİCK: %nick ] [4IP: %ip ] [4ÜLKE: $iif(%ulke,$v1,Belirsiz) ] [4ŞEHİR: $iif(%sehir,$v1,Belirsiz) ]  4[ 10Tarih: $date  - 10Saat: $time 4]
‎    if (!$window(@Girişler)) { window -e @Girişler }
‎    .echo @Girişler [4NİCK: %nick ] - [4IP: %ip ] - [4ÜLKE: $iif(%ulke,$v1,Belirsiz) ] - [4ŞEHİR: $iif(%sehir,$v1,Belirsiz) ] - 4[ 10Tarih: $date  - 10Saat: $time 4]
‎    hdel -m nerden %ip
‎    hdel -m buffer $sock($sockname).mark
‎    sockclose $sockname
‎  }
‎  if ($sock($sockname).status == 0) {
‎    hdel -m buffer $sock($sockname).mark
‎    sockclose $sockname
‎  }
‎}
‎#NERDEN end
‎menu channel,status,query {
‎  -
‎  NERDEN
‎  .AC:.enable #nerden | .echo -ta 4NERDEN 2GİRİŞ AKTİF.
‎  .KAPAT:.disable #nerden | .echo -ta 4NERDEN 2GİRİŞ DEAKTİF.
‎  .-
‎  .Log Kanalı:.set %nerdenlogkanali $$?="Örnek #Che1,#Che2" 
‎}
‎on 1:load: {
‎  window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $timestamp *** mIRC Giriş Uyarı addon'u basariyla yuklenmiştir..
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $timestamp *** Status veya Kanal ekraninda sag tiklayarak nerden giriş uyarisini acip kapatabilirsiniz.
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $timestamp *** Yardim & iletisim mevlut-tut@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].tc
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@00,00@@@01,01@@00,00@01,01@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]00,00@@01,01@@@@@00,00@@@01,01@@@@00,00@@@@01,01@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]00,00@@01,01@@00,00@@@01,01@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@00,00@@@01,01@@00,00@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@01,01@@00,00@@01,01@@00,00@01,01@@00,00@@@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@@01,01@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@@00,00@@01,01@@00,00@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@01,01@@00,00@@01,01@@00,00@@01,01@@00,00@@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@@00,00@@01,01@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@@@00,00@01,01@@00,00@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@01,01@@00,00@@01,01@@00,00@@01,01@@00,00@@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@@@00,00@01,01@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@00,00@01,01@@@@00,00@01,01@@@@@00,00@@@01,01@@@@@00,00@@@01,01@@00,00@@01,01@@00,00@@01,01@@@@@00,00@@@01,01@@00,00@01,01@@@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@00,00@@01,01@@@00,00@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@01,01@@00,00@@@01,01@@00,00@@01,01@@00,00@@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@01,01@@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@00,00@@@01,01@@00,00@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@01,01@@00,00@@01,01@@00,00@@01,01@@00,00@@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@@01,01@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@00,00@@@01,01@@00,00@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@01,01@@00,00@@01,01@@00,00@01,01@@00,00@@@01,01@@00,00@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]01,01@@00,00@@@01,01@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 00,00@@01,01@@00,00@@@01,01@@00,00@01,01@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]00,00@@01,01@@00,00@@01,01@@00,00@@01,01@@@@00,00@@@@01,01@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]00,00@@01,01@@00,00@@@01,01@@00,00@@00,00@
‎  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 
‎}