|
|
 |
| mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz. |
|
|
Seçenekler | Stil |
11 Ocak 2024, 21:47
|
#1 |
     |
Dünya saati sorgulama socket
Dünyadaki Ülkelerin ve Şehirlerin saatlerine tek tek bakabilirsiniz.
Komut: !saat Ülke veya Şehir Örnek komutlar; Komut: !saat Fransa Komut: !saat Paris Komut: !saat Meksika Örnek; Kod[21:31]» <Atom> !saat Fransa [21:31]» <Forbidden> Fransa [Saat] 19:31 [Tarih] 11 Ocak 2024 Perşembe [21:31]» <Atom> - [21:32]» <Atom> !Saat Paris [21:32]» <Forbidden> Paris, Fransa [Saat] 19:31 [Tarih] 11 Ocak 2024 Perşembe [21:32]» <Atom> - [21:32]» <Atom> .saat Özbekistan [21:32]» <Forbidden> Özbekistan [Saat] 23:32 [Tarih] 11 Ocak 2024 Perşembe Kodon $*:text:/^[.!]saat (.+)$/i:#: {
if (%saatchan) { msg # > $nick Saat sorgusu yaparken 10 sn beklemelisiniz | msg # > Saat sorgusu yapilacak ulkenin ilk harfini büyük ve türkçe karakter kullanmalisiniz. | return }
set -eu10 %saatchan #
set -eu10 %saatnere $replace($$2-,$chr(32),+)
saat
}
alias saat { if $sock(saat) { .sockclose saat } | .sockopen saat $sit 80 }
on *:sockopen:saat: {
$m GET /search?q=google+saat+ $+ %saatnere HTTP/1.1
$m Host: $sit
$m Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3
$m Accept-Encoding: *
$m $crlf
}
on *:sockread:saat:{
var %saat
if $sockerr { .sockclose $sockname | msg %saatchan > Socket Hatasi }
sockread -f %saat
var %patt = /(.+)BNeawe iBp4i AP7Wnd">(.+)</div></div></div></div></div><div><div><div class="BNeawe tAd8D AP7Wnd">(.+)/
var %patt2 = /"r0bn4c rQMQod">(.+)</span></span></span>/
var %patt3 = /<div class="BNeawe tAd8D AP7Wnd"><span class="r0bn4c rQMQod">(.+)/$
if ($+(*,%saatnere,*) iswm %saat && $regex(%saat,%patt)) {
var %saat__ = $regml(2)
noop $regex(%saat,%patt2)
var %ulke_ $regml(1)
noop $regex(%saat,%patt3)
var %tarih_ = $regml(1)
msg %saatchan %ulke_ [Saat] %saat__ [Tarih] %tarih_
}
}
alias -l m return sockwrite -n $sockname
alias -l sit return www.google.com
|
|
|
|
11 Ocak 2024, 21:51
|
#2 |
    |
Emeğinize sağlık.
________________
 |
|
|
|
12 Ocak 2024, 18:38
|
#3 |
  |
Emeklerine sağlık . Başarılarının devamını dilerim
|
|
|
|
13 Ocak 2024, 06:20
|
#4 |
   |
Emeğinize sağlık
|
|
|
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
|
|
Normal
