Mirc yükle Türkçe mIRC indir - Resmi mIRC indirme Sitesi

Hazır mirc remoteleri

16 Aralık 2016 • 17:09 dELi Hazır Kodlar

Merhaba arkadaşlar. Bu sayfamızda mirc de en çok kullanılan ve aranan mirc remotelerine yer vereceğiz. ilk olarak herkes tarafından en çok aranan mirc kodlarından birisi Oto selam alma remotesini paylaşıyorum.

on *:TEXT:selam*:#: {
/msg $chan Aleykum Selam Hoş Geldin $nick
}

on *:TEXT:selam*:#: {

/msg $chan Aleykum Selam Hoş Geldin $nick

}

Oto selam alma remotesini mircten remote kısmına eklediğinizde hemen çalışmaya başlıyacaktır. İkinci olarak Nick seslenme uyarısı nı paylaşacağım. Bu remotede neredeyse bütün mirclerde kullanılmaktadır. Farak Bizdeki remote birazdaha gelişmiş […]

» Devamını Oku

Yorum yaz amsg kodu, çet programı, chat programı, Help uyarı sistemi, Mirc indir, mirc kodları, Mirc yükle, oto selam alma, sohbet odaları, sohbet programı, Son sürüm mirc indir, son sürüm türkçe mirc, Türkçe mirc 6.35, Türkçe mirc indir, Türkçe mirc yükle, turkce mırc

Snoticeleri ayrı pencerede gösterme kodu

12 Aralık 2016 • 13:15 dELi Hazır Kodlar


on ^1:SNOTICE:*:{
  if (/whois isin $1-) {
    if ($window(@Whois) == $null) { window -ne @Whois }
    echo 2 -t @Whois 4Whois Çeken Nick 2[ $2 ]4 Ip: 2[ $3 ] | halt
  }
  if (his/her isin $1-) || (Failed isin $1-) || (Denied isin $1-) || (tkl isin $1-) || (Q: isin $1-) || (used isin $1-) || (OperOverride isin $1-) || (Mismatch: isin $1-) || (is now isin $1-) || (Received isin $1-) {
    if ($window(@Opers) == $null) { window -ne @Opers }
    echo 2  @Opers $1- | halt
  }
  if (gecos isin $1-) {
    if ($window(@Bilgi) == $null) { window -ne @Bilgi }
    echo 2 -t @Bilgi 4 Fullname Değişimi:1 $1 tarafından1 $6 $+ 1'nin fullnamesi değiştirilerek:4 $10- 1 $+ yapıldı. | halt  
  }
  if (virtual isin $1-) {
    if ($window(@Bilgi) == $null) { window -ne @Bilgi }
    echo 2 -t @Bilgi 4 Host Değişimi:1 $1 tarafından1 $7 $+ 1'nin hostu değiştirilerek:4 $11- 1 $+ yapıldı. | halt  
  }
  if (Locops isin $1-) {
    if ($window(@UyarI) == $null) { window -ne @UyarI }
    echo 2 -t @UyarI $1- | halt
  }
  if (G:Line isin $1-) || (Z:line isin $1-) || (K:line isin $1-) {
    if ($window(@XLine) == $null) { window -ne @XLine }
    echo 2 -t @XLine $1- | halt
  }
  if (removed isin $1-) {
    if ($window(@XLine) == $null) { window -ne @XLine }
    if (%unbanip isin $1-) || (%xlinex isin $1-) { echo -a *** 12 $+ %xlinex 5Adresinin Banı Açıldı. | unset %xline* | unset %unban* }
    echo 2 -t @XLine $1- | halt
  }
  if (tried isin $1-) {
    if ($window(@baskakanal) == $null) { window -ne @baskakanal }
    echo 2 -t @baskakanal $1- | halt
  }
  if (banned isin $1-) {
    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
    echo 2 -t @Giris/Cikis $1- | halt
  }
  if (obtained isin $1-) {
    if ($window(@SupasGirdi) == $null) { window -ne @SupasGirdi }
    echo 2 -t @SupasGirdi $1- | halt
  }
  if (exiting isin $1-) {
    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
    echo 2 -t @Giris/Cikis  14Çıkış: 7Nick:4[14 $gettok($8,1,33)  4]7 Network:4[14 $7 4] | halt | halt
  }
  if (Connecting isin $1-) {
    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
    echo 2 -t @Giris/Cikis  3Giriş :2 Nick:4[4 $8 4] 2Network:4[3 $7 4] 2Host:4[3 $9 4] | halt
  }
  if (Forbidding isin $1-) || (Q:lined isin $1-) {
    if ($window(@Q-Lined) == $null) { window -ne @Q-Lined }
    echo 2 -t @Q-Lined $1- | halt
  }
  if (Expiring isin $1-) || (Shun isin $1-) {
    if ($window(@XLine) == $null) { window -ne @XLine }
    echo 2 -t @XLine 2Shun :2 Nick:4[4 $6 4] 2Network:4[3 $7 4] 2Uygulayan:4[3 $9 4]  | halt
  }
  if (Spamfilter isin $1-) {
    if ($window(@Spam) == $null) { window -ne @Spam }
    echo 2 -t @Spam $1- 
    halt
  }
  if (is now isin $1-) { write oper.txt $date $timestamp $1- }
}

on ^1:SNOTICE:*:{

if (/whois isin $1-) {

if ($window(@Whois) == $null) { window -ne @Whois }

echo 2 -t @Whois 4Whois Çeken Nick 2[ $2 ]4 Ip: 2[ $3 ] | halt

}

if (his/her isin $1-) || (Failed isin $1-) || (Denied isin $1-) || (tkl isin $1-) || (Q: isin $1-) || (used isin $1-) || (OperOverride isin $1-) || (Mismatch: isin $1-) || (is now isin $1-) || (Received isin $1-) {

if ($window(@Opers) == $null) { window -ne @Opers }

echo 2 @Opers $1- | halt

}

if (gecos isin $1-) {

if ($window(@Bilgi) == $null) { window -ne @Bilgi }

echo 2 -t @Bilgi 4 Fullname Değişimi:1 $1 tarafından1 $6 $+ 1'nin fullnamesi değiştirilerek:4 $10- 1 $+ yapıldı. | halt

}

if (virtual isin $1-) {

if ($window(@Bilgi) == $null) { window -ne @Bilgi }

echo 2 -t @Bilgi 4 Host Değişimi:1 $1 tarafından1 $7 $+ 1'nin hostu değiştirilerek:4 $11- 1 $+ yapıldı. | halt

}

if (Locops isin $1-) {

if ($window(@UyarI) == $null) { window -ne @UyarI }

echo 2 -t @UyarI $1- | halt

}

if (G:Line isin $1-) || (Z:line isin $1-) || (K:line isin $1-) {

if ($window(@XLine) == $null) { window -ne @XLine }

echo 2 -t @XLine $1- | halt

}

if (removed isin $1-) {

if ($window(@XLine) == $null) { window -ne @XLine }

if (%unbanip isin $1-) || (%xlinex isin $1-) { echo -a *** 12 $+ %xlinex 5Adresinin Banı Açıldı. | unset %xline* | unset %unban* }

echo 2 -t @XLine $1- | halt

}

if (tried isin $1-) {

if ($window(@baskakanal) == $null) { window -ne @baskakanal }

echo 2 -t @baskakanal $1- | halt

}

if (banned isin $1-) {

if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

echo 2 -t @Giris/Cikis $1- | halt

}

if (obtained isin $1-) {

if ($window(@SupasGirdi) == $null) { window -ne @SupasGirdi }

echo 2 -t @SupasGirdi $1- | halt

}

if (exiting isin $1-) {

if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

echo 2 -t @Giris/Cikis 14Çıkış: 7Nick:4[14 $gettok($8,1,33) 4]7 Network:4[14 $7 4] | halt | halt

}

if (Connecting isin $1-) {

if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

echo 2 -t @Giris/Cikis 3Giriş :2 Nick:4[4 $8 4] 2Network:4[3 $7 4] 2Host:4[3 $9 4] | halt

}

if (Forbidding isin $1-) || (Q:lined isin $1-) {

if ($window(@Q-Lined) == $null) { window -ne @Q-Lined }

echo 2 -t @Q-Lined $1- | halt

}

if (Expiring isin $1-) || (Shun isin $1-) {

if ($window(@XLine) == $null) { window -ne @XLine }

echo 2 -t @XLine 2Shun :2 Nick:4[4 $6 4] 2Network:4[3 $7 4] 2Uygulayan:4[3 $9 4] | halt

}

if (Spamfilter isin $1-) {

if ($window(@Spam) == $null) { window -ne @Spam }

echo 2 -t @Spam $1-

halt

}

if (is now isin $1-) { write oper.txt $date $timestamp $1- }

}

» Devamını Oku

Yorum yaz Mirc indir, Mirc yükle, Snotice kodu, Snoticeleri ayırma remotesi, Türkçe mirc indir, turkce mırc

Extraban komutu ve parametreleri

09 Aralık 2016 • 22:20 dELi IRC Konuları

[Eğitim Konusu]: Ban Komutunun Kullanımı ve Ekstra Ban Parametreleri – – Bir kullanıcının, Nick!Ident@Host belirterek joker karakterler yardımıyla kanala girişini engellemek için kullanilan kanal kipidir. (+b) – 4Kullanım Şekli ; – /mode #kanal +b Nick!*@* » Belirtilen kanalda belirtilen nicke sahip kullaniciya ban uygular. /mode #kanal +b *!Ident@* » Belirtilen kanalda belirtilen idente sahip kullanicilara ban uygular. /mode #kanal +b […]

» Devamını Oku

Yorum yaz extra ban modları, extra ban parametreleri, irc komutları, Mirc indir, Mirc yükle, Türkçe mirc indir, Türkçe mirc yükle, türkçe mirc6.35

Sunucuya giriş çıkışları ayrı pencerede gösterme

09 Aralık 2016 • 14:35 dELi Hazır Kodlar

on ^1:SNOTICE:*:{
  if (Connecting isin $1-) {
    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
    echo 2 -t @Giris/Cikis  3Giriş :2 Nick:4[4 $8 4] 2Network:4[3 $7 4] 2Host:4[3 $9 4] | halt
  }
  if (exiting isin $1-) {
    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
    echo 2 -t @Giris/Cikis  14Çıkış: 7Host:4[7 $8 4]7 Network:4[7 $7 4] | halt | halt
  }
}

on ^1:SNOTICE:*:{

if (Connecting isin $1-) {

if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

echo 2 -t @Giris/Cikis 3Giriş :2 Nick:4[4 $8 4] 2Network:4[3 $7 4] 2Host:4[3 $9 4] | halt

}

if (exiting isin $1-) {

if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

echo 2 -t @Giris/Cikis 14Çıkış: 7Host:4[7 $8 4]7 Network:4[7 $7 4] | halt | halt

}

Kodu remoteye ekliyorsunuz. Oper yetkiniz olması lazım. giriş çıkışlar görünmüyorsa : /mode Nickiniz +s nfF şeklinde kendinize mod vermelisiniz.

» Devamını Oku

Yorum yaz giriş çıkış remotesi, giriş çıkışları ayırma, Mirc indir, Mirc yükle, snoticeleri ayırma, Türkçe mirc indir, Türkçe mirc yükle, turkce mırc

mirc proxy koruması

02 Aralık 2016 • 14:32 dELi Hazır Kodlar

raw 352:*:{
  proxy $4
}
on *:snotice:*Client connecting*: {
  .who +I $9
}
alias proxy {
  var %rand $rand(0,99999)
  sockopen $+(ktor,%rand)  www.checkingtools.com 80
  sockmark $+(ktor,%rand) $1
}

on *:sockopen:ktor*: {
  var %komut sockwrite -nt $sockname, %post $+(ip=,$sock($sockname).mark,&amp;GO%21=GO%21)
  %komut POST /ip_check HTTP/1.1
  %komut Host: www.checkingtools.com
  %komut Connection: keep-alive
  %komut Content-Length: $len(%post)
  %komut Cache-Control: max-age=0
  %komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
  %komut Origin: http://www.checkingtools.com
  %komut User-Agent: Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.31 (KHTML, like Gecko) Chrome/26.0.1410.64 Safari/537.31
  %komut Content-Type: application/x-www-form-urlencoded
  %komut Accept-Encoding: gzip,deflate,sdch
  %komut Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
  %komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.3
  %komut Cookie: PHPSESSID=90b5ae6ed385b312ea3dcccb50c126e1; ck_lang=en; __atuvc=18%7C1
  %komut 
  %komut %post
}
on *:sockread:ktor*: {
  var %x | sockread %x | tokenize 32 %x
  if $regex($1-,/(XBL|SBL|XBL|SPAMCOP|CBL|NJABL|SURBL|HTTP:BL).+red/i) {
    gzline $+(*@,$sock($sockname).mark) 1h 1IP adresinizde 4PROXY 1girişi tespit edilmiştir.
    if !$window(@prxy-tor) { window -neg1 @prxy-tor } | echo @prxy-tor ( $+ $time $+ ) $+(4 $chr(32),$sock($sockname).mark),$chr(32)) 1IP adresinizde 4PROXY 1girişi tespit edilmiştir. 
    sockclose $sockname    
    halt
  }
}

raw 352:*:{

proxy $4

}

on *:snotice:*Client connecting*: {

.who +I $9

}

alias proxy {

var %rand $rand(0,99999)

sockopen $+(ktor,%rand) www.checkingtools.com 80

sockmark $+(ktor,%rand) $1

}

on *:sockopen:ktor*: {

var %komut sockwrite -nt $sockname, %post $+(ip=,$sock($sockname).mark,&GO%21=GO%21)

%komut POST /ip_check HTTP/1.1

%komut Host: www.checkingtools.com

%komut Connection: keep-alive

%komut Content-Length: $len(%post)

%komut Cache-Control: max-age=0

%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8

%komut Origin: http://www.checkingtools.com

%komut User-Agent: Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.31 (KHTML, like Gecko) Chrome/26.0.1410.64 Safari/537.31

%komut Content-Type: application/x-www-form-urlencoded

%komut Accept-Encoding: gzip,deflate,sdch

%komut Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4

%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.3

%komut Cookie: PHPSESSID=90b5ae6ed385b312ea3dcccb50c126e1; ck_lang=en; __atuvc=18%7C1

%komut

%komut %post

}

on *:sockread:ktor*: {

var %x | sockread %x | tokenize 32 %x

if $regex($1-,/(XBL|SBL|XBL|SPAMCOP|CBL|NJABL|SURBL|HTTP:BL).+red/i) {

gzline $+(*@,$sock($sockname).mark) 1h 1IP adresinizde 4PROXY 1girişi tespit edilmiştir.

if !$window(@prxy-tor) { window -neg1 @prxy-tor } | echo @prxy-tor ( $+ $time $+ ) $+(4 $chr(32),$sock($sockname).mark),$chr(32)) 1IP adresinizde 4PROXY 1girişi tespit edilmiştir.

sockclose $sockname

halt

}

Kodlayan h4pp3n..

» Devamını Oku

Yorum yaz chat programı yükle, mirc 6.35, mirc indit, mirc proxy koruması, Mirc son sürüm, Mirc yükle, proxy Koruması, sohbet programı indir, sohbet script, Türkçe mirc indir, turkce mırc

Nick Takip Kodu txt

02 Aralık 2016 • 14:00 dELi Hazır Kodlar

Kodun çalışma mantığı giris.txt dosyasına hostunu baz alarak kanala giren kullanıcıları kayıt eder ve @giris penceresinde bize ispiyonlar.

alias giris {
return giris
}

on !1:JOIN:#: { window -De @Giris
var %mask = $mask($fulladdress,2)
var %nfname = $mask($fulladdress,0)

; get the previous nicks
var %nicks = $readini(giris.txt, %mask, nicks)

; get the pervious full names
var %fname = $readini(giris.txt, %mask, fullname)

; add the new nick ($addtok will take care of duplicates)
var %nicks = $addtok(%nicks,$nick,32)

; add the new fname ($addtok will take care of duplicates)
var %fname = $addtok(%fname,$ial(%mask).user,32)

; update the nicks
writeini -n giris.txt %mask nicks %nicks

; update the seen time
writeini -n giris.txt %mask seentime $date

; update the fullname
writeini -n giris.txt %mask fullname %fname

echo -t @giris 4Bağlanan 5 $nick ------------------------------------------
echo -t @giris 4IP Adresi 5 %mask
echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks)
echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname)
echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime)
echo -t @giris 4Kanal:5 $chan
echo -t @giris 2End $nick ------------------------------------------
}

alias ntrack {
var %mask = $address($1,2)
var %nfname = $address($1,0)
; get the previous nicks
var %nicks = $readini(giris.txt, %mask, nicks)
; get the pervious full names
var %fname = $readini(giris.txt, %mask, fullname)
; add the new nick ($addtok will take care of duplicates)
var %nicks = $addtok(%nicks,$nick,32)
; add the new fname ($addtok will take care of duplicates)
var %fname = $addtok(%fname,$ial(%mask).user,32)
echo -a 12 $1 on the ip %mask has used the nicks: $readini(giris.txt, %mask, nicks) and the full names: $readini(giris.txt, %mask, fullname) and was last seen on $readini(giris.txt, %mask, seentime)
}
menu nicklist {
NickTrack:ntrack $$1
}

alias giris.txt {
return giris.txt
}

on !1:nick: { window -De @giris
var %mask = $mask($fulladdress,2)
var %nfname = $mask($fulladdress,0)

; get the previous nicks
var %nicks = $readini(giris.txt, %mask, nicks)

; get the pervious full names
var %fname = $readini(giris.txt, %mask, fullname)

; add the new nick ($addtok will take care of duplicates)
var %nicks = $addtok(%nicks,$newnick,32)

; add the new fname ($addtok will take care of duplicates)
var %fname = $addtok(%fname,$ial(%mask).user,32)

; update the nicks
writeini -n giris.txt %mask nicks %nicks

; update the seen time
writeini -n giris.txt %mask seentime $date

; update the fullname
writeini -n giris.txt %mask fullname %fname

echo -t @giris 4Bağlanan 5 $nick ------------------------------------------
echo -t @giris 4IP Adresi 5 %mask
echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks)
echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname)
echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime)
echo -t @giris 4Kanal:5 $chan
echo -t @giris 2End $nick ------------------------------------------
}

alias giris {

return giris

}

on !1:JOIN:#: { window -De @Giris

var %mask = $mask($fulladdress,2)

var %nfname = $mask($fulladdress,0)

; get the previous nicks

var %nicks = $readini(giris.txt, %mask, nicks)

; get the pervious full names

var %fname = $readini(giris.txt, %mask, fullname)

; add the new nick ($addtok will take care of duplicates)

var %nicks = $addtok(%nicks,$nick,32)

; add the new fname ($addtok will take care of duplicates)

var %fname = $addtok(%fname,$ial(%mask).user,32)

; update the nicks

writeini -n giris.txt %mask nicks %nicks

; update the seen time

writeini -n giris.txt %mask seentime $date

; update the fullname

writeini -n giris.txt %mask fullname %fname

echo -t @giris 4Bağlanan 5 $nick ------------------------------------------

echo -t @giris 4IP Adresi 5 %mask

echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks)

echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname)

echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime)

echo -t @giris 4Kanal:5 $chan

echo -t @giris 2End $nick ------------------------------------------

}

alias ntrack {

var %mask = $address($1,2)

var %nfname = $address($1,0)

; get the previous nicks

var %nicks = $readini(giris.txt, %mask, nicks)

; get the pervious full names

var %fname = $readini(giris.txt, %mask, fullname)

; add the new nick ($addtok will take care of duplicates)

var %nicks = $addtok(%nicks,$nick,32)

; add the new fname ($addtok will take care of duplicates)

var %fname = $addtok(%fname,$ial(%mask).user,32)

echo -a 12 $1 on the ip %mask has used the nicks: $readini(giris.txt, %mask, nicks) and the full names: $readini(giris.txt, %mask, fullname) and was last seen on $readini(giris.txt, %mask, seentime)

}

menu nicklist {

NickTrack:ntrack $$1

}

alias giris.txt {

return giris.txt

}

on !1:nick: { window -De @giris

var %mask = $mask($fulladdress,2)

var %nfname = $mask($fulladdress,0)

; get the previous nicks

var %nicks = $readini(giris.txt, %mask, nicks)

; get the pervious full names

var %fname = $readini(giris.txt, %mask, fullname)

; add the new nick ($addtok will take care of duplicates)

var %nicks = $addtok(%nicks,$newnick,32)

; add the new fname ($addtok will take care of duplicates)

var %fname = $addtok(%fname,$ial(%mask).user,32)

; update the nicks

writeini -n giris.txt %mask nicks %nicks

; update the seen time

writeini -n giris.txt %mask seentime $date

; update the fullname

writeini -n giris.txt %mask fullname %fname

echo -t @giris 4Bağlanan 5 $nick ------------------------------------------

echo -t @giris 4IP Adresi 5 %mask

echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks)

echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname)

echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime)

echo -t @giris 4Kanal:5 $chan

echo -t @giris 2End $nick ------------------------------------------

}

Alıntıdır.

» Devamını Oku

Yorum yaz Mirc indir, Mirc yükle, Türkçe mirc 6.35, Türkçe mirc indir, türkçe mirc son sürüm, Türkçe mirc yükle, turkce mırc

ülke şehir ips Gösteren addon

02 Aralık 2016 • 13:54 dELi Hazır Kodlar

—————————-

on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) www.ipaddresslocation.org 80 | sockmark $+(pro,%:r) $+($4,¿,$6)
alias htmlfree { if ($len($1-) &lt; = 900) { var %x, %i = $regsub($1,/(^[^&lt;]*&gt;|&lt; [^&gt;]*&gt;|&lt; [^&gt;]*$)/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: www.ipaddresslocation.org 
  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ş)
    .echo @Giriş Nick: %:n - IP: %ip - Ulke: %ülke - Sehir: %sehir - ISP: %:isp 
    .hfree -sw %:n
    sockclose $sockname
  }
}

on *:snotice:*Client connecting on port*:who +I $9

raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) www.ipaddresslocation.org 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: www.ipaddresslocation.org

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

.echo @Giriş Nick: %:n - IP: %ip - Ulke: %ülke - Sehir: %sehir - ISP: %:isp

.hfree -sw %:n

sockclose $sockname

}

———— Kod Toprak`a Aittir ——————– Kodu remoteye eklemeniz yeterlidir. Kodun çalışması için en az oper yetkisine sahip olmanız gerekmektedir. Oper olduğunuz halde kod çalışmıyor ise : /mode Nickiniz +s FNc şeklinde kendinize mod verin o zaman çalışacaktır.

» Devamını Oku

Yorum yaz ip den şehir bulma, Mirc indir, mirc script, Mirc yükle, Türkçe mirc 6.35, Türkçe mirc indir, türkçe mirc son sürüm, Türkçe mirc yükle, turkce mırc, ülke şehir bulucu remote, ülke şehir ip öğrenme, ülke şehir öğrenme

« 1 2 3 4 … 19 »