mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz. |
|
Seçenekler | Stil |
01 Haziran 2020, 01:02 | #1 |
Sunucu girişlerini yurt dışına kapatıp açmak
#opers kanalı için;
!yip on !yip off yazıldığında harekete geçer ve sadece 6667 6668 portundan bağlanan kullanıcıları kapsar. .yip pas Yazıldğında da kod pasif kalır. .yip on yurt dışından girişler SERBEST .yip off yurt dışından girişler YASAK .yip pas yurt dışından girişler PASİF Kişisel kullanım için; /yip on yurt dışından girişler SERBEST /yip off yurt dışından girişler YASAK /yip pas yurt dışından girişler PASİF Kod aktif olduktan sonra @G-kontrol penceresinde bilgi verilir. Kodalias yip { if $regex($1,/(on|off|pas)$/i) { set %yurtdisi $regml(1) echo -a Yurt dışı girişleri $iif($regml(1) = off,4KAPATILDI,$iif($regml(1) = on,3AÇILDI,$iif($regml(1) = pas,2PASİF))) } } on *:text:*:#opers:{ if $regex($1-,/[.!]yip\s(on|off|pas)$/i) { set %yurtdisi $regml(1) msg # Yurt dışı girişleri $iif($regml(1) = off,4KAPATILDI,$iif($regml(1) = on,3AÇILDI,$iif($regml(1) = pas,2PASİF))) } } alias G-kontrol { if !$sock($+(G-kontrol@,$1)) { sockopen $+(G-kontrol@,$1) ipinfo.io 80 sockmark $+(G-kontrol@,$1) $+(/,$1,/json?token=bdbdb82ae05b96) } } on *:snotice:*: { if $regex(gk,$1-,/Client\sconnecting(.+)666(7|8):\s(.*)\(((.*)@(.*))\)(.*)/i) { if %yurtdisi = pas { return } G-kontrol $regml(gk,6) } } on *:sockopen:G-kontrol@*:{ var %sw sockwrite -tn $sockname %sw GET $sock($sockname).mark HTTP/1.1 %sw Host: ipinfo.io %sw $crlf } on *:sockread:G-kontrol@*:{ var %d_G-kontrol sockread %d_G-kontrol if $regex(ig,%d_G-kontrol,/("country": "(.*)")/i) { if $regml(ig,2) !== TR && %yurtdisi = off { if !$window(@G-kontol) { window -en @G-kontol } gzline $+(*@,$gettok($sockname,2,64)) 1h Sunucumuzun girişi şimdilik yurt dışına kapalıdır. echo -m @G-kontol $time(d/m/yyyy HH:nn) 5GİRİŞ[4Yurt Dışı] $& 2İP-ADRES: $gettok($sockname,2,64) } else { echo -m @G-kontol $time(d/m/yyyy HH:nn) $iif($regml(ig,2) = TR,5GİRİŞ[3Yurt $& İçi],5GİRİŞ[4Yurt Dışı]) 2İP-ADRES: $gettok($sockname,2,64) } } if *"org":* iswm %d_G-kontrol { sockclose $sockname } }
________________
TurkSohbet.NET | #XPass Konu diEfoRyoU tarafından (01 Haziran 2020 Saat 01:35 ) değiştirilmiştir.. |
|
|
01 Haziran 2020, 19:09 | #2 |
Emeğine sağlık Murat güzel bir anlatım olmuş kardeşim
________________
Edep; aklın Tercümanıdır. İnsan edebi kadar akıllı, Aklı kadar şerefli, Şerefi kadar Kıymetlidir. Massive.. ~ E & B ~ |
|
|
01 Haziran 2020, 19:10 | #3 |
emeginize saglik
________________
Hope. . . ✨
|
|
|
01 Haziran 2020, 19:37 | #4 |
Emeğinize sağlık
________________
bazen insanlar iyilesmek istemez.
cünkü , icindeki acı sevdiklerinin son hatirasidir.. per aspera ad astra ✨ |
|
|
01 Haziran 2020, 19:45 | #5 |
Eline sağlık kanka
________________
Sayonaraaa.. |
|
|
01 Haziran 2020, 19:50 | #6 |
Emeğine, bilgine sağlık.
________________
"Vatan ne Türkiyedir Türklere, ne Türkistan Vatan, büyük ve müebbet bir ülkedir: Turan"
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] |
|
|
01 Haziran 2020, 20:50 | #7 |
Emeğine Sağlik. . .
|
|
|
01 Haziran 2020, 21:08 | #8 |
Emeğinize sağlık.
|
|
|
01 Haziran 2020, 21:09 | #9 |
Paylaşım için teşekkürler
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
________________
Doğallığın verdiği huzuru, doğal olmayan yollardan arama. Çünkü sadelik, sahtelik sevmez. |
|
|
01 Haziran 2020, 21:35 | #10 |
Emeğine sağlık arkadaşım.
________________
~ E & B ~ |
|
|
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
|
|