Paylaşımın Ve Sohbetin Tek Adresine HoşGeldin, Ziyaretçi!

Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

Giris Cıkıs Gosterme

Katılım
22 Ağu 2019
Mesajlar
80
Tepkime puanı
124
Puanları
33
Konum
istanbul
Cinsiyet
Erkek

İtibar Puanı:

https://www.mircalem.com/alem.png

Kod:
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)
  set %identt $3
  set %hostu $4
  set %fllnamesi $9-
  set %baglandigi $5
}

alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } %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)

    ;############### MUAF NICK GIRISI #################
    if $read(bopmnick.txt,w,%:n) { msg #takip 0,2 (MUAF NICK) 3 [GIRIS] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4] Saat : $time 5- 3Tarih : $date  | return }

    ;############### MUAF IDENT GIRISI #################
    if $read(bopmident.txt,w,%identt) { msg #takip 0,2 (MUAF IDENT) 3 [GIRIS] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4] Saat : $time 5- 3Tarih : $date  | return }

    ;############### MUAF IP GIRISI #################
    if $read(bopmip.txt,w,%hostu) { msg #takip 0,2 (MUAF IP) 3 [GIRIS] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4] Saat : $time 5- 3Tarih : $date  | return }

    ;############### YASAK ULKE GIRISI #################
    if (%ulkekoruma == AKTIF) && $read(yasakulke.txt,w,%ülke) { msg #takip 0,4 AKT1F 4 [YASAK ULKE GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }
    if (%ulkekoruma == DEAKTIF) && $read(yasakulke.txt,w,%ülke) { msg #takip 0,2 DEAKTIF 4 [YASAK ULKE GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }

    ;############### USERS PROXY GIRISI #################
    if (%proxyuser == AKTIF) && $level(%hostu) == proxy { msg #takip 0,4 AKT1F 4 [USERS PROXY GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }
    if (%proxyuser == DEAKTIF) && $level(%hostu) == proxy { msg #takip 0,2 DEAKTIF 4 [USERS PROXY GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }

    ;############### PROXY TXT GIRISI #################
    if (%proxytxt == AKTIF) && $read(proxy.txt,w,%hostu) { msg #takip 0,4 AKT1F 4 [TXT PROXY GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }
    if (%proxytxt == DEAKTIF) && $read(proxy.txt,w,%hostu) { msg #takip 0,2 DEAKTIF 4 [TXT PROXY GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }

    ;############### BOTNET NICK GIRISI #################
    if (%botnetnick == AKTIF) && $read(botnet.txt,w,%:n) { msg #takip 0,4 AKT1F 4 [BOTNET NICK GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }
    if (%botnetnick == DEAKTIF) && $read(botnet.txt,w,%:n) { msg #takip 0,2 DEAKTIF 4 [BOTNET NICK GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }

    ;############### BOTNET IDENT GIRISI #################
    if (%botnetident == AKTIF) && $read(botnet.txt,w,%identt) { msg #takip 0,4 AKT1F 4 [BOTNET IDENT GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }
    if (%botnetident == DEAKTIF) && $read(botnet.txt,w,%identt) { msg #takip 0,2 DEAKTIF 4 [BOTNET IDENT GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }

    ;############### BOTNET FULLNAME GIRISI #################
    if (%botnetfullname == AKTIF) && $read(botnet.txt,w,%fllnamesi) { msg #takip 0,4 AKT1F 4 [BOTNET FULLNAME GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }
    if (%botnetfullname == DEAKTIF) && $read(botnet.txt,w,%fllnamesi) { msg #takip 0,2 DEAKTIF 4 [BOTNET FULLNAME GIRISI] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4]  | return }

    ;############### NORMAL GIRISI #################
    msg #takip 3 [GIRIS] 1 %:n 4[!]1 %identt 4[@]1 %hostu  4[F]2 %fllnamesi 0,1 /!\  4[1 $+ %ülke $+ 4/1 $+ %sehir $+ 4] Saat : $time 5- 3Tarih : $date
    .hfree -sw %:n
    sockclose $sockname
  }
}
evet canlar txt dosyalarınıda vereyim.
 

Ekli dosyalar

  • bopmident.txt
    16 bayt · Görüntüleme: 51
  • bopmip.txt
    107 bayt · Görüntüleme: 23
  • bopmnick.txt
    112 bayt · Görüntüleme: 21
  • botnet.txt
    205.2 KB · Görüntüleme: 82
  • proxy.txt
    248.7 KB · Görüntüleme: 4,745
  • yasakulke.txt
    1.4 KB · Görüntüleme: 22
  • yetkilinick.txt
    9 bayt · Görüntüleme: 19
Katılım
9 Ağu 2019
Mesajlar
332
Tepkime puanı
170
Puanları
43
Yaş
36
Konum
turkiye
Cinsiyet
Erkek

İtibar Puanı:

7130
IMG_20190915_012338.jpg
 
Tüm sayfalar yüklendi.

Konuyu Görüntüleyen Kullanıcılar (Toplam:0)

Benzer konular