mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz. |
|
Seçenekler | Stil |
24 Nisan 2020, 01:19 | #1 |
mIRC Giriş Uyarıcı ve Whoise Ülke/il yazma code
Merhabalar Sayın IR kullanıcıları coğu giriş yansıtma kodunun artık çalışmadığını fark ettim ve yeni bir kod ve sistem paylaşmak istedim sizin ile.
Kod'un işlev'i Sunucuya giren kişilerin il / ülke / ip bilgilerini belirlediğiniz kanal'a yansıtıp whois'ine girdiği ülke ve şehri yazmasıdır. Örnek resim.; HTML-Koduon *:snotice:*on*port*:who +I $9 raw 352:*:var %:r $r(1000,99999) | nerd $4 $6 alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } alias nerd { :tekrar var %:x $rand(0,9999999) if $sock($+(xxnerden,%:x)) { goto tekrar } sockopen $+(xxnerden,%:x) www.ipsorgu.com 80 sockmark $+(xxnerden,%:x) $1 hadd -m nerden $1 $2 } on *:sockopen:xxnerden*: { var %komut sockwrite -nt $sockname %komut GET $+(/?ip=,$sock($sockname).mark) HTTP/1.1 %komut Host: www.ipsorgu.com %komut User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:49.0) Gecko/20100101 Firefox/49.0 %komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 %komut Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 %komut DNT: 1 %komut Connection: keep-alive %komut Upgrade-Insecure-Requests: 1 %komut Cache-Control: max-age=0 %komut $crlf } on *:sockread:xxnerden*: { var %x, %nick | sockread %x if $regex(%x,/lke : <em style="color:#666">(.*?)</em></strong>.+ehir : <em style="color:#666">(.*?)</em></strong>/i) { var %ulke $regml(1), %sehir $regml(2), %ip $sock($sockname).mark, %nick $token($hget(nerden,$sock($sockname).mark),1,32) msg #Opers 45[Login5] 2Nick: %nick 2IP: %ip 2Ulke: $iif(%ulke,$v1,Belirsiz) 2Sehir: $iif(%sehir,$v1,Belirsiz) msg operserv raw swhois %nick : %ulke , %sehir hdel -m nerden %ip sockclose $sockname } } Biri ; Yansıtılacak Kanal : .msg #Opers 45[Login5] Değiştirilmelidir. 2. ise; Kodu Kullanacak Olan nickserv'e Services Root olarak tanıtılmış veyahut Supass girmiş olması gerekmektedir.Çünkü kod Raw komutu kullanmakta'dır. Örnek Görüntü ; [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Saygılarımla.
________________
KTeknoloji Türkiye'nin Lider Servis Sağlayıcısı
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Konu KTeknoloji tarafından (25 Nisan 2020 Saat 03:29 ) değiştirilmiştir.. |
|
|
24 Nisan 2020, 01:20 | #2 |
Ahmetttt emegine saglik;bayrak;dayi
________________
|
|
|
24 Nisan 2020, 01:21 | #3 |
Eyv adas eline saglik...
________________
Adam oLmak Bir Gruba DahiL oLmak DeğiL.. Bir Duruşa Sahip oLmaktir... |
|
|
24 Nisan 2020, 18:44 | #4 |
Kodraw 352:*:var %:r $r(1000,99999) | proxy $4 | nerd $4 $6 |
|
|
24 Nisan 2020, 19:01 | #5 |
Merciii
________________
*Samimiyetiniz değil
-Pazarlığınız içten ! |
|
|
25 Nisan 2020, 03:28 | #6 |
Doğrudur malum proxy taraması yapıp alıyorum içeri bilgilendirme için teşekkürler.
________________
KTeknoloji Türkiye'nin Lider Servis Sağlayıcısı
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] |
|
|
30 Nisan 2020, 13:21 | #7 |
Emeğine sağlık
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
________________
Edep; aklın Tercümanıdır. İnsan edebi kadar akıllı, Aklı kadar şerefli, Şerefi kadar Kıymetlidir. Massive.. ~ E & B ~ |
|
|
04 Ağustos 2020, 17:55 | #8 |
Emeğinize sağlık
________________
~ E & B ~ |
|
|
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
|
|